Discussion :

[Yaone]

Bonjour,

Je voudrais pouvoir lancer une url. J'avais trouvé ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Shell "explorer " & mon_lien

Mais il me l'ouvre sous IE alors que j'aimerais bien qu'il me l'ouvre sur firefox sachant que c'est mon navigateur par défaut.
C'est possible ?

J'ai trouvé une autre solution mais elle ne marche pas chez moi ^^"

[MegaBigBoss]

Quel est cette autre soluce ?

[SfJ5Rpw8]

cherche shellexecute..., j'ai déjà donné le lien vers la FAQ hier..
http://www.developpez.com/upload/dem...n#shellexecute

[Yaone]

Utiliser une api windows je crois :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
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
 
ShellExecute Me.hwnd, vbNullString, mon_lien, "", vbNullString, 1

Mais il me fait une erreur en surlignant .hwnd :

Erreur de compilation:
Membre de méthode ou de données introuvable

[SfJ5Rpw8]

modifie la ligne ..

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ShellExecute 0, "open", "<a href="http://www.developpez.com"," target="_blank">http://www.developpez.com",</a> "", "", 1

[Yaone]

Maintenant, il me met une nouvelle erreur sur ShellExecute :

Sub ou Function non définie

-_-

[SfJ5Rpw8]

Maintenant, il me met une nouvelle erreur sur ShellExecute :



-_-

? tu as bien laissé la ligne de déclaration ..? en haut du module ?

[Yaone]

Bon, en fait, je ne sais pas ce que j'ai fait mais ça marche maintenant.
(pas tout compris mais bon)