Sujet Précédent Sujet Suivant

Vbscript probleme avec fonction mid

william the new Messages postés 27 Date d'inscription mercredi 25 février 2004 Statut Membre Dernière intervention 24 juillet 2007 - 15 avril 2004 à 12:11
bubble44 Messages postés 200 Date d'inscription lundi 10 mars 2003 Statut Membre Dernière intervention 3 août 2004 - 15 avril 2004 à 13:10

voila le code que j'ai rentré
sub verif
dim longueur
dim nom
dim a
dim i

a=""
nom=txt_nom
if IsEmpty(nom) then
msgbox "veuillez saisir votre nom"
exit sub
end if
longueur=len(nom)
for i = 0 to longueur
a= Mid(nom,i,1)
if IsNumeric(a)then
msgbox "veuillez ne pas entrer de valeur numérique"
txt_mon=""
exit sub
else msgbox "vous avez saisie une valeur correcte"
end if
next
end sub

et la il me dit
erreur d'execution microsoft vbscript: argument ou procédure d'appel incorect:'Mid'

et je ne trouve pas l'erreur
merci

A voir également:

Vbs mid
Msgbox vbs - Conseils pratiques -Visual Basic / VB.NET
Mid() vba - Forum Visual Basic
Vbs to exe - Forum VBScript (VBS)
Vb6 mid ✓ - Forum Visual Basic
Mid vba - Forum Visual Basic

1 réponse

Réponse 1 / 1

bubble44 Messages postés 200 Date d'inscription lundi 10 mars 2003 Statut Membre Dernière intervention 3 août 2004
15 avril 2004 à 13:10

for i = 1 to longueur

Discussions similaires

Fonction mid() excel vba

fonction MID : projet ou bibliothèque introuvable

Quelle est la différence entre "Mid" et "Mid$" ?

Projet ou bibliothèque introuvable pour fonction Mid

Fonction Mid en VBA Excel