Bonjour voila j'explique mon problème, en fait j'ai eu à réalisé un script durant ma période de stage seulement je n'avais jamais fait de VBS, donc je les fait à l'aide de mon tuteur, seulement voila stage fini, vacances passées je dois faire mon rapport de stage et je ne me souviens plus de ce que veulent dire toutes lignes donc j'aimerais votre aide merci beaucoup !
Voici le script
Dim fso, fichierlog
Permet d'initialiser la variable FSO
Set fso=WScript.CreateObject("Scripting.fileSystemObject" )
?
Dim WshNet
Set WshNet = WScript.CreateObject("WScript.Network" )
If not fso.driveExists ("k:" ) then
WshNet.MapNetworkDrive "k:", "\\10.8.32.150\sauvenas\ged", true, "PREF08-CS-BOS", "************"
end if
Initialise la variable WsHNet puis ouvre le lecteur réseau K: sinon il n'existe pas il le crée
Set wshnetwork = WScript.CreateObject("WScript.Network" )
user = wshnetwork.UserName
MsgBox user
Iniltialise la variable wshnetwork puis affiche à l'écran le nom d'utilisateur réseau actuellement connecté
dim strbackup
strbackup="C:\WINDOWS\system32\ntbackup.exe backup " &"""@C:\Documents and Settings\" & user & "\Local Settings\Application Data\Microsoft\Windows NT\NTBackup\data\backupthunder.bks""" & " /a /d "&"""Jeu créé le 02/02/2009 à 15:33""" & " /v:no /r:no /rs:no /hc:off /m normal /j "&"""backupthunder"""&" /l:s /f "&"""K:\Backupthunder.bkf"""
Lien de la sauvegarde et ?
Set ObjShl = WScript.CreateObject("WScript.Shell" )
RunNTBackup = ObjShl.Run(strbackup, 0, true)
Set Objshl=nothing
Sinon que l'on ne fait plus rien
Voila merci beaucoup de votre aide 
En plus je dois présenter ce projet à l'oral lundi ... Bonne soirée
