Le vbs ?? – part iii: travailler sur des données string (texte)

Description

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 d’une 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(“J’aime le steak”,6)

Renverra « J’aime » 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 d’ailleurs à la même syntaxe) permet de renvoyer NB caractères à partir de la droite de la variable Texte
RIGHT(“J’aime 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(“J’aime le steak”,7,2)

II] Apprendre à rechercher un bout de texte dans un autre bout de texte

C’est 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 l’on connaît pour le moment c’est 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 s’effectue la recherche
STR2 : La chaîne à rechercher
Comparaison : Le type de comparaison : Binaire (0), de Texte (1), de données issues d’une base de donnée (2)

<%
Dim APos
Apos=INSTR(1, « vbtom@free.fr », « @ »)
%>

Apos aura la valeur 6 pour cet exemple.
Maintenant que l’on 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 d’un chaîne de caratère

Pour renvoyer la longueur d’un 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.

Codes Sources

A voir également

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.