Ver Mensaje Individual
  #6 (permalink)  
Antiguo 27/05/2008, 14:01
Avatar de David
David
Moderador
 
Fecha de Ingreso: abril-2005
Ubicación: In this planet
Mensajes: 15.720
Antigüedad: 19 años, 1 mes
Puntos: 839
Respuesta: Controlar que un archivo llegue cada 10 minutos

Cita:
Iniciado por SeNdEr2003 Ver Mensaje
si, ese es mi drama, el archivo debe ser el mismo siempre, de ultima podria crear un backup pero ni idea como hacerlo...
A lo que me refiero es que cuando el programa finalmente compruebe que el archivo ha llegado, lo copie a otra parte, para que así la próxima vez que compruebe no compruebe el archivo anterior sino el que acaba de llegar, no sé si entiendes lo que quiero decir.

El código sería más o menos:
Código:
 
Private Sub Timer1_Timer()
'Aquí debes escribir el Código para que sólo se ejecute cada 10 minutos
If Dir("C:\Archivo.txt", vbArchive) = "" Then
     MsgBox "El Archivo no ha llegado", vbCritical
Else
     MsgBox "El Archivo ha llegado", vbInformation
     'Copiar Archivo.txt a Archivo (2).txt
     FileCopy "C:\Archivo.txt", "C:\Archivo (2).txt"
     'Eliminar Archivo.txt
     Kill "C:\Archivo.txt
End If
End Sub
No puse el código para que se ejecute cada 10 minutos, si tienes problemas con eso, me avisas.
__________________
Por favor, antes de preguntar, revisa la Guía para realizar preguntas.