El problema es el siguiente, hago uso de un fichero en una operación tras la cual quiero eliminarlo. La operación es asíncrona, con lo cual, hasta que no termine, el fichero permanece bloqueado y no lo puedo eliminar.

He encontrado una solución "poco elegante" y me gustaría, si alguien sabe cómo, no tener que recurrir a un try ... catch y poder comprobar si el archivo no está bloqueado y lo puedo eliminar.

Ahora lo hago así (y funciona):

Código:

'operaciones que utilizan el fichero

Dim hiloBorrar As New Threading.Thread(AddressOf EliminarFichero)
hiloBorrar.Start(fileList)

y el código del hilo (el que no me gusta):

Código:

Private Sub EliminarFichero(ByVal ficheros As Object)
 '' Borramos el ficheroo

 For Each strfile As String In ficheros
 Dim BORRADO As Boolean = False
 While Not BORRADO
 Try
 If IO.File.Exists(strfile) Then
 IO.File.Delete(strfile)
 End If
 BORRADO = True
 Catch ex As Exception
   'si el archivo está bloqueado salta la excepción
  'me quedo esperando un poco y vuelvo a intentarlo
  Threading.Thread.Sleep(100)

 End Try
 End While
 Next
 End Sub

Hola.

Si no mal recuerdo..hay algo asi como "File.GetAtribute..." para ver como está el archivo.

Dentro de tu hilo, podrías comprobar antes de lanzarlo y quedarte en un bucle que te encerrara: por un lado si existe el archivo (si se borra por cualquier cosa o no puedes acceder a el...entonces...exit sub) y por el otro, esperando que el archivo se libere.

Ojo como lo haces, porque este bucle te puede tirar abajo el PC por el tema de los recursos.

Yo no utilizaría un try-catch si estás dentro de hebras, porque si se disparan muchas de estas, te consume muchisimos Recursos. Hay que tener algo de cuidado cuando trabajamos con TryCatch.

Espero que saques algo en limpio de estas palabras.

Un abrazo desde España.

Otra cosa:

cuando pones:

If IO.File.Exists(strfile) Then
IO.File.Delete(strfile)
End If
BORRADO = Truela última línea la cambiaria por:

BORRADO = NOT IO.File.Exists(strfile)

para asegurarte que...luego de borrado, REALMENTE ya no esá.

Un abrazo desde España

No sé si te valdrá la API WaitForSingleObject. Le puedes pasar el handle de un proceso, un tiempo (que puede ser INFINITE) y se quedá ahí hasta que acaba.
Conozcoun ejemplo en VB6, pero si la clase Trhead (que no conozco) te da acceso a ese handle (en VB6 hay que hacerlo todo "a mano") me da la impresión de que tiene que ser bastante fácil.

También pudiera ser que .NET ya tenga eso encapsulado pero hasta ahí no llego...

Saludos.

Primero gracias a ambos (especialmente a knossos, siempre tan rápido cuando pregunto )

respecto a hal ... precisamente, al principio, hemos intentado algo parecido, pero cuando se producía el evento "completado", el archivo aún estaba en uso (hasta que muriera el evento) ... nada que hacer.

knossos, resulta que getattributes siempre nos devuelve "archive" y al final ocurre igual que si no hicieramos la comprobación ... no obstante, seguiremos investigando por ahí (si tenemos tiempo), pero ya lo dejaremos para el Lunes

... y ya que os habéis molestado en responder; lo que intentamos hacer es generar un pdf, enviarlo por mail y eliminarlo cuando ya ha sido enviado

Un saludo desde Soria.

¿Quieres decir que tenías un Thread llamado digamos "EnviarMail", usabáis algo parecido a WaitForSingleObject y al salir el archivo seguía en uso???
Es que me parece raro, intuitivamente debe funcionar, aunque bueno, a lo mejor me faltan conocimientos y me sobra intuición... jaja. Y sin a lo mejor.
Si encuentras una solución de las elegantes me encantaría que lo postearas.
Saludos.

Jeje, entiendo lo que quieres hacer...

Yo estoy en algo parecido: estoy con un archivo tipo TXT y...en determinado momento necesito comprimirlo a zip y enviarlo.

La verdad, cuando el Email termina de trabajar (me retorna el control) ... a no ser que tenga mal escrito el destino de la cuenta de correo...o que le haya errado en algo, el email llega sin problemas.

Creo que lo que...tal vez y es una simple opinion...deberíais hacer es hacer una copia de seguridad de TODO lo que enviéis (luego la vais eliminando o lo que querrais cada cierto tiempo) y eilminar directamente el archivo al terminar de enviarlo...

La verdad, estoy enviando cientos y cientos de archivos al día y...al menos en este primer mes que llevo trabajando en este proyecto, no se nos ha perdido ninguno (salvo algún error humano al escribir la cuenta de correos).

Luego hemos hecho una función que ...al recibir el email del otro lado, nos retorna el nombre de/los archivo(s) que han llegado, la fecha y el tamaño. Cuando lo reenviamos al que ha echo el envío, éste "limpia" los archivos de las copias de seguridad y con eso nos aseguramos de que el archivo ha llegado bien a su destino.

Claro que la informática no es una ciencia Exacta...pero al menos de esta forma es como lo he resuelto yo.

Un abrazo desde España.