Script VBS + fonction REPLACE

Résolu
sanchem Messages postés 19 Date d'inscription mardi 4 août 2009 Statut Membre Dernière intervention 26 mars 2012 - 30 nov. 2011 à 16:22
sanchem Messages postés 19 Date d'inscription mardi 4 août 2009 Statut Membre Dernière intervention 26 mars 2012 - 30 nov. 2011 à 16:42
Bonjour,

J'ai un script VBS qui contient la ligne suivante :
document=(Replace(LeTexte(i),";999;",";TER;"))


Dans le script, elle permet de remplacer tous les ;999; par ;TER; et ça fonctionne très bien.

Ce que je voudrais faire, c'est modifier cette fonction pour que le script remplace tous les ;999; en ;TER; pour les ;999; en position 1 pour chacune de mes lignes.

J'ai bien essayé :
document=(Replace(LeTexte(i),";999;",";TER;,1"))
(1 pour l'option start) ou
document=(Replace(LeTexte(i),";999;",";TER;,1,5"))
(5 pour ajouter une longueur)

Mais ça ne fonctionne pas.

Est-ce que quelqu'un saurait comment faire ?
NB : cela parait simple, mais j'ai parcouru le net et n'ai rien trouvé permettant de résoudre mon problème.

Merci par avance.

3 réponses

ucfoutu Messages postés 18038 Date d'inscription lundi 7 décembre 2009 Statut Modérateur Dernière intervention 11 avril 2018 219
30 nov. 2011 à 16:30
j'ai parcouru le net et n'ai rien trouvé permettant de résoudre mon problème


Ah ?
On trouve une "flopée + 15" liens/articles/tutos, pourtant !
en voilà un, entre des centaines

____________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches d'autres forumeurs.
Pas d'aide en ligne installée ? ==> ne comptez pas sur moi pour simplement vous dire ce qu'elle contient
3
ucfoutu Messages postés 18038 Date d'inscription lundi 7 décembre 2009 Statut Modérateur Dernière intervention 11 avril 2018 219
30 nov. 2011 à 16:36
A moins que ton problème ne soit pas l'utilisation de la fonction Replace, mais celui de lire une par une toutes les lignes d'un texte (à préciser).
Et si tel était le cas : discussion dont ni le titre ni les explications ne correspondent au vrai problème !


____________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches d'autres forumeurs.
Pas d'aide en ligne installée ? ==> ne comptez pas sur moi pour simplement vous dire ce qu'elle contient
3
sanchem Messages postés 19 Date d'inscription mardi 4 août 2009 Statut Membre Dernière intervention 26 mars 2012 2
30 nov. 2011 à 16:42
Merci pour la réponse,

Dans ton lien c'est très bien expliqué et ça m'a permis de résoudre ce problème.
Il suffisait de :
document=(Replace(LeTexte(i),";999;",";TER;,1,1"))


J'avoue c'est de ma faute, j'ai fait le tri sur les sites en français.

Encore merci pour tout.
0