Foro de elhacker.net

No se que pasa que no funciona este codigo:


Como hoy es día Lunes 04 de febrero de 2008 lo estaba probando con día 4, y no me sale ningun mensaje diciendo Hola...
Me gustaría que me dijeran como funciona esto o que estoy haciendo mal.. Gracias!

intenta hacer esto...

if Day(Now) = 4 then msgbox "hola", ,"hola"

o tambien puedes hacer esto...

id Day(Date) = 4 then msgbox "hola, ,"hola"

o revisa el calendario de tu computadora y fijate que sea el dia que tu colocaste...

Nada.. probe poniendo esto:


No me funciono, puede ser un fallo de VisualBasic??? Tengo el Visual Basic 6.0.8169 Profesional

No lo entiendo...
Un saludo

El if debe de estar cerrado


Saludos

No me va tampoco...

Te sale algún tipo de error??

Porque si no esta saliendo es que la condición no se está cumpliendo


Puedes probar agregando un else para el caso de que no se cumpla la condición  :-\

Estamos hablando de un if básico, debe de salir si o si

Es posible que mi PC tenga algun problema, porque intente hacer el  siguiente comando en batch para comprobar que estuviese bien y me da error:


La foto del error:

(http://i5.photobucket.com/albums/y200/ferlahozseg/sshot-1-3.png)

Sin embargo el reloj de la bandeja del sistema (la fecha de abjo a la derecha) me la da bien y no hay problemas: lunes, 04 de febrero de 2008
Y en la hora: 2:15 (eso ahora mientras escribo...)

Que es lo que le pasa a mi PC???
Voy a probar ese codigo por la mañana en otra PC.. Un saludo!

Perdon, lo estuve haciendo mal lo del batch.. Lo he vuelto a hacer y la tarea programada se ejecuto sin problemas... El codigo que puse fue:


Entonces, que le pasa al pc??

En realidad creo que no hay más vueltas que darle, el code esta bien, así que debe de haber algo más mal

Prueba.....


Solo para comprobar la hora que esta saliendo.

El resto debería de estar bien

No me sale nada!!!!!!!!!!!!!!!!!!!!!!
Directamente aparece la pantall del form, como antes... :-\

a ver haz esto...

private sub Form_Load()
if Day(Now) = 4 then msgbox "hola", ,"hola"
end sub

solo por curiosidad.. coloca 3 y si no funciona coloca 5 a ver que pasa...

if Day(Now) = 3 then msgbox "hola", ,"hola"

if Day(Now) = 5 then msgbox "hola", ,"hola"

BIEN!! Por fin lo consegui, eres un crack! muchisimas gracias.. Pero porque funciono poniendo form_load y no con lo que me de la gana (payload)...

Haber, el procedimiento Payload es un procedimiento que has creado tu, y si no lo llamas en algun instante no se te va a ejecutar el codigo de dentro. Por casualidad ¿lo has llamado alguna vez? :rolleyes:. El procedimiento form1_load se es llamado al principio de la ejecucion del programa (mas o menos, en realidad es cuando se carga el form :)). Prueba esto y te saldra:
private sub Form_Load()
Payload
end sub
Private Sub Payload()
If Day(Now) = 4 Then MsgBox "Hola"
End Sub
Saludos.

Claro!! No había caído en eso... Muchas gracias!!

Bueno yo lo he creado pero utilizando labels para no teenr l coñazo de los MSgBox esperoque te sirva es bien simple.
Si ya con esto no te sale yo que tu me preocuparía..XD

Este codigo esta mal escrito
Private Sub Payload()
If Day(Now) = 4 Then MsgBox "Hola"
End Sub


Es

Private sub payload()
if day(now) = 4  then
msgbox "hoy  es el dia"
else
msgbox "hoy no es el dia :P ",vbcritial
end if
end sub

no el code esta bien escrito las cosas pueden ser
tu code lo que hace es que si es el dia mostrar el msg hoy es el dia i si no mostrar el msg hoy no es el dia :P el ultimo msg lo mostraria todos los dias que no fueran el dia i el solo quiere que se muestre el msg si es el dia osea el no quiere que todos los dias exepto el 4 muestre un msg que diga hoy no es el dia


pd:una recomendacion lee un manual de vb6

Pueba esto:

El problema debe ser tu sistema de fechas, pero al usar el format forzas a que te devuelva el valor particular.

Private Sub Command1_Click()

If Day(Now) = 4 Then MsgBox "hola"

If Date = "02/04/2008" Or Date = "2/4/2008" Then MsgBox "hola"

End Sub
Te dejo 2 formas que deben de funcionar correctamente en caso de que no lo mejor seria que revisaras la fecha de tu computadora.

Creía que este tema estaba ya cerrado  :rolleyes:. Bueno, para que no haya ninguna confusión, voy a complementar el ultimo comentario de [{O_o}] .
Para que el trabajo con fechas sea correcto, debes declarar la variable tipo date, ya que si no, al meterlo entre comillas, lo considerará una cadena de caracteres (tipo string). Por eso, poniendo
date="2/4/2008", date="02/4/08", etc serán lo mismo....ya que lo trataría como una fecha....en este caso siempre 02/04/2008.
Otra forma de declarar una cadena de caracteres como tipo date es metiendola entre almuadillas (#2/4/2008#). Es preferible declararlo tipo date, ya que cogería nuestro formato de representación de fechas dia/mes/año, y con las almuadillas pilla el americano mes/dia/año.
Saludos.