user connecté, lecteur reseau

Bonjour

J'ai ecrit un petit script qui me permet d'une de connaitre les utilisateurs
connectés,et de deux, de savoir quels lecteus reseaux sont utilisés sur leur
machine car je souhaite mettre un peu d'ordre.Ces infomations sont ensuite
ajoutées dans un fichier texte. Quand j'essai le script localement, tout va
bien. J'utilise une Gpo pour executer ce script à l'ouverture de session. Au
départ, il ne s'executait pas. Je me suis apercu que je devais l'appeler par
un fichier Batch.Est ce normal ?? peut etre. Depuis il s'execute bien sauf
qu'aucune information n'est inscrite dans le fichier texte.
A savoir que j'utilise cscript dans le fichier cmd pour appeler ce script .
Est ce bien??
Ci dessous le contenu de mon script. Surtout n'hésitez pas à me dire si des
corrections sont à faire. Je précise que cela fait seulement 10 jours que je
me suis interressé au vbscript.

----------------------------------------------------------------------------------------------
'Variables
Option explicit
Dim net, objfso,objmyfile,wshnetwork,drive,lecteur,i

Const ForReading = 1, ForWriting = 2, ForAppending = 8

'creation objet Net
Set Net = createobject("wscript.network")

'creation objet objfso
set objfso = createobject ("scripting.filesystemobject")

'creation objmyfile
set objmyfile =
objfso.opentextfile("\\ser-msg-a101\sp\L_Reseau.txt",ForAppending, true)

'utilisateur courant
net= net.username

'ecriture dans le fichier
objmyfile.writeline("utilisateur=" & net)

'création de l'instance wshnetwork
set wshnetwork = wscript.createobject("wscript.network")

'creation drive
set drive = wshnetwork.enumnetworkdrives
if drive.count = 0 then
'ecriture dans le fichier texte
objmyfile.writeline("Il n'y a pas de lecteur reseau actuellement disponible")
else

lecteur = ""
for i=0 to drive.count - 1 step 2
lecteur = lecteur & chr(13) & chr(10) & drive(i) & chr(9)& drive(i+1)

next

objmyfile.writeline lecteur

End If
objmyfile.close

------------------------------------------------------------------------------------------------

Merci pour vos réponses lumineuses