Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: Rhuarc en 28 Julio 2005, 11:12 am



Título: Problemas con ficheros.
Publicado por: Rhuarc en 28 Julio 2005, 11:12 am
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...


Título: Re: Problemas con ficheros.
Publicado por: Rhuarc en 28 Julio 2005, 13:16 pm
Yo me lo guiso y yo me lo como... lo encontré!!!

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


Título: Re: Problemas con ficheros.
Publicado por: Slasher-K en 29 Julio 2005, 00:39 am
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:
            Dim hFile%

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

'Usar el archivo...
'

Close #hFile

Saludos.