Erreur : Objet requis: "

Résolu/Fermé

laboon91 Messages postés 7 Date d'inscription jeudi 4 février 2016 Statut Membre Dernière intervention 3 août 2016 - 27 juin 2016 à 15:01
laboon91 Messages postés 7 Date d'inscription jeudi 4 février 2016 Statut Membre Dernière intervention 3 août 2016 - 27 juin 2016 à 16:57

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

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

A voir également:

Erreur : Objet requis: "
Erreur 0x80070643 - Accueil - Windows
Erreur 0x80070643 Windows 10 : comment résoudre le problème de la mise à jour KB5001716 - Accueil - Windows
Erreur 1001 outlook - Accueil - Bureautique
Erreur 5000 france tv - Forum iPhone
Erreur g030 - Forum Bbox Bouygues

1 réponse

Réponse 1 / 1

mrjenkins Messages postés 580 Date d'inscription jeudi 22 novembre 2007 Statut Membre Dernière intervention 17 juillet 2018 102
27 juin 2016 à 15:53

Salut

fso.FileExists(StrSOFTWARE)

te renvoie quoi ?

Car si c'est true alors tu n'initialises pas ts.

--

laboon91 Messages postés 7 Date d'inscription jeudi 4 février 2016 Statut Membre Dernière intervention 3 août 2016
Modifié par laboon91 le 27/06/2016 à 16:05

je ne pas bien compris ta question !

en faite la variable a comme valeur

StrSOFTWARE = strPathDir &"\Working\Soft.bat"

comment testé ce que renvoi

fso.FileExists(StrSOFTWARE)

mrjenkins Messages postés 580 Date d'inscription jeudi 22 novembre 2007 Statut Membre Dernière intervention 17 juillet 2018 102
27 juin 2016 à 16:08

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

laboon91 Messages postés 7 Date d'inscription jeudi 4 février 2016 Statut Membre Dernière intervention 3 août 2016 > mrjenkins Messages postés 580 Date d'inscription jeudi 22 novembre 2007 Statut Membre Dernière intervention 17 juillet 2018
27 juin 2016 à 16:33

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.

mrjenkins Messages postés 580 Date d'inscription jeudi 22 novembre 2007 Statut Membre Dernière intervention 17 juillet 2018 102
27 juin 2016 à 16:36

C'est ce que je dis depuis le début ;) ts est pas toujours initialisé =)

Pas de quoi, bon courage ^^

thanks

Discussions similaires

Code erreur 3000

Erreur 3005 sur France TV

Erreur de lecture des tv film et series sur mon appli iptv smarters pro

Erreur vidéo inconnue sur le Freebox Player

Free erreur 38 : impossible d'envoyer des SMS