Execution d'applis et de fichiers à partir de vb

Soyez le premier à donner votre avis sur cette source.

Snippet vu 15 488 fois - Téléchargée 74 fois

Contenu du snippet

Code montrant l'utilisation de l'API Shellexecute, qui permet de lancer des applis mais surtout de lancer des fichiers quelconques à partir de VB. Par exemple pour faire un bouton qui lance une page HTML automatiquement.

Source / Exemple :


Dans un module .bas, la déclaration de la fonction 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

Dans votre code, ici un click sur un label (les labels peuvent être transparents et donc se placer sur un BMP) :

Private Sub Label1_Click()
Dim lapi As Long
a$ = App.Path & "index.html"
lapi = ShellExecute(Me.hwnd, "open", a$, vbNull, vbNull, 5)
End Sub

Conclusion :


Les paramètres de la fonction sont simples, malgré leurs noms zétranges. Pour plus d'infos, la page MSDN :

http://msdn.microsoft.com/library/psdk/shellcc/shell/Functions/ShellExecute.htm

A voir également

Ajouter un commentaire

Commentaires

Messages postés
388
Date d'inscription
mardi 1 juillet 2003
Statut
Membre
Dernière intervention
18 novembre 2019
1
euh, taouale2 ton shell ne fonctionne que pour les exécutables (*.exe). Par exemple, pour les fichers CHM, il faut écrire Shell "HH.exe tonfichier.chm" pour les fichiers HLP Shell "WinHlp32.exe tonfichier.hlp" pour les fichiers HTLM Shell "IExplore.exe tonfichier.html" sinon ton fichier ne démarre pas. De plus, tout doit être écrit en noms dos (8.3). Tu vois que le code de LeCarto fonctionne correctement sans avoir à spécifier l'exécutable qui va avec et en noms longs :) Thx pour ton code LeCarto car c'est ce qu'il me fallait ;)
Messages postés
24
Date d'inscription
jeudi 4 novembre 2004
Statut
Membre
Dernière intervention
4 février 2010

il y a ausi la fonction shell, très simple d'utilisation et incluse à VB :
Shell(pathname[,windowstyle])
voir MSDN
Messages postés
16
Date d'inscription
mardi 28 novembre 2000
Statut
Membre
Dernière intervention
6 juillet 2007

Le problème vient peut-être du chemin du fichier html à afficher. A la ligne 9 du code ci-dessus, je présuppose que le fichier html est dans le même répertoire que l'application VB (App.path).
Messages postés
5
Date d'inscription
jeudi 13 avril 2006
Statut
Membre
Dernière intervention
11 mai 2006

c'est que j'ai utilisé le meme code dans m'application sauf que j'ai changé le nom du fichier concerné"index.html"et je sais pas ou le probleme est ce qu'il faut ajouter des autres composant ou des references deffirantes .

il me donne pas le debogage .

merci bien.
Messages postés
16
Date d'inscription
mardi 28 novembre 2000
Statut
Membre
Dernière intervention
6 juillet 2007

Quel est le problème à l'exécution ?
Afficher les 6 commentaires

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.