Je suis en stage dans une ESN, et l'on m'a confié la réalisation d'un script en VBS (et PowerShell) afin "d'automatiser" la connexion à des lecteurs réseaux. Seulement, je n'y connais rien en scripting, donc tout ceci est un peu (beaucoup) flou pour moi
La situation : un des clients est amené à travailler sur 3 sites différents, ayant chacun un NAS sur lesquelles il doit accéder à un certains nombres de dossiers. Dossiers qu'il a monté comme des Lecteurs-réseaux et doit donc les laisser montés pour ne pas avoir à réitérer l'opération à chaque fois qu'il change de site (ou s'y connecte en VPN). Ce n'est donc vraiment pas pratique pour lui, puisque cela lui fait 22 Lecteurs-réseaux montés en permanence dans son Explorateur de fichiers (il utilise Windows 10).
Ainsi, le but du script serait de déconnecter automatiquement les "anciens lecteurs" et reconnecter automatiquement les Lecteurs-réseaux du site désiré, et d'entrer les identifiants et mots de passe.
Je sais que cette solution n'est vraiment pas conseillé d'un point de vue sécurité, et a été "débattu" dans un autre topic où j'y ai demandé des alternatives, mais mon tuteur de stage souhaite malgré tout cette solution. Le script sera donc ensuite chiffré ou crypté (pas sûr du bon terme, mais du moins rendu illisible) .
J'ai déjà trouvé ceci (non sans mal) en fouillant un peu sur internet :
Citation :
Option Explicit
Dim objNetwork, strDrive, objShell, objUNC
Dim strRemotePath1, strDriveLetter1, strNewName1
' Add or subtract as many as your want strDriveLetter1 = "Z:" strRemotePath1 = "\\server\share1" strNewName1 = "Program Files"
' Change the Letter, Path, and Name
' The only thing to change below this is the comments for your knowledge
' Section to map the Z network drive
Set objNetwork = CreateObject("WScript.Network" ) objNetwork.MapNetworkDrive strDriveLetter1, strRemotePath1 ' Section which actually (re)names the Z Mapped Drive
Set objShell = CreateObject("Shell.Application" )
objShell.NameSpace(strDriveLetter1).Self.Name = strNewName1
WScript.Quit
' End of VBScript.
|
Si j'ai bien compris, d'après mes lectures et ce que je vois, ce que j'ai mis en gras :
- le premier bloc sert à "créer" les variables que l'on va utiliser,
- le second lui, permet d'associer aux variables un contenu : la lettre, le chemin et le nom ici ...
La seconde partie par contre ... je n'ai pas vraiment compris ce que faisait chaque éléments (où en quoi est-ce nécessaire), et je n'ai pas trouvé (ou plutôt où et comment chercher) de réponses, ni vraiment compris pour "la syntaxe".
J'aimerais donc avoir quelques éclaircissement à ce propos, pour commencer, sivouplé
Je vous remercie d'avance pour vos réponses et votre aide ,
Un complet novice
Message édité par Antionn le 19-08-2021 à 23:56:16
---------------
Mon topic achat // [TU] Radeon Software // [TU] AMD RDNA2 - RX6x00