OVH Cloud OVH Cloud

Opérations sur données texte

4 réponses
Avatar
toto
Bonjour à tous...

J'aimerais savoir comment, en vbscript, on peut extraire juste la partie
"domaine" d'un mail dans une chîne de caractères.

Je m'explique, j'ai besoin de modifier le domaine "mail" à la suite d'un
changement de provider. J'ai déjà trouver le moyen de lire les
paramètres smtp et pop, et de les modifier, mais maintenant, j'ai besoin
de remplacer le domaine dans l'adresse de retour.

Exemple, toto@mondom.com deviendrais toto@monnouveaudom.com

merci

4 réponses

Avatar
Boss Hog
Salut regarde la fonction MID dans la doc VBScript

@+
Boss Hog
"toto" wrote in message
news:
Bonjour à tous...

J'aimerais savoir comment, en vbscript, on peut extraire juste la partie
"domaine" d'un mail dans une chîne de caractères.

Je m'explique, j'ai besoin de modifier le domaine "mail" à la suite d'un
changement de provider. J'ai déjà trouver le moyen de lire les
paramètres smtp et pop, et de les modifier, mais maintenant, j'ai besoin
de remplacer le domaine dans l'adresse de retour.

Exemple, deviendrais

merci


Avatar
dsqf
Première méthode :

OldMail = ""
NewMail = Replace(OldMail, "wanadoo.fr", "free.fr")


Deuxième méthode :

OldMail = ""

' Recherche la position de l'arobase
pos = InStr(OldMail, "@")

' Isole le nom d'utilisateur et le nom de domaine
user = Left(OldMail, pos - 1)
domain = Right(OldMail, Len(OldMail) - pos)

' Définit le nouveau mail
NewMail = user & "@free.fr"



"toto" wrote:

Bonjour à tous...

J'aimerais savoir comment, en vbscript, on peut extraire juste la partie
"domaine" d'un mail dans une chîne de caractères.

Je m'explique, j'ai besoin de modifier le domaine "mail" à la suite d'un
changement de provider. J'ai déjà trouver le moyen de lire les
paramètres smtp et pop, et de les modifier, mais maintenant, j'ai besoin
de remplacer le domaine dans l'adresse de retour.

Exemple, deviendrais

merci



Avatar
toto
Merci pour vos réponses, voici ce que j'ai fait :

dim a,nom,domaine
a=split(emailAddress,"@")
nom=a(0)
domaine=a(1)
WshShell.RegWrite p & "SMTP Email Address",nom & "@" &
"new_domaine.fr","REG_SZ"

Si cela peux servir à d'autres,
A tchao

toto wrote:
Bonjour à tous...

J'aimerais savoir comment, en vbscript, on peut extraire juste la partie
"domaine" d'un mail dans une chîne de caractères.

Je m'explique, j'ai besoin de modifier le domaine "mail" à la suite d'un
changement de provider. J'ai déjà trouver le moyen de lire les
paramètres smtp et pop, et de les modifier, mais maintenant, j'ai besoin
de remplacer le domaine dans l'adresse de retour.

Exemple, deviendrais

merci


Avatar
Boss Hog
Salut,
c'est une solution propre, tu peut meme ajouter situ veut
a=split(emailAddress,"@")
a(1) = "new_domaine.fr"

mailadresse = Join(a,"@")

WshShell.RegWrite p & "SMTP Email Address", mailadresse,"REG_SZ"


ce qui revient au meme que ce que tu à déjà fait.

@+
Boss Hog

"toto" wrote in message
news:
Merci pour vos réponses, voici ce que j'ai fait :

dim a,nom,domaine
a=split(emailAddress,"@")
nom=a(0)
domaine=a(1)
WshShell.RegWrite p & "SMTP Email Address",nom & "@" &
"new_domaine.fr","REG_SZ"

Si cela peux servir à d'autres,
A tchao

toto wrote:
Bonjour à tous...

J'aimerais savoir comment, en vbscript, on peut extraire juste la partie
"domaine" d'un mail dans une chîne de caractères.

Je m'explique, j'ai besoin de modifier le domaine "mail" à la suite d'un
changement de provider. J'ai déjà trouver le moyen de lire les
paramètres smtp et pop, et de les modifier, mais maintenant, j'ai besoin
de remplacer le domaine dans l'adresse de retour.

Exemple, deviendrais

merci