cs_Ryle
Messages postés5Date d'inscriptionlundi 4 août 2003StatutMembreDernière intervention16 juin 2004
-
10 sept. 2003 à 10:45
l0r3nz1
Messages postés218Date d'inscriptionmercredi 20 février 2008StatutMembreDernière intervention17 mars 2012
-
23 févr. 2009 à 10:06
voilà j'ai un pb avec bout de prog (pourtant simple) mais uniquement sous XP:
dim fs as filesystemobject
Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.CreateTextFile("c:\fichiertest.txt", True)
a.WriteLine("Ceci est un test.")
a.Close
à la signe Set fs.. j'ai une erreur 429: l'activeX ne peut pas créer l'objet
j'ai pourtant tiré le code directement de la MSDN... :/
(il faut la référence microsoft scripting runtime de chargée)
l0r3nz1
Messages postés218Date d'inscriptionmercredi 20 février 2008StatutMembreDernière intervention17 mars 2012 23 févr. 2009 à 10:06
je sais c'est vieux mais y a pas de réponses sinon
as tu essayé avec une déclaration simple:
dim fs
Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.CreateTextFile("c:\fichiertest.txt", True)
a.WriteLine("Ceci est un test.")
a.Close
ceci en vbs
en vb6 (ou vba aussi je crois):
on met pas le "scripting" ça créé une erreur