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 : Sélectionner tout - Visualiser dans une fenêtre à part
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