Salut

Qu'est qui ne va pas dans mon code car le i dans "table(i)" ne veut prendre les valeurs de i ?

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
Const ForReading = 1, ForWriting = 2
  Set WshShell = WScript.CreateObject("WScript.Shell")
   Dim fso, f
   Set fso = CreateObject("Scripting.FileSystemObject")
   Set f = fso.OpenTextFile("C:\Users\pat\Desktop\ecriture.txt", ForWriting,true)
 
   i=0
   For i=0 To 20
   f.write("table(i)")
   i=i+1
Next
Merci