Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Sujet : Probleme avec les date [ Algorithme / Divers ] (RAvin)

mardi 18 décembre 2007 à 22:36:03 | Probleme avec les date

RAvin



Bonjour a tous , je me remet a la programmation apres un bon bout de temps et je suis bloqué sur un script VBS.
Je veux qu'a une date présise s'affiche un message mais j'y arrive pas, j'ai essayer avec :

if Day=18 then
Message="on est le 18"
else
Message="on est pas le 18 "
end if


 pourriez vous maider car ca fait 1 h que jessai de parcourir notre chere ami google

mardi 18 décembre 2007 à 23:37:25 | Re : Probleme avec les date

Exploreur

Membre Club
Salut,

Et cela, fonctionne sous .net ?

Private Sub Form_Load()
If Format(Now, "DD") = "18" Then
   MsgBox "on est le 18 !"
Else
   MsgBox "on est pas le 18 !"
End If
End Sub


A+
Exploreur

 Linux a un noyau, Windows un pépin

 


mardi 18 décembre 2007 à 23:39:48 | Re : Probleme avec les date

Exploreur

Membre Club
re,

Voir aussi avec : DatePart("d",Now)

A+
Exploreur

 Linux a un noyau, Windows un pépin

 


mercredi 19 décembre 2007 à 01:05:48 | Re : Probleme avec les date

nord666

Tu peux aussi utiliser:

if now.day = 18 then
   messagebox.show("On est le 18")
else
   messagebox.show("On n'est pas le 18")
End if

mercredi 19 décembre 2007 à 03:48:06 | Re : Probleme avec les date

PCPT

Administrateur CodeS-SourceS
Réponse acceptée !
salut,

et si c'est vraiment du VBS..

function IsDay(iDay)
  IsDay=(day(now)=iDay)
end function

if isday(18) then
  Wscript.echo "on est le 18 !"
else
  Wscript.echo "on est pas le 18 !"
end if



++

Prenez un instant pour répondre à ce sondage svp

mercredi 19 décembre 2007 à 06:17:43 | Re : Probleme avec les date

JMO

Membre Club


 Bonjour à tous,

if Day(Date)=19 then
   Message="on est le 19"
else
   Message="on est pas le 19"
end if

MsgBox Message


jean-marc

mercredi 19 décembre 2007 à 11:39:56 | Re : Probleme avec les date

RAvin



merci pour vos raison tres rapide et efficace, malheuresement j'en ai encore des question. je veu faire la meme chose mais avec des date présise.
Et si ce n'est pas la date de passer a la prochaine ligne comme un goto en batch mais comme vous en doutez je n'y arrive pas.
j'ai essayer ca pour les date


if Date('2007-19-12') then
Message="2007-19-12'"
else
Message="on est pas 2007-19-12' "
end if


et si au passage vous pouvez me dire pk ce code marche pas :

LoadPicture("c:\teste.jpg")


Merci d'avance pour ceux qui prenderons le temps de me repondre :)

mercredi 19 décembre 2007 à 13:04:44 | Re : Probleme avec les date

JMO

Membre Club
Réponse acceptée !


Re,

Pour la date:

madate = "2007-19-12"
madate = Mid(madate,6,2) & "/" & Right(madate,2) & "/" & Left(madate,4)

If Date = CDate(madate) Then
Message="nous sommes le 2007-19-12"
else
Message="on est pas 2007-19-12 "
End If
MsgBox Message



jean-marc

mercredi 19 décembre 2007 à 13:40:18 | Re : Probleme avec les date

RAvin

a merci j'ai limpression de chercher la ou il faut pas ..
 et tu connnais une fonction qui permet daller a la ligne X
par exemple dans  ce cas la

madate = "2007-19-12"
madate = Mid(madate,6,2) & "/" & Right(madate,2) & "/" & Left(madate,4)

madate2 = "2007-20-12"
madate2 = Mid(madate2,6,2) & "/" & Right(madate2,2) & "/" & Left(madate2,4)

If Date = CDate(madate) Then
Message="nous sommes le 2007-19-12"
else
Message="on est pas 2007-19-12 "
End If
MsgBox Message


If Date = CDate(madate2) Then
Message="nous sommes le 2007-20-12"
else
Message="on est pas 2007-20-12 "
End If
MsgBox Message



alors qu'il nous dise on est pas " 2007-19-12 " qu'il passe directement a on est le  "nous sommes le 2007-20-12"

mercredi 19 décembre 2007 à 13:59:33 | Re : Probleme avec les date

PCPT

Administrateur CodeS-SourceS
Réponse acceptée !
moi j'ai l'impression que tu ne cherches pas, tout court!


If Date = CDate(madate) Then
  Message="nous sommes le 2007-19-12"
else
If Date = CDate(madate2) Then
  Message="nous sommes le 2007-20-12"
else
  Message="on est pas 2007-20-12 "
End If

MsgBox Message



++

Prenez un instant pour répondre à ce sondage svp


1 2

Cette discussion est classé dans : date, probleme, if


Répondre à ce message

Sujets en rapport avec ce message

probleme de date (francaise ou anglaise) [ par harbat ] j'ai un probleme au niveau de la date en visual basic , dans certains cas il prend la date sous le format francais, et dans d'autres cas il la prend e probleme urgent avec validite de date [ par tibops ] bonjour, j'ai un gros probleme pour verifier la validite d'une date, genre le 30 fevrier n'existe pas!sans bien sur passer par 100 lignes de codes.dav Pb de compil sur une Date [ par pisko ] salut,Encore un probleme avec les dates mais ce coup ci c'est encore plus bizarre.Une appli developpée sur un poste (Win2K, Access2000, VB6) ne foncti probleme sur le format de date [ par beckham0187 ] jme connect a un base de donnee pick qui a une un format de date interne .Mon format de date vb est "dd/mm/yy", pour lire et ecrire dans la base ,pas Probleme syntaxe ACCESS Via VB [ par Kyler ] Salut voila je fais via VB des requetes SQL sur accessXP et je n'arrive pas a cree un champ Date au format JJ/MM/AAAA ou AAAA/MM/JJ peu importe,j'arri Gros probleme avec Date/heure, merci de m'aider [ par starlight ] Bonjour à tous,Je suis nouveau sur ce forum et j'ai un probleme à la fois sur access et sur VB.J'ai des dates/heures dans deux champs qui sont Date de datagrid probleme avec l'affichage des date avec des heures en bd access [ par novicevb ] J'affiche des données d'une requete et dans mon datagrid, j'ai deux champs date avec des heures, mais il n'affiche que la date.Comment je pourrais fai Probleme excel-date [ par ketu ] Je voudrais savoir commetn on peut comparer deux dates: cest a dire avr-01 et mai-01 par exemple: comment on peut savoir que mai-01 est apres avr-01.V Petit probleme de date avec combobox pour débutant. [ par steve2vince ] Bonjour tout le monde, J'ai un petit soucis, je tiens un fichier excel avec des dates en colonnes (sous la forme jj/mm/yyyy) et que j'ai mis dans une vba probleme de date [ par fernand22fr ] SAlut,je voudrais savoir si il existe un methode du language qui me permette de savoir qu elle est le dernier jour de tel mois,de telle année.Merci a+


Nos sponsors

Sondage...

CalendriCode

Juillet 2009
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
2728293031  

Consulter la suite du CalendriCode

Téléchargements

Logiciels à télécharger sur le même thème :

Comparez les prix Nouvelle version

Photothèque Nouveau !



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,421 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.