16. april 2009 - 15:39Der er
6 kommentarer og 1 løsning
VBScript til at mappe et netværksdrev
Hej Eksperter,
jeg har fået stillet mig den opgave på mit arbejde, at lave et script, batchfil, WSH eller bare noget i den stil, der kan afvikles på en maskine, som så giver instrukser.
Sagen er den, at vi har ca. 75 maskiner der alle skal have mappet et netværksdrev og det er hele meget standard og ensformet og derfor nemmest at gøre det ved at lave et hurtigt script.
Desværre er mine erfaringer indenfor denne programmering ikke så stor, så derfor mit spørgsmål.
Det netværksdrev har en sti som er ens for alle, men så er sagen den, at de skal logge på det igennem deres standard windows brugernavn (oftest deres initialer, f.eks. EGH), men adgangskoden er en standard for alle, og altså anderledes end deres Windows login.
Stien kan vi kalde: \\windows_server\faelles_mappe
Drev bogstavet skal være "S"
Jeg har lidt på fornemmelsen at det ikke er det mest avancerede at lave sådan en lille fil der kan trykkes på og så bliver drevet mappet, men hvordan jeg lige koder det er der jeg kommer lidt til kort.
Så håber meget der er nogle som har mere forstand på det end mig.
så fik jeg testet det, og det synes ikke at virke - eller i hvert fald skete der intet.
Jeg prøvede at indtaste i cmd: /c net use s: \\windows_server\faelles_mappe
Der kunne den så ikke finde ud af c/ men tænkte at det måske var noget til selve scriptet...
Så prøvede jeg bare at skrive net use s: \\windows_server\faelles_mappe og der virkede det, så spurgte den så om brugernavn og password. Altså i cmd.
Men da jeg prøvede at dobbeltklikke på filen *.vbs skete der intet. Ingen fejlmeddelelser eller andet. Ved ikke om det er mig der har gjort noget forkert, for jeg har bare indsat den rigtige netværkssti der hvor du skriver \\windows_server\faelles_mappe og så indsat den rigtige adgangskode der hvor du skriver "adgangskode"
#5 Det er mig der har været for hurtigt, du skal sætte følgende linie ind: Set objShell = Wscript.CreateObject("Wscript.Shell")
Så det altså kommer til at se sådan her ud: On Error Resume Next Set WshNetwork = WScript.CreateObject("WScript.Network") Set objShell = Wscript.CreateObject("Wscript.Shell")
strCommand = "cmd /c net use s: \\windows_server\faelles_mappe /user:" & WshNetwork.UserName & " adgangskode"
super - ja nu virker det... Tusind tak for din hjælp.
Du bliver naturligvis kvitteret med en stak point :-)
Mvh Emil
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.