Ouverture de fichiers grâce à l'extension ...

JeremyYa Messages postés 2 Date d'inscription mardi 19 février 2002 Statut Membre Dernière intervention 20 février 2002 - 20 févr. 2002 à 08:56
cs_Troopers Messages postés 81 Date d'inscription lundi 18 février 2002 Statut Membre Dernière intervention 29 août 2003 - 21 févr. 2002 à 14:53
Je recherche un code du style de celui déposé jadis par Darty et qui merde avec VB6.
Il me servira à créer un seul bouton de commande, dans un formulaire ACCESS, permettant d'ouvrir
plusieurs sortes de fichiers (Word, Excel, PowerPoint) sans OLE et uniquement en
se basant sur l'extension. Si vous avez des infos ou une autre idée pour réaliser la
même chose, merci de me les faire parvenir.

1 réponse

cs_Troopers Messages postés 81 Date d'inscription lundi 18 février 2002 Statut Membre Dernière intervention 29 août 2003
21 févr. 2002 à 14:53
utilise l'api:
Public Declare Function ShellExecuteA Lib "shell32" (ByVal hwnd As Long, ByVal lpFile As String, ByVal PathFile As String, ByVal Other As String, ByVal Other2 As String, ByVal Param As Long) As Long

retval = ShellExecuteA(0, "Open", s, "", "", 10)
où s= chemin du fichier à ouvrir (ex:"C:\mes documents\test.doc")
0
Rejoignez-nous