test if et goto

test if et goto - VB/VBA/VBS - Programmation

Marsh Posté le 17-10-2004 à 11:29:13    

salut a tous voila je voudrai faire un pti prog en vbs avec un imputbox et je vroudrai pouvoir tester la valeur de la reponse suivant  un critere bien particulier genre cle windows donc xxxx-xxxx-xxxx-xxxx-xxxx
merci d'avance
hackzor

Reply

Marsh Posté le 17-10-2004 à 11:29:13   

Reply

Marsh Posté le 18-10-2004 à 14:56:36    

c'est quoi la question ?


---------------
"I wonder if the internal negative pressure in self pumping toothpaste tubes is adjusted for different market altitudes." John Carmack
Reply

Marsh Posté le 18-10-2004 à 18:33:05    

je cherche comment tester une valeur inscrite dans un imputbox. concretement c verifier si ca correspond a genre xxxxx-xxxxx-xxxxx-xxxxx-xxxxx

Reply

Marsh Posté le 18-10-2004 à 22:50:51    

if format(replace(chaine, "-", "" ),"####-####-####" ) = chaine then
 
~~~~~~
 
end if
 
 
 
quelque chose dans ce genre là ?

Reply

Marsh Posté le 19-10-2004 à 00:12:02    

merci de ton aide mais ca ne marche pa il me di type incompatible. je vai essayer de rechercher vers ca en tt cas merci couitchy...

Reply

Marsh Posté le 20-10-2004 à 20:49:56    

hackzor a écrit :

merci de ton aide mais ca ne marche pa il me di type incompatible. je vai essayer de rechercher vers ca en tt cas merci couitchy...


 

Code :
  1. dim a as string
  2. a = inputbox("Veuillez tapez un nom ?" )
  3. if a = "xxx.xxx.xxx.xxx" then
  4. msgbox(c'est le bon format)
  5. else
  6. msgbox(c'est le mauvais format)
  7. end if


 
Si tu veux savoir si c'est du numérique ou du caractère qui ressors, cherche du cote des API windows ;)
 

Reply

Marsh Posté le 20-10-2004 à 21:32:29    

ouai merci bcp  
le code ne marche pas mais c pa grave.
je ne connais pa l'api windows mais je vai regarder
si qq1 connais le carractere qui permet de tester la valeur entrer dans la inputbox. parce ke sans ce carractere ton code marche cvb. merci d'avance les gars

Reply

Marsh Posté le 21-10-2004 à 19:01:35    

hackzor a écrit :

ouai merci bcp  
le code ne marche pas mais c pa grave.
je ne connais pa l'api windows mais je vai regarder
si qq1 connais le carractere qui permet de tester la valeur entrer dans la inputbox. parce ke sans ce carractere ton code marche cvb. merci d'avance les gars

s'il marche pas, tu peux convertir la chaine de sortie en chaine de caractère et la tester aprés. Pour les API windows, regarde dans mes liens ou sur www.allapi.net ;)

Reply

Marsh Posté le 21-10-2004 à 19:14:11    

pourquoi tu ne fait pas un test du genre
 
a=inputbox blablablabla
 
if mid$(a,5,1)="-" and mid$(a,10,1)="-" and mid$(a,15,1)="-" and mid$(a,20,1)="-" then blablabla


Message édité par Profil supprimé le 21-10-2004 à 19:14:32
Reply

Marsh Posté le 23-10-2004 à 15:00:28    

bon je me suis debrouiller autrement avec un len(variable) ca marche comme ca. maintenant est ce que c'est possible de faire executer un vbs depuis un batch il me di que le fichier vbs n'est pas reconnu

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed