OUVRIR N'IMPORTE QUEL FICHIER PAR RECONNAISSANCE DE SON EXTENSION

NitRic_ Messages postés 13 Date d'inscription vendredi 29 juin 2001 Statut Membre Dernière intervention 20 mars 2002 - 19 févr. 2002 à 17:42
jatojaouhar Messages postés 2 Date d'inscription lundi 7 juin 2010 Statut Membre Dernière intervention 11 juillet 2010 - 9 mars 2011 à 00:05
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/2640-ouvrir-n-importe-quel-fichier-par-reconnaissance-de-son-extension

jatojaouhar Messages postés 2 Date d'inscription lundi 7 juin 2010 Statut Membre Dernière intervention 11 juillet 2010
9 mars 2011 à 00:05
salut .Pour ouvrir de la base de données il ne veut pas
Private Sub Command7_Click()
Set pptobj = CreateObject("PowerPoint.Application")
pptobj.WindowState = ppWindowNormal
pptobj.Presentations.open ("c:\tp1.ppt")
pptobj.Visible = True
End Sub
cs_Crang Messages postés 1 Date d'inscription dimanche 6 janvier 2002 Statut Membre Dernière intervention 20 février 2002
20 févr. 2002 à 17:59
Salut. Tu peux peut être utiliser le composent "Microsoft Scripting Runtime".
A+
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 à 09:00
OK désolé BillyBoy ...wafwaf aussi...
cs_Pekinio Messages postés 161 Date d'inscription mercredi 11 avril 2001 Statut Membre Dernière intervention 10 mars 2002
19 févr. 2002 à 18:30
alors dégage, c'est bien compris ? :))
NitRic_ Messages postés 13 Date d'inscription vendredi 29 juin 2001 Statut Membre Dernière intervention 20 mars 2002
19 févr. 2002 à 17:42
Heille!!! C'est dans le forum que l'on pose les questions pas ici.