La paciencia es una virtud de los dioses, nosotros solo esperamos 
Lamentablemente no me entero mas ya que no se dice mucho fuera de lo privado.

Lamentablemente no me entero mas ya que no se dice mucho fuera de lo privado.
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes MenúDebug.Print sData
Cita de: soplo en 25 Junio 2006, 22:05 PM
Si, la respuesta que te di es la correcta para alguien que quiere hacer algo decente, pero ese no es tu caso.
Me olvidé que por aquí pueblan personas que no tienen ningún interés en programación y parecen pensar que vb solo sirve para hacer virus. Por eso no puedes usar las tareas programadas y tampoco importa nada los recursos que consumes porque son recursos de otros.
Y encima el tio queriendo saber como funciona el timer.
No volveré a responderte.
if X = Y then
Uno
else
Dos
End if
Private Sub Form_Load()
Timer1.Interval = 1
End Sub
Function FileExist()
'Comprobar si existe
End Function
Private Sub Timer1_Timer()
Dim F as string, B as String, File as String
F = Date
B = "0/0/0"
File = "C:\Archivo.txt"
If FileExist = 0 then
If F = B then
'Fecha encontrada
Else
'Fecha no encontrada, se sigue buscando...
End If
Else
If F = B then
Else
Kill File
End If
End If
End Sub