Erreur : Objet requis: "
Résolu
laboon91
Messages postés
7
Statut
Membre
-
laboon91 Messages postés 7 Statut Membre -
laboon91 Messages postés 7 Statut Membre -
Bonjour Messieurs,
J'explique rapidement mon problème.
Je crée un fichier depuis un Vbscript, j’essaie d’insérer des données dans le fichier mais j'ai un message d'erreur (erreur : Objet requis: "), qui ne me parle pas. Sachant que j'utilise la même syntaxe pour divers fichiers sans problème.
ci-dessous mon code, espérant avoir été clair dans mes explications
Merci pour vos réponses
J'explique rapidement mon problème.
Je crée un fichier depuis un Vbscript, j’essaie d’insérer des données dans le fichier mais j'ai un message d'erreur (erreur : Objet requis: "), qui ne me parle pas. Sachant que j'utilise la même syntaxe pour divers fichiers sans problème.
ci-dessous mon code, espérant avoir été clair dans mes explications
If not fso.FileExists(StrSOFTWARE) Then
set ts = fso.CreateTextFile(StrSOFTWARE)
end if
WLog = "echo >>"& StrAttachement& VbNewLine &_
"echo ------------------ WHO'S LOGGED ON : "& strComputerName &" -----------"& date &" : "& time &"----------- "& RepArchive &">>"& StrAttachement& VbNewLine &_
"echo" & VbNewLine &_
"psloggedon.exe -accepteula >>"& StrAttachement& VbNewLine &_
"echo" & VbNewLine &_
"echo ------------------ SOFTWARE INSTALLED : "& strComputerName &" -----------"& date &" : "& time &"----------- "& RepArchive &">>"& StrAttachement& VbNewLine &_
"psinfo.exe -s -h -d -accepteula >>"& StrAttachement& VbNewLine &_
"echo >>"& StrAttachement& VbNewLine
ts.WriteLine WLog
ts.Close
Merci pour vos réponses
1 réponse
-
Salut
fso.FileExists(StrSOFTWARE)
te renvoie quoi ?
Car si c'est true alors tu n'initialises pas ts.
---
-
Ton code, il passe dans le if ou pas ?
si tu mets un MsgBox dans le if, il l'affiche ?
En gros : si tu passes dans le if : je ne sais pas pourquoi ça marche pas.
S'il ne passe pas dans le if (donc que le fichier Soft.bat existe déjà), tu n'initialises pas la variable ts.
il faudrait essayer de rajouter un
If not fso.FileExists(StrSOFTWARE) Then
set ts = fso.CreateTextFile(StrSOFTWARE)
Else
set ts = fso.OpenTextFile(StrSOFTWARE)
end if- J'ai trouver d’où viens le problème pblm, en effet la condition avec IF est true et donc n'initialise pas ts.
Je fais du copié collé bête et méchant depuis plusieurs de mes lignes donc je n'avais pas fait attention à cette condition.
Merci encore mrjenkins, sans toi je n'aurai pas cherché au bon endroit.
-
-
