Bonjour tlm
 
Je sèche sur le retour d'une fonction que je suis en train de faire.
Sur le principe :
Je lui envoie une chaine,
Si elle contient un point-virgule, il l'enlève
sinon, il me renvoie la chaine telle qu'elle est
 
j'ai fait ca :
Function TraiteChc(chaine)
 if inStr(chaine,";" )>1 then
  chaine=replace(chaine,";","" )
 else
  chaine=chaine
 end if
End Function
 
et à l'appel, je fait
cli=traitechc(machaine)
 
Merci de m'aider.

si c du VB je crois que tu dois mettre avant ton end function qqchose comme
nomdetafonction=valeurderetour
donc
TraiteChc=chaine dans ton cas je crois

oh la la...
 
Deja, ta déclaration de fonction est fausse, tu oublies de préciser la valeur de retour :
 
Function TraiteChc(chaine As String) As String
 
Ensuite, tu ne renvoies rien du tout dans ta fonction. En VB, la variable représentant la valeur de retour est le nom de ta fonction.
 
A la fin de ta fonction, tu rajoutes cette ligne :
 
TraiteChc = chaine
 
EDIT: le paramètre n'était meme pas déclaré non plus

Excusez, j'ai oublié de préciser que c'était un VBscript simple, un ".vbs" que je lance dans l'explorateur.
Je vais tenter le  "As String"
 
Merci

"As string" ne fonctionne pas
 
"traitechc=chaine" nonplus
 
Mon problème, c'est que ma fonction ne renvoie rien...
J'ai rien à la place de "cli" (dans un fichier csv, cli n'apparait pas dans la séquence  
nom-prenom-cli-age, j'ai : "nom;prenom;;age"  )

Oups, je me suis trompé
 
traitechc=chaine fonctionne
 
Merci à tous.
 
@+

bien sur que ça fonctionne ! depuis quand je refile des infos bidon ??    
 
par contre, ça ne te dispense pas de rajouter les As String...

Harkonnen a écrit a écrit : bien sur que ça fonctionne ! depuis quand je refile des infos bidon ??

he oh et moi je sens le paté?

greg@freestarthu a écrit a écrit :   he oh et moi je sens le paté?

ben en fait, je viens juste de voir ton message car tu l'as posté pendant que je saisissais le mien    
 
je rectifie :  
 
Bien sur que ça fonctionne !! Depuis quand greg et moi nous refilons des infos bidon ?