Shutdown
Publicado por DEViL (10 intervenciones) el 01/06/2001 21:06:18
No se cual es el error de este codigo que escribi para apagar mi maquina...
les muestro
Option Explicit
Public strcom As String
Public temp As Date
Private Sub Form_Load()
temp = InputBox("Ingrese horario de salida", "salida")
temp = CDate(temp)
strcom = "C:\WINDOWS\RUNDLL32.EXE user.exe,ExitWindows"
If temp >= Time Then
Shell strcom
End If
End Sub
Por favor alguien es capaz de marcarme el error?
gracias
les muestro
Option Explicit
Public strcom As String
Public temp As Date
Private Sub Form_Load()
temp = InputBox("Ingrese horario de salida", "salida")
temp = CDate(temp)
strcom = "C:\WINDOWS\RUNDLL32.EXE user.exe,ExitWindows"
If temp >= Time Then
Shell strcom
End If
End Sub
Por favor alguien es capaz de marcarme el error?
gracias
Valora esta pregunta
0