Demande de conseils

Résolu
cs_Julien39 Messages postés 6414 Date d'inscription mardi 8 mars 2005 Statut Modérateur Dernière intervention 29 juillet 2020 - 11 avril 2005 à 19:14
cboulas Messages postés 2641 Date d'inscription mercredi 2 juin 2004 Statut Membre Dernière intervention 8 janvier 2014 - 11 avril 2005 à 21:46
Je voudrais inserer un lien vers un site internet dans un programme en Visual Basic Et je ne sais absolument pas comment faire. Merci d'avance

3 réponses

cs_Jack Messages postés 14006 Date d'inscription samedi 29 décembre 2001 Statut Modérateur Dernière intervention 28 août 2015 79
11 avril 2005 à 19:34
Salut
Sujet moultes fois abordé sur le forum.
Il suffit d'utiliser l'api ShellExecute :

Dans la partie Déclaration de ta forme :
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Quand tu as besoin de lancer l'url :
Call ShellExecute(Me.hwnd, "open", "http://www.monSite.fr", "", "", &h0)

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Le savoir est la seule matière qui s'accroit quand on la partage. (Socrate)
3
cs_MasterHack Messages postés 586 Date d'inscription jeudi 18 septembre 2003 Statut Membre Dernière intervention 13 février 2008 2
11 avril 2005 à 19:47
une autre petite solution est de faire
shell "iexplore.exe url_du_site"
si tu utilises d'autre navigateur que Internet explorer remplace le dans le code.
N.B:la solution de Jack est sure a 100% tu peux l'utiliser ça lance meme le navigateur par defaut.
bonne continuation.


<HR>

Life is short...Learn more
Copy Rights <> Rights to Copy
0
cboulas Messages postés 2641 Date d'inscription mercredi 2 juin 2004 Statut Membre Dernière intervention 8 janvier 2014 16
11 avril 2005 à 21:46
Une dernière solutions mais valide que sous VB.Net, c'est d'utiliser l'objet : LabelLink


Chris...
Web : Firstruner - eMail : [mailto:support@firstruner.com Support]&nbs
0
Rejoignez-nous