OVH Cloud OVH Cloud

champ email automatique dans Access

3 réponses
Avatar
oliviedu
Bonjour,

comment faire pour qu'un champs que l'on renseigne avec une adresse email
lance directement outlook quand on click sur cette adresse ?

Avec le type hypertexte, Access essaye d'ouvrir www.nom@hébergeur.com et
bien sur il échoue !

D'avance Merci

--
Utilisant M2, le client e-mail révolutionnaire d'Opera :
http://www.opera.com/

3 réponses

Avatar
Raymond [mvp]
Bonjour.

Il faut que ton contenu commence par mailto:
mailto: par exemple
si le champ ne contient pas mailto:, access lance une adresse internet avec
le contenu.

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"oliviedu" a écrit dans le message de
news:
Bonjour,

comment faire pour qu'un champs que l'on renseigne avec une adresse email
lance directement outlook quand on click sur cette adresse ?

Avec le type hypertexte, Access essaye d'ouvrir ébergeur.com et
bien sur il échoue !

D'avance Merci

--
Utilisant M2, le client e-mail révolutionnaire d'Opera :
http://www.opera.com/


Avatar
oliviedu
Bonjour Raymond ,

merci de cette réponse détaillée.

Comment faire donc pour que la saisie "" soit remplacée
par "mailto:" dans le champs, après validation par
passage au champ suivant (click ou tab) ?

Je supose avec le format ou le défaut, mais je n'arrive pas.




Le Tue, 27 Jan 2004 10:01:40 +0100, Raymond [mvp]
a écrit:

Bonjour.

Il faut que ton contenu commence par mailto:
mailto: par exemple
si le champ ne contient pas mailto:, access lance une adresse internet
avec
le contenu.





--
Utilisant M2, le client e-mail révolutionnaire d'Opera :
http://www.opera.com/

Avatar
Raymond [mvp]
Il ne faut pas faire comme ça.
ton adresse tu la places dans un champ texte et non hypertexte ( nommé hyper
par exemple). à côté de ce champ tu places un bouton (commande22 par
exemple)
sur l'evénement clic de ce bouton tu indiques la procédure suivante:

Dim HLK As Hyperlink
Set HLK = Commande22.Hyperlink
If InStr(1, Me.hyper, "@") <> 0 Then
HLK.Address = "mailto:" & Me.hyper
Else
HLK.Address = Me.hyper
End If
Set HLK = Nothing
ce qui aura pour avantage de mettre dans ton champ, une adresse mail ou une
adresse d'un site ou tout autre document pouvant être atteint par un lien
hypertexte. ce qui sera aussi plus facile pour les modifs et les saisies
d'adresses.

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"oliviedu" a écrit dans le message de
news:
Bonjour Raymond ,

merci de cette réponse détaillée.

Comment faire donc pour que la saisie "" soit remplacée
par "mailto:" dans le champs, après validation par
passage au champ suivant (click ou tab) ?

Je supose avec le format ou le défaut, mais je n'arrive pas.