Discussion :

[Barred]

Bonjour,

dans mon application vb6, j'ai mis un bouton pour lancer une page web qui se trouve dans mon disque dur.

j'ai utilisé cette synthaxe :

Code :

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

1
2
3
4
 
 
Dim RetVal
RetVal = Shell(Variables.PathCompletVisionneuse, 0)

Variables.PathCompletVisionneuse c'est le chemin du fichier .Html

mais chaque fois que je clique sur le bouton ça ne fait rien

quelqu'un sait pourquoi ??

[oughlad]

slt ;
a mon avis shell ne fait que le lancement des executable.(.exe);
essaye de faire l'appel à iexplore.exe et lui passer comme parametre le cheminde la page

[jmfmarques]

adapte ceci qui me sert à écouter le Pérou :

Code :

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

1
2
3
4
5
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 Sub Command1_Click()
  ShellExecute 0, vbNullString, "http://www.rpp.com.pe/audios/0.php", vbNullString, vbNullString, vbNormalFocus
 End Sub