Discussion :

[micka180]

bonjour,

bon je debute et je souhaiterai creer un fichier en vbs.
je souhaite avoir le code en vbs pour crer un fichier dans un repertoir.
merci davance

[SfJ5Rpw8]

La FAQ VBScript

[micka180]

bonjour,

je suis allé faire un tour sur la faq avant de poster le message, mais je n'ai pas trouvé ce qui m'intéresse.

par contre j'ai trouvé comment créer un répertoire alors je me suis dis qu'il suffisait de remplacer CreateFolder ("D:\Essai") par CreateFile("chemin rep\nom du fichier")

Merci de votre aide

Code :

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

1
2
3
4
5
//creation de repertoire
Dim oFSO,oFld 
Set oFSO = CreateObject("Scripting.FileSystemObject")
'Crée le repertoire
Set oFld=oFSO.CreateFolder ("D:\Essai")

[SfJ5Rpw8]

ben de quel genre de fichier sagit-il ..? fichier texte ..? binaire.....

[micka180]

je souhaite créer un fichier text

[micka180]

j'ai trouvé du code sur microsoft, cependant je ne trouve pas le fichier dans le chemeni indiqué.
Pourquoi ?

Code :

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

1
2
3
4
5
6
7
Sub CreateAfile
  Dim fso, MyFile
  Set fso = CreateObject("Scripting.FileSystemObject")
  Set MyFile = fso.CreateTextFile("c:\testfile.txt", True)
  MyFile.WriteLine("This is a test.")
  MyFile.Close
End Sub

[micka180]

je viens de trouver il fallait enlever les sub, je ne faisais pas d'appel de fonction

[SfJ5Rpw8]

pour la FAQ ... il y as un bouton rechercher..!

Comment écrire dans un fichier texte ?