OVH Cloud OVH Cloud

lien internet

7 réponses
Avatar
seb-seb
bonjour
je voudrais faire un texte qui quand on clic dessus ca ouvre une page web
et un autre pour envoyer un email par outlook
en precisant à objet et un bout du texte par defaut
merci bien

7 réponses

Avatar
Thierry M.
seb-seb écrivait:

je voudrais faire un texte qui quand on clic dessus ca ouvre une page web
et un autre pour envoyer un email par outlook
en precisant à objet et un bout du texte par defaut
merci bien



faut charger un controle utilisateur hyperlien.ctl
et le poser dans la feuille qui doit faire l'appel et poser
par exemple sur un contrôle Label_Click:
Hyperlien1.HyperLink.NavigateTo "http://gnagnagna"
ou pour un email
Hyperlien1.HyperLink.NavigateTo "mailto:email?subject=gnignigni"
et pour faire joli, une icone et un changement de couleur
sur l'évènement MouseMove

--
Thierry
Avatar
seb-seb
bien le merci


"Thierry M." a écrit dans le message de
news:
seb-seb écrivait:

> je voudrais faire un texte qui quand on clic dessus ca ouvre une page


web
> et un autre pour envoyer un email par outlook
> en precisant à objet et un bout du texte par defaut
> merci bien

faut charger un controle utilisateur hyperlien.ctl
et le poser dans la feuille qui doit faire l'appel et poser
par exemple sur un contrôle Label_Click:
Hyperlien1.HyperLink.NavigateTo "http://gnagnagna"
ou pour un email
Hyperlien1.HyperLink.NavigateTo "mailto:email?subject=gnignigni"
et pour faire joli, une icone et un changement de couleur
sur l'évènement MouseMove

--
Thierry



Avatar
François Picalausa
Bonjour/Soir,

Tu peux consulter la fiche suivante de la faq:
http://faq.vb.free.fr/index.php?question4

--
François Picalausa (MVP VB)
FAQ VB : http://faq.vb.free.fr
MSDN : http://msdn.microsoft.com


"seb-seb" a écrit dans le message de
news:%
bonjour
je voudrais faire un texte qui quand on clic dessus ca ouvre une page
web et un autre pour envoyer un email par outlook
en precisant à objet et un bout du texte par defaut
merci bien


Avatar
Thierry M.
François Picalausa écrivait:

Bonjour/Soir,

Tu peux consulter la fiche suivante de la faq:
http://faq.vb.free.fr/index.php?question4



t'ain ce que vous êtes compliqués :)

un autre grrr ????

:)))))))))))))))))))))))))))

--
Thierry qui fait dans l'Api aussi, sisi
faut pas croire :)))))
Avatar
François Picalausa
Bonjour/soir,

Si tu veux, grrrrrrr :-)

Mais personellement, en créant un usercontrol du nome de Hyperlien, avec un
contrôle sur ma feuille de nom HL1 et le Code:
Label1_Click
HL1.Hyperlink.NavigateTo "http://faq.vb.free.fr"

J'arrive au résultat:
---------------------------
Microsoft Visual Basic
---------------------------
Compile error:

Method or data member not found
---------------------------
OK Aide
---------------------------

Sur Hyperlink...
Donc, il faut implémenter Hyperlink :-(
(pourtant dans ton post c'est pas ce que j'avais compris :-P )

Avec un peu de réflexion, je suis arrivé au code suivant:
'Dans le UserControl
Public Sub Label1_Click()
UserControl.Hyperlink.NavigateTo Address
'Et non Hyperlien1 qui m'avait trompé!
End Sub

Compter à celà qu'il faut permettre à l'utilisateur de changer les
propriétés du label comme Font, back color, une propriété address (pour que
le contrôle puisse être réutilisable) et on se demande vite où est la
simplicité si on veut bien le faire et stoquer les propriétés dans le
property bag...
Je sais, y a l'assistant qui tape les trois quart du code pour toi mais
alors, une fonction basée sur shellExecute ira aussi vite à coder ;-)
(j'ai aussi souvent expérimenté que le usercontrol prenait nettement plus de
temps de chargement et de place en mémoire qu'un label...)

Je ne pense pas qu'une solution soit vraiment plus compliquée que l'autre...
mais tu peux écrire à Pierre Alexis qui gère la faq pour proposer ta
solution (http://faq.vb.free.fr/index.php?page=2)!

--
François Picalausa (MVP VB)
FAQ VB : http://faq.vb.free.fr
MSDN : http://msdn.microsoft.com


"Thierry M." a écrit dans le message de
news:
François Picalausa écrivait:

Bonjour/Soir,

Tu peux consulter la fiche suivante de la faq:
http://faq.vb.free.fr/index.php?question4



t'ain ce que vous êtes compliqués :)

un autre grrr ????

:)))))))))))))))))))))))))))


Avatar
ng
Etrange ce controle...

--
Nicolas.

Les outils indispensables :

FAQ VB : http://faq.vb.free.fr
API Guide : http://www.allapi.net
Google Groups : http://groups.google.fr/
MZ-Tools : http://www.mztools.com/

Merci de répondre sur le groupe pour en faire profiter tout le monde.
"Thierry M." a écrit dans le message de news:

François Picalausa écrivait:

> Si tu veux, grrrrrrr :-)

suffit de le charger (ajouter/controle utilisateur/existant)
le coller sur une feuille à partir de la barre d'outils
et de mettre les trois mots d'appels sur un objet_click
Hyperlien1.HyperLink.NavigateTo "http://gnagnagna"
ou pour un email
Hyperlien1.HyperLink.NavigateTo "mailto:email?subject=gnignigni"
ou Hyperlien1 est évidemment le nom du contrôle
collé dans une feuille puis voila hein ...

je compte 3 clicks et trois mots quoi ...

grrr grrr ?

--
Thierry MARTIN
Forums Réunion (dont parapente)
http://ardf.free.fr/forums/



Avatar
François Picalausa
Bonjour/soir,

grrr grrr si tu veux aussi... mais je préfère personellement
BASSSTTTOOONNNNNN! :-)

Sinon, en joignant le contrôle, ça fait la différence, effectivement :-)
Par contre, il faudra toujours ajouter le label et le label_click.. donc, tu
remplace une API (qui pourra être utilisée qu'il vente ou qu'il pleuve) par
un usercontrol (qui nécéssite la pose sur une form)...
hmmm....
Les deux solutions ont des avantages et des inconvénients.. propose donc un
ajout à l'article de la faq!

--
François Picalausa (MVP VB)
FAQ VB : http://faq.vb.free.fr
MSDN : http://msdn.microsoft.com


"Thierry M." a écrit dans le message de
news:
François Picalausa écrivait:

Si tu veux, grrrrrrr :-)



suffit de le charger (ajouter/controle utilisateur/existant)
le coller sur une feuille à partir de la barre d'outils
et de mettre les trois mots d'appels sur un objet_click
Hyperlien1.HyperLink.NavigateTo "http://gnagnagna"
ou pour un email
Hyperlien1.HyperLink.NavigateTo "mailto:email?subject=gnignigni"
ou Hyperlien1 est évidemment le nom du contrôle
collé dans une feuille puis voila hein ...

je compte 3 clicks et trois mots quoi ...

grrr grrr ?