Discussion :

[Neuromancien2]

Bonjour,

La fonction GetOpenFilename() est-elle disponible en VBSript ? Sinon, que faut-il utiliser pour sélectionner plusieurs fichiers ?

[pc75]

Bonjour,

Regarde les méthodes et propriétés de FileSystemObject

[Neuromancien2]

Il ne me semble pas que FileSystemObject gère des boîtes de dialogue.

[pc75]

Oups, désolé, j'ai mal lu.

C'est un truc comme ça que tu cherches ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
 
'// Create the Object
cd = new ActiveXObject("MSComDlg.CommonDialog");
 
// Set file filter
cd.Filter = "All Files(*.*)|*.*|JScript Files(*.js)|*.js";
cd.FilterIndex = 2;
 
// Must set MaxFileSize. Otherwise you will get an error
cd.MaxFileSize = 128;
 
// Show it to user
cd.ShowOpen();
 
// Retrieve file + path
file = cd.FileName;
 
// If the user does enter file exit
if ( !file ) {
   WScript.Echo("You must enter a file name");
   WScript.Quit(0);
} else {
   WScript.Echo("The user selected:\n" + file );
}

[ced600]

Soit plus clair dans ta question.
Tu veux récupérer le nom de tous les fichiers d'un répertoire ?
http://www.activexperts.com/activmon...esInFolder.htm

Ou tu veux récupérer un fichier précis (tout en vérifiant son existence) ?
http://www.activexperts.com/activmon...Exsistence.htm

Ou tu veux ouvrir une boite de dialogue pour sélectionner des fichiers et en faire ce que tu veux ?

Au fait as tu cherchés toi même avant de poster ????

[Neuromancien2]

@pc75 : Oui, c'est une fonction équivalente mais permettant à l'utilisateur de sélectionner plusieurs fichiers.

@ced600 : Je veux ouvrir une boîte de dialogue. C'est à ça que sert GetOpenFilename().

[Neuromancien2]

Apparemment il n'y a pas de solution simple. Je laisse tomber la solution VBScript et je reste sous Excel.