Maintenant que vous comprenez le fonctionnement du VBS je vais vous apprendre les fonctions de base pour manier du texte dans un programme
I] Renvoyer une certaine partie de la variable texte
Admettons que vous vouliez renvoyer les 6 premières lettres dune variable texte, nous allons employer la fonction « LEFT » qui a la syntaxe suivante :
LEFT(TEXTE,NB)
Texte est le texte ou la variable dans laquelle nous travaillons
NB est le nombre de lettre à partir de la gauche que nous gardons
La ligne suivante :
LEFT(Jaime le steak,6)
Renverra « Jaime » parce que cette fonction renverra les 6premières lettres du texte ou de la variable passé en argument
Une autre fonction du même type (qui dailleurs à la même syntaxe) permet de renvoyer NB caractères à partir de la droite de la variable Texte
RIGHT(Jaime le steak,5)
Renverra « steak »
Maintenant si vous ne voulez relevez que le mot « le » dans ce texte vous ne pouvez pas exploiter les deux fonctions précédentes donc vous devez utiliser la fonction Lid :
MID(TEXTE,NBS,NBL)
La fonction Mid renvoie les caractères du caractère NBS sur une longueur de NBL caractères
Pour renvoyer le mot « le » on utilisera la fonction comme ceci :
MID(Jaime le steak,7,2)
II] Apprendre à rechercher un bout de texte dans un autre bout de texte
Cest bien beau de savoir renvoyer une partie du texte en connaissant ça longueur et tout et tout
Mais faut faire mieux
Exemple :
Dans votre programme vous allez devoir récupérer le nom qui se trouve avant le « @ » dans une adresse Email
Avec ce que lon connaît pour le moment cest impossible puisque la longueur de la chaîne de caractères variera tout le temps.
Solution :
Il suffit de connaître la position du « @ » comme ça on peut utiliser la fonction « LEFT ».
Pour rechercher une chaîne de caractère une fonction existe :
« INSTR »
La fonction à la syntaxe suivante :
INSTR([Start],STR1,STR2,[Comparaison])
Start(facultatif) : Position à laquelle débute la recherche
STR1 : La chaîne dans laquelle seffectue la recherche
STR2 : La chaîne à rechercher
Comparaison : Le type de comparaison : Binaire (0), de Texte (1), de données issues dune base de donnée (2)
<%
Dim APos
Apos=INSTR(1, « vbtom@free.fr », « @ »)
%>
Apos aura la valeur 6 pour cet exemple.
Maintenant que lon connaît la position du « @ » on peut utiliser la fonction LEFT :
<%
Dim NameBeforeA
NameBeforeA=LEFT(APos)
%>
NameBeforeA aura la valeur vbtom pour cet exemple.
III] La casse dans une variable texte
Pour mettre en majuscule ou minuscule du texte on utilisera les fonctions UCASE (pour mettre en majuscule) et LCASE (pour mettre en minuscule)
UCASE(« thomas »)
Donnera « THOMAS »
IV] La longueur dun chaîne de caratère
Pour renvoyer la longueur dun chaîne de caratère on utilisera la fonction LEN
LEN(« thomas »)
Renverra « 6 »
Source / Exemple :
[IN THE ZIP >> TUTORIAL au format word(.doc) >> 6ko]
Conclusion :
A#
vBt0m.
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.