Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Sujet : SHELLEXECUTE [ Windows / Shell ] (ticrain)

jeudi 26 avril 2007 à 11:52:42 | SHELLEXECUTE

ticrain

Bonjour à tous voila sa fait un petit moment que je cherche pour ouvrir un programme quelconque avec la commande shellexecute.

G plusieurs fichier word et excel sur le C:. C 'est fichier apparaissent dans une listbox donc je peut avoir soi des fichier .doc ou excel, j'aimerai que mon prog puisse s'executer avec la bonne application en focntion de se que j'a choisi dans la listbox 1 voila se que j'ai commencé à faire:

Option Explicit
Private Declare Function ShellExecute Lib "shell32.dll" (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 Const SW_MAXIMIZE = 3

Private Sub CommandButton2_Click()
Dim nomdoc As String
Dim chemindoc As String
nomdoc = ListBox1.List(ListBox1.ListIndex)
chemindoc = "c:\&nomdoc"
Call ShellExecute(0, "open", nomdoc, vbNullString, vbNullString, SW_MAXIMIZE)
End Sub

il ne se passe rien il n'ouvre rien j'ai du oublier des truc


jeudi 26 avril 2007 à 11:54:55 | Re : SHELLEXECUTE

Drikce06

Membre Club
Salut, en .Net les types long sont à changer en integer!
Sinon va sur www.codyx.org et tu trouveras un snippet pour faire ça à la façon .Net (startprocess)

 Drikce 06

Si la réponse vous convient: Réponse acceptée. Si la réponse vous convient pas:

jeudi 26 avril 2007 à 11:55:49 | Re : SHELLEXECUTE

Drikce06

Membre Club
http://www.codyx.org/snippet_ouvrir-document-lancer-executable_25.aspx#69

 Drikce 06

Si la réponse vous convient: Réponse acceptée. Si la réponse vous convient pas:

jeudi 26 avril 2007 à 14:43:05 | Re : SHELLEXECUTE

Drikce06

Membre Club
Private Sub CommandButton2_Click()
Dim nomdoc As String
Dim chemindoc As String
nomdoc = ListBox1.List(ListBox1.ListIndex)
chemindoc = "c:\" & nomdoc
Call ShellExecute(0, "open", nomdoc, vbNullString, vbNullString, SW_MAXIMIZE)
End Sub

 Drikce 06

Si la réponse vous convient: Réponse acceptée. Si la réponse vous convient pas:

jeudi 26 avril 2007 à 14:46:55 | Re : SHELLEXECUTE

ticrain

sa va marché avec ca tu crois il va 'mouvri les xls et les doc?

jeudi 26 avril 2007 à 14:48:08 | Re : SHELLEXECUTE

Drikce06

Membre Club
Call ShellExecute(Me.hwnd, "open", nomdoc, vbNullString, vbNullString, SW_MAXIMIZE)

 Drikce 06

Si la réponse vous convient: Réponse acceptée. Si la réponse vous convient pas:

jeudi 26 avril 2007 à 14:51:31 | Re : SHELLEXECUTE

ticrain

il n'est pas d'accord il me marque erreur de compilation pour le (ME.hwnd

voici ce que g maintenant:

Option Explicit
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 CommandButton2_Click()
Dim nomdoc As String
nomdoc = ListBox1.List(ListBox1.ListIndex)
Dim chemindoc As String
chemindoc = "c:\" & nomdoc
Call ShellExecute(Me.hwnd, "open", nomdoc, vbNullString, vbNullString, SW_MAXIMIZE)
End Sub


jeudi 26 avril 2007 à 14:59:49 | Re : SHELLEXECUTE

Drikce06

Membre Club
T'es en quoi VB6, VB.net ou VBA?

 Drikce 06

Si la réponse vous convient: Réponse acceptée. Si la réponse vous convient pas:

jeudi 26 avril 2007 à 15:01:42 | Re : SHELLEXECUTE

ticrain

je suis en VBA drickce 06 et à mon avis VBA ne connai pas cet argument!

jeudi 26 avril 2007 à 17:14:33 | Re : SHELLEXECUTE

zavier666

Si tu cherche des conseils sur shellexecute:
va sur mon site rubrique shell32.dll

slts!

--------------------------------------------------------------
Toujours + de VB6 et d'API => API @ la Loupe
http://xav.prog.power.free.fr
Le site s'est offert une nouvelle interface, à voir sans faute



1 2

Cette discussion est classé dans : fichier, string, excel, shellexecute, nomdoc


Répondre à ce message

Sujets en rapport avec ce message

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 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 [VB6] ShellExecute [ par JeffC1977 ] Salut.... Je me suis fais un programme pour ouvrir des fichiers (bon je ne sais pas quel autre mot utilisé pour dire Ouvrir un Fichier... hum exécut Visualisation d'un fichier Excel [ par Thomeux ] Bonjour,J'aimerai savoir comment faire pour visualiser un fichier excel dans une textbox.Je m'explique: j'ai besoin d'inserer des données dans un  fic shellexecute aidez moi! [ par ticrain ] Je dois ouvrir des fichier excel et word que joré selectionner dans une listobox en appuyant sur un bouton:est ce que qqun peut m'aider je c que shell Impression avec shellexecute [ par pedro ] Bonjour,J'ai un fichier word à imprimer (mais la machine qui executera le programme n'aura pas forcement word), on suppose que la machine peut lire le Controle OLE Excel [ par cmaisse ] Bonjour à tous,J'ai un petit souci, j'ai créer un objet permettant d'ouvrir un fichier excel mais je ne sais pas comment récupérer le nom des différen Modèle Excel [ par fefa ] Je veux créer un fichier Excel selon un modèle que j'ai défini à partir d'une procédure événementielle d'Access.Le fichier est crée et enregistré, en problème de lecture fichir, HELP ME [ par spiderone ] voilà ma fonctionje comprends pas les deux dernières lignes du fichier sont igonrées et j'ai encore une ligne blanche à la fin fu fichier cible :-( :- Win NTServer à Win2000Server [ par marsupi ] j'utilisais la routine suivante pour lancer un fichier excel contenant une macro qui s'autoexecutait. Set ExcelObject = CreateObject("Excel.Applicati


Nos sponsors

Sondage...

CalendriCode

Décembre 2008
LMMJVSD
1234567
891011121314
15161718192021
22232425262728
293031    

Consulter la suite du CalendriCode

Téléchargements

Logiciels à télécharger sur le même thème :



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel BAÏSE, 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
Temps d'éxécution de la page : 0,343 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.