aide en VBScript

Marsh Posté le 18-01-2006 à 12:39:36

Bonjour

Je voudrai, en VBScript, ouvrir un dossier et y récuperer les noms des fichiers contenus dedans. comment peut on faire ca ?

merci de votre réponse

Marsh Posté le 18-01-2006 à 12:39:36

Marsh Posté le 18-01-2006 à 12:56:16

Set fso = CreateObject("Scripting.FileSystemObject" )
Set f = fso.GetFolder("c:\mon_dossier)
Set fc = f.Files
For Each f1 in fc
Wscript.Echo f1.name
Next

Marsh Posté le 01-02-2006 à 17:57:26

est il possible de rediriger le resultat dans un doc txt ??
merci d'avance

Marsh Posté le 01-02-2006 à 18:06:11

oui, en créant un fichier texte avec le FileSystemObject et en écrivant le resultat dedans. cf la MSDN pour plus d'infos:
http://msdn.microsoft.com/library/ [...] c192f0.asp

---------------
"I wonder if the internal negative pressure in self pumping toothpaste tubes is adjusted for different market altitudes." John Carmack

Marsh Posté le 22-02-2006 à 01:51:09

Bonjour, quel doit être l'extension de se fichier ?

Code :

Set fso = CreateObject("Scripting.FileSystemObject" )
Set f = fso.GetFolder("c:\mon_dossier)
Set fc = f.Files
For Each f1 in fc
Wscript.Echo f1.name
Next

Message édité par webding le 22-02-2006 à 01:51:43

Marsh Posté le 22-02-2006 à 10:12:52

L'extension de quel fichier ?

Si l'extension du fichier contenant les 6 lignes de VBScript, alors c'est ".vbs", et le fichier pourrait s'appeler "toto.vbs". Puis pour le lancer, il suffit de cliquer dessus quand on le voit appaâître dans Windows Explorer, ou bien de taper "cscript toto.vbs" sur la ligne de commande quand on est dans une fenêtre DOS.

Si c'est l'extension des fichiers qui ont été trouvés dans le répertoire, alors utiliser
Wscript.Echo fso.GetExtensionName(f1).

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed

Name *

Email *

URL

Message *