begin process at 2010 02 10 05:25:39
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

API

 > EXECUTION D'APPLIS ET DE FICHIERS À PARTIR DE VB

EXECUTION D'APPLIS ET DE FICHIERS À PARTIR DE VB


 Information sur la source

Note :
7,86 / 10 - par 7 personnes
7,86 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :API Classé sous :shellexecute Niveau :Initié Date de création :19/12/2000 Vu :11 632

Auteur : LeCarto

Ecrire un message privé
Site perso
Commentaire sur cette source (6)
Ajouter un commentaire et/ou une note

 Description

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

  • 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
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



 Sources du même auteur

Source avec Zip Source .NET (Dotnet) COMPTEUR DE LIGNES D'UN PROJET VB.NET
Source .NET (Dotnet) FAIRE UN SAVEPICTURE EN VB.NET
Source avec Zip UTILISER LA MOLETTE DE LA SOURIS DANS VB
Source avec Zip Source avec une capture UITLISATION DES API : UN PETIT UPTIME SIMPLE
Source avec Zip CALCULS MATRICIELS 2

 Sources de la même categorie

Source avec Zip Source avec une capture Source .NET (Dotnet) FAIRE LA DIFFÉRENCE ENTRE UNE ADRESSE EMAIL QUI EXISTE D'UNE... par lesinfosdugeek
ENVOYER UN MESSAGE SUR SON COMPTE TWITTER par lesinfosdugeek
Source avec Zip Source avec une capture TROUVER LES CLÉS DE REGISTRE QUI CHANGENT par Flocreate
Source avec Zip IP_PUBLIQUE_INTERNETGETCONNECTEDSTATE par marco62118
Source avec Zip TOUTES LES RÉSOLUTIONS D'ÉCRAN ET TAILLE MAXI DE LA FORM AUD... par marco62118

 Sources en rapport avec celle ci

Source avec Zip Source avec une capture QEMUGUI - LANCEUR DE QEMU par ghuysmans99
Source avec Zip RECHERCHER SUR INTERNET LE CONTENU TEXTUEL DU CONTROL AYANT ... par violent_ken
Source avec Zip RÉCUPÉRER LE HANDLE APRÈS UN SHELLEXECUTE par jack
Source .NET (Dotnet) EXÉCUTION D'UN PROGRAMME ET ATTENDRE LA FIN DE L'EXÉCUTION D... par eldim
Source .NET (Dotnet) EXECUTER EN TANT QUE EN .NET par Alain Proviste

Commentaires et avis

Commentaire de benrahhal le 05/05/2006 18:25:26

bonjour ,

j'etais besoin de ce code je l'utilisé mais je n'arrive pas à l'executé.
Est ce que vous pouvez m'aider car je suis vraiment le besoin pour continier m'application .
                                              merci de votre collaboration en line .

                                                                         youssef/diwa

Commentaire de LeCarto le 06/05/2006 08:30:43

Quel est le problème à l'exécution ?

Commentaire de benrahhal le 08/05/2006 17:21:52

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.



      

Commentaire de LeCarto le 08/05/2006 19:13:29

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).

Commentaire de taouale2 le 18/05/2006 17:55:57

il y a ausi la fonction shell, très simple d'utilisation et incluse à VB :
Shell(pathname[,windowstyle])
voir MSDN

Commentaire de MiciM le 26/08/2006 04:31:14

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 ;)

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

Comment Attacher un fichier a un mail [ par Ubaye ] je sais comment avec ShellExecute mettre une adresse de Mail son sujet et écrire du texte mais pas Joindre un fichier si une personne peut m'aider se besoin d'explikation SVP [ par tom ] bonjourje voudrais savoir comment faire pour faire afficher pour une page web pour kel soit minimizé aussitot appelé.Declare Function ShellExecute Lib connexion internet à partir de ShellExecute de shell32.dll [ par martinkk ] 1 - Comment utiliser le dll shell32.dll pour ouvrir et fermer une ou plusieurs connexions ?2 - Quels sont les paramètres de la fonction ShellExecute d Pour les PROS: ShellExecute un EXE dans une fenetre VB....? [ par jockos ] Est-ce que quelqu'un sait comment faire pour qu'un exécutable lancé par l'API shellExecute apparaissedans une fenetre VB ou apparaisse en tant que fen API ShellExecute [ par jockos ] Salut,LE premier paramètre de la méthode Api ShellExecute est un Long qui a pour nom Hwnd...J'ai été voir sur la MSDN et il semblerai que ce soit l'ha Comment récupérer le Handle d'une fenêtre lancée par l'API ShellExecute? [ par jockos ] La question est dans le titre...Et la réponse est loin d'être évidente. Vous allez me dire d'utiliser l'API FindWindow...Mais je vosu répondrais que p Executer un fichier zip a travers Winzip [ par DiJiTooL ] Voila en fait je cherche tout simplement a faire comme quand on lcick sur un fichier .zip, il s'ouvre dans winzip...j'ai essayer avec l'api shellexecu


Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Février 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,780 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales