[resolu] ouvrir une page html

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : [resolu] ouvrir une page html

jpcheck

Pioupiou

Bonjour, c'est re- moi :hello:
Je cherche à ouvrir en vba une page html, auriez vous des fonctions toutes faites, car actuellement je suis avec une fonction shell, mais qui n'est pas reconnue par vbe

Code :

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
et
Call ShellExecute(0&, vbNullString, "http://www.hardware.fr", vbNullString, vbNullString, vbNormalFocus)

il me pond l'erreur : seuls les commentaires peuvent apparaitre apres en sub etc.
Please Help...

Message édité par jpcheck le 05-08-2005 à 14:42:52

Publicité

AlainTech

Pas trouvé? Cherche encore!

Bon, c'est très loin de d'être ma spécialité (Pur VBA sous Excel).

J'y suis allé à l'intuition et à la logique et j'ai fais ça:

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

Sub test()
Dim hwnd As Long
ShellExecute hwnd, "open", "http://www.hi-tech.ece.fr", "", "", 1
End Sub

... et ça m'ouvre bien la page indiquée.

---------------
Si on vous donne une info qui marche, DITES-LE!!!! ------ Si vous trouvez seul, AUSSI, votre solution peut servir à d'autres! ------ Je dois la majorité de mes connaissances à mes erreurs!

jpcheck

Pioupiou

chez moi ca veut pas compiler :cry:
j'ai ajouter à mes références le shell32.dll, mais ca marche toujours pas

Message édité par jpcheck le 05-08-2005 à 13:54:39

AlainTech

Pas trouvé? Cherche encore!

J'ai juste mis le code ci-dessus (tel quel) dans un module de VBA Excel 97.
Aucune référence de plus que celles qui sont par défaut.

J'ai mis mon curseur sur test et j'ai tapé F5.

Je ne vois pas où est ton problème :heink:

AlainTech

Pas trouvé? Cherche encore!

Tu as bien modifié ton appel comme ça:

ShellExecute hwnd, "open", "http://www.hi-tech.ece.fr", "", "", 1

???

jpcheck

Pioupiou

Mea maxima culpa!
Je suis désolé, j'ai complètement zappé le fait d'avoir à mettre

Code :

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

en haut de mon code et pas entre deux fonctions.
Ca marche nickel now :sweat: :pt1cable: :jap: :bounce:

Merci d'avoir insisté :hello:

FORUM HardWare.fr

Programmation

VB/VBA/VBS

[resolu] ouvrir une page html

Sujets relatifs
[Résolu] Menu type onglets en CSS	[RESOLU] Récupérer résultat d'1 requête SQL dans 1 script bourne shell
[Batch] Boucle sur plusieurs fichiers - RESOLU	[RESOLU] VB/EXCEL/manipulation de données pour transfert MySql
[MySQL]pb requete[Resolu]	[php] perte de connexion dans un include [resolu]
[Resolu] Améliorer les performances	[Résolu] Récupérer valeur oui/non
[resolu] JtextField invisible oui mais il veut pas s'afficher !!!	[Résolu] Ecriture correcte de requête
Plus de sujets relatifs à : [resolu] ouvrir une page html

Page générée en 0.038 secondes