[FAQ] Utiliser la boite de dialogue selection d'un fichier
Après quelques recherches je me suis rendu compte que cette fonctionnalité était très dur à trouver, je vous propose donc cette source :
Q : Comment utiliser la boîte de dialogue de sélection d'un fichier :
R : Avec la méthode wscript.CreateObject :
Code:
1 2 3 4 5 6 7 8 9
| dim message
set WSHShell = wscript.CreateObject("wscript.Shell" )
set objDlg = wscript.CreateObject("MSComDlg.CommonDialog" )
objDlg.Filter = "All Files (*.*)|*.*|VBScript Files (*.vbs)|*.vbs"
objDlg.FilterIndex = 1
objDlg.MaxFileSize = 260
objDlg.CancelError = true
objDlg.ShowOpen
WSHShell.popup objDlg.Filename |