Lancer un fichier avec son appli par défaut

oOiMm Messages postés 5 Date d'inscription mercredi 2 juillet 2003 Statut Membre Dernière intervention 3 septembre 2003 - 12 août 2003 à 19:29
Sibelle07 Messages postés 206 Date d'inscription dimanche 14 septembre 2003 Statut Membre Dernière intervention 25 mars 2005 - 16 sept. 2003 à 16:39
Salut j'aurais besoin du code pour ouvrir un fichier ( mp3 ) avec son appli par défaut ...

merci d'avance
bye
Salut
[OiM] Products

3 réponses

crenaud76 Messages postés 4172 Date d'inscription mercredi 30 juillet 2003 Statut Membre Dernière intervention 9 juin 2006 28
12 août 2003 à 19:37
Shell("Cmd.exe /C /X C:\Monfichier.mp3")
Le /X ordonne à Windows d'utiliser les associations de fichiers pour lancer un prog depuis le simple nom du fichier qui y est associé
Je crois que ça marche pas sous Win9x !!!

Christophe R.
0
cs_rene38 Messages postés 1858 Date d'inscription samedi 29 juin 2002 Statut Membre Dernière intervention 17 octobre 2013 11
12 août 2003 à 20:11
Bonsoir

Dans un module ou dans la section Général-Déclarations d'une feuille (dans ce cas, ajouter Private devant Declare)

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

Puis appel de la fonction :

ShellExecute Me.hwnd, "open", "C:\Chemin\Fichier.mp3", vbNullString, "C:\Chemin", SW_SHOWNORMAL
0
Sibelle07 Messages postés 206 Date d'inscription dimanche 14 septembre 2003 Statut Membre Dernière intervention 25 mars 2005
16 sept. 2003 à 16:39
y a pas que sa :-p
Shell ("C:\chemindump3.mp3")
Mais si tu le fait passer a tout le monde
il faudrait placer ce mp3 dans C:\ !!! :sad)
0
Rejoignez-nous