Problemas con ficheros.

[Rhuarc]

Lo primero saludar a todos ya que es la primera vez que escribo en este foro.

Tengo el siguiente problema, estoy haciendo una aplicaci�n que interpreta los datos que otra aplicaci�n escribe en un fichero. Todo funciona bien, pero si abro o cierro la otra aplicaci�n mientras la m�a est� abierta esta se bloquea. No da ning�n error, simplemente comienza a comer CPU y en el Task Manager aparece como bloqueado.

El fichero lo abro como binario para entorpecer lo menos posible a la otra aplicaci�n, meto los datos en una cadena y lo vuelvo a cerrar. �Alguien podr�a darme alguna pista de cual es el problema?

Muchas gracias.

PD: Nada... que parece que todos los lenguajes están preparados para las secciones críticas menos VB...

[Rhuarc]

Yo me lo guiso y yo me lo como... lo encontré!!!

Public Declare Sub EnterCriticalSection Lib "kernel32" (lpCriticalSection As CRITICAL_SECTION)

[Slasher-K]

También podrías bloquear el archivo al abrirlo y así cuando la otra aplicación intente abrirlo le da un error de acceso.

Código [Seleccionar] Expandir


            Dim hFile%

hFile = FreeFile
Open "C:\MyArchivo.ext" For Binary Lock Read Write As #hFile

'Usar el archivo...
'

Close #hFile


Saludos.