Simuler des paramètres optionnels de fonction

Signaler
Messages postés
4
Date d'inscription
mardi 16 juillet 2002
Statut
Membre
Dernière intervention
2 avril 2003
-
Messages postés
42
Date d'inscription
samedi 24 août 2002
Statut
Membre
Dernière intervention
3 octobre 2005
-
Salut à tous!

Souhaitez moi la bienvenue, je suis un nouveau! :big)
Pour ma première participation, j'ai un pbm un peu delicat.
Je sais que les paramètres optionnel n'existe pas en VBScript.
Mais je souhaiterai simuler le mecanisme avec une fonction (qui est à l'interieur d'une classe, je precise au cas ou ca change quelque chose), un peu comme on peu le faire en JavaScript avec les variables argc et argV.

Quelqu'un aurai une idee???

----
Kenos!

1 réponse

Messages postés
42
Date d'inscription
samedi 24 août 2002
Statut
Membre
Dernière intervention
3 octobre 2005

Bienvenue!

Une solution simple et élégante ;o) à ton problème et de simuler le mode de fonctionnement de javascript ( arguments ) et du c ( argv ) en utilisant un tableau pour passer les paramêtres optionnels.

Voici un exemple :

function testArgumentOptionnel( v1 , argv )
dim v
Response.Write "testArgumentOptionnel : " & v1 & "
"
Response.Write " Nb d'arguments optionnels : " & ( ubound( argv ) + 1 ) & "
"

for each v in argv
Response.Write " - argument optionnel : " if not vartype( v ) 10 then 'si il y a un "trou" dans le tableau, vartype( v ) 10 (vbError)
Response.Write v
end if
Response.Write "
"
next
Response.Write "

"
end function

call testArgumentOptionnel( "Rien en option" , array() )
call testArgumentOptionnel( "1 valeur en option" , array( 1 ) )
call testArgumentOptionnel( "10 valeur en option" , array( 1 , 2 , 3 , 4 , 5 , 6 , 7 , 8 , 9 , 10 ) )
call testArgumentOptionnel( "4 valeur en option ( avec des trous )" , array( 1 , 2 , , 4 ) )

Voilà,

Pascal