Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Développement Développement Visual Basic Internet Explorer

Internet Explorer

3 réponses
Avatar
Michel69
Bonjour à tous,

J'ai une question que vous allez trouver vraiment bête, mais j'ai pas eu
encore à utiliser ça !

Dans VB6, comment fait on afficher une nouvelle tache Internet Explorer (ou
autre navigateur), avec une adresse URL donnée.

Merci !!

Michel
Signaler un problème avec ce contenu

3 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Jean-Marc
"Michel69" a écrit dans le message de
news:%
Bonjour à tous,

J'ai une question que vous allez trouver vraiment bête, mais j'ai pas


eu
encore à utiliser ça !

Dans VB6, comment fait on afficher une nouvelle tache Internet


Explorer (ou
autre navigateur), avec une adresse URL donnée.




Hello,

il existe plein de façons, en voici une extrèmement simple:

Private Sub Command1_Click()
Dim s As String

s = "explorer.exe http://myjmnhome.dyndns.org"

Shell (s)
End Sub

--
Jean-marc
Tester mon serveur (VB6) => http://myjmnhome.dyndns.org
"There are only 10 kind of people
those who understand binary and those who don't."
mailto: remove '_no_spam_' ;
Avatar
Michel69
Merci.... bon sang mais c'est bien sur !!

ça marche quel que soit le navigateur du client ????


"Jean-Marc" a écrit dans le message de news:
43eb842d$0$3796$
"Michel69" a écrit dans le message de
news:%
Bonjour à tous,

J'ai une question que vous allez trouver vraiment bête, mais j'ai pas


eu
encore à utiliser ça !

Dans VB6, comment fait on afficher une nouvelle tache Internet


Explorer (ou
autre navigateur), avec une adresse URL donnée.




Hello,

il existe plein de façons, en voici une extrèmement simple:

Private Sub Command1_Click()
Dim s As String

s = "explorer.exe http://myjmnhome.dyndns.org"

Shell (s)
End Sub

--
Jean-marc
Tester mon serveur (VB6) => http://myjmnhome.dyndns.org
"There are only 10 kind of people
those who understand binary and those who don't."
mailto: remove '_no_spam_' ;



Avatar
Jean-Marc
Re,

Non, cette méthode lance explorer.exe, donc Internet Explorer.

Il existe d'autre méthodes pour lancer le navigateur par défaut,
qui peut alors être autre chose que Internet Explorer.

Par exemple:

Option Explicit

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
Private Const SW_SHOWNORMAL As Long = 1


Private Sub Command1_Click()
Dim s As String

s = "http://myjmnhome.dyndns.org"

ShellExecute hwnd, "open", s, vbNullString, vbNullString,
SW_SHOWNORMAL

End Sub



--
Jean-marc
Tester mon serveur (VB6) => http://myjmnhome.dyndns.org
"There are only 10 kind of people
those who understand binary and those who don't."
mailto: remove '_no_spam_' ;



"Michel69" a écrit dans le message de
news:
Merci.... bon sang mais c'est bien sur !!

ça marche quel que soit le navigateur du client ????


"Jean-Marc" a écrit dans le message de


news:
43eb842d$0$3796$
> "Michel69" a écrit dans le message de
> news:%
>> Bonjour à tous,
>>
>> J'ai une question que vous allez trouver vraiment bête, mais j'ai


pas
> eu
>> encore à utiliser ça !
>>
>> Dans VB6, comment fait on afficher une nouvelle tache Internet
> Explorer (ou
>> autre navigateur), avec une adresse URL donnée.
>>
>
> Hello,
>
> il existe plein de façons, en voici une extrèmement simple:
>
> Private Sub Command1_Click()
> Dim s As String
>
> s = "explorer.exe http://myjmnhome.dyndns.org"
>
> Shell (s)
> End Sub
>
> --
> Jean-marc
> Tester mon serveur (VB6) => http://myjmnhome.dyndns.org
> "There are only 10 kind of people
> those who understand binary and those who don't."
> mailto: remove '_no_spam_' ;
>