ouvrir plusieurs URL

Question

Bonjour à toutes et tous

Je voudrais ouvrir plusieur page internet en même temps 
j'utilise l'api 
"Public 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"

mais lorsque j'appelle cette fonction plusieur fois à la suite je ne vois que la dernière adresse transmise.

merci d'avance

cs_Exploreur · Answer

Salut,

Essaye cela :

Private Sub Command1_Click()
    ' Gestion erreur
     On Error Resume Next
 
    ' Lancement de la page Web
     Shell "rundll32.exe url.dll,FileProtocolHandler " & "Http://www.VbFrance.fr"


    ' si erreur on traite l'information
     If Err.Number Then
        ' Affichage information
         MsgBox Err.Description, vbCritical Or vbOKOnly, "Information utilisateur"
         ' Netoyage du gestionnaire erreur
         Err.Clear
     End If


End Sub


A+
Exploreur

 Linux a un noyau, Windows un pépin

Ouvrir plusieurs URL

1 réponse

Votre réponse

Discussions similaires