Traduction petit script
preston623
-
preston623 -
preston623 -
Bonjour,
je souhaite mettre en place un script d'ouverture de session client afin que les clients aient accès sur leur poste à un lecteur réseau lié au serveur. On m'a aidé à écrire ce script, je vois à quoi il sert mais je ne le comprends pas ligne par ligne.
Pouvez vous m'aider à le traduire mot par mot? vraiment merci d'avance!
'// Ce script connecte le lecteur k:
'//////////////////////////////////////////////////
' Initialization
const str_NetworkPath="\\serveur\dossiers\assurances"
const str_lecteur = "k:"
Set nw = CreateObject("Wscript.Network")
On Error Resume Next
'commence par supprimer le lecteur k: s'il existe
nw.RemoveNetworkDrive str_lecteur, True, True
'connexion du lecteur
nw.MapNetworkDrive str_lecteur, str_NetworkPath, True
WScript.Echo "lecteur réseau chargé"
je souhaite mettre en place un script d'ouverture de session client afin que les clients aient accès sur leur poste à un lecteur réseau lié au serveur. On m'a aidé à écrire ce script, je vois à quoi il sert mais je ne le comprends pas ligne par ligne.
Pouvez vous m'aider à le traduire mot par mot? vraiment merci d'avance!
'// Ce script connecte le lecteur k:
'//////////////////////////////////////////////////
' Initialization
const str_NetworkPath="\\serveur\dossiers\assurances"
const str_lecteur = "k:"
Set nw = CreateObject("Wscript.Network")
On Error Resume Next
'commence par supprimer le lecteur k: s'il existe
nw.RemoveNetworkDrive str_lecteur, True, True
'connexion du lecteur
nw.MapNetworkDrive str_lecteur, str_NetworkPath, True
WScript.Echo "lecteur réseau chargé"
Configuration: Windows XP Firefox 3.0.10
2 réponses
-
const str_NetworkPath="\\serveur\dossiers\assurances"
le chemin vers lequel le lecteur pointe
-------------------const str_lecteur = "k:"
la lettre du lecteur
-------------------Set nw = CreateObject("Wscript.Network")on crée un objet de type network, fait pour gérer le réseau, impirmante...
-------------------On Error Resume Next
cette instruction est inutile car tu n'utilises pas de For, tu fais Next en cas d'erreur mais Next de quoi ?
-------------------nw.RemoveNetworkDrive str_lecteur, True, True
on enlève le lecteur si il existe (grâce aux deux paramètres true)
-------------------nw.MapNetworkDrive str_lecteur, str_NetworkPath, True
on l'ajoute si il n'existe pas
------------------- -
