Lakhnois
Messages postés26Date d'inscriptiondimanche 23 mars 2003StatutMembreDernière intervention24 octobre 2005 22 juil. 2003 à 16:53
Fsys.CreateTextFile("D:\MyDoc\fichierIni.txt")
te creer le fichier, mais te l'ouvre aussi, alors si tu ve utiliser Open ensuite, il fau ke tu fasse MyFile.Close avant.
Sinon utilise plutot:
MyFile.WriteLine TextAEntrer
Janseverus
Messages postés34Date d'inscriptionvendredi 11 juillet 2003StatutMembreDernière intervention10 août 2004 22 juil. 2003 à 17:24
Essai comme ca, ca marche chez moi:
Set Fsys = CreateObject("Scripting.FileSystemObject")
Set myfile = Fsys.OpenTextFile("D:\fichierIni.txt")
Open "D:\fichierIni.txt" For Append As #2
MyLine = "VOICE"
Print #2, "TYPE=" & MyLine
Close #2
End Function