pb avec scripting/filesystem sous XP [VB] - VB/VBA/VBS - Programmation
Marsh Posté le 10-09-2003 à 10:58:44
tu as ajouter la reférence à Microsoft Scripting Runtime ?
Marsh Posté le 10-09-2003 à 11:00:12
oui la référence est bien présente sinon il aurait marqué qu'il connaissait pas filesystemobject
Marsh Posté le 10-09-2003 à 11:28:50
un truc m'échappe, tu déclares ton objet As FileSystemObject, mais tu le crées avec CreateObject et pas un New ![]()
Marsh Posté le 10-09-2003 à 11:39:17
| drasche a écrit : un truc m'échappe, tu déclares ton objet As FileSystemObject, mais tu le crées avec CreateObject et pas un New |
spa grave ça...
G tjs créé un FileSystemObject comme ça
Marsh Posté le 10-09-2003 à 11:40:20
c'est pas très performant
et surtout ça n'est pas propre, c'est un mélange d'early et late binding. Si t'utilises CreateObject, déclare au moins tes variables As Object ![]()
Marsh Posté le 10-09-2003 à 11:53:03
| drasche a écrit : c'est pas très performant |
j'crois ke kan je faisais new ça me pétait à la gueule...
et G tjs vu ça comme ça... (MSDN/Groupe google)
Marsh Posté le 10-09-2003 à 11:54:19
euh moi ça m'a jamais pété à la gueule
config foireuse je dirais plutôt ![]()
Marsh Posté le 10-09-2003 à 11:55:04
| drasche a écrit : un truc m'échappe, tu déclares ton objet As FileSystemObject, mais tu le crées avec CreateObject et pas un New |
meme si je fait ca sa revient au meme:
Public fs As New filesystemobject
Private Sub Form_Load()
Set a = fs.CreateTextFile("c:\fichiertest.txt", True)
a.WriteLine ("Ceci est un test." )
a.Close
End Sub
Marsh Posté le 10-09-2003 à 11:56:05
les déclarations avec As New ObjetMachin dedans, c'est mal. Dès que tu essaies de détruire l'objet, il en réinstancie un nouveau ![]()
Marsh Posté le 10-09-2003 à 12:01:29
| drasche a écrit : euh moi ça m'a jamais pété à la gueule |
G un WIN98 tout pourri sur un PII
Marsh Posté le 10-09-2003 à 12:02:18
| Ryle Hunter a écrit : |
dim fs as filesystemobject
set fs = new filesystemobject
Marsh Posté le 10-09-2003 à 10:49:33
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)
si quelqu'un à déjà eu ce pb..
merci...