VBScript werkt met gekoppelde stations (5 / 6 stap)

Stap 5: De voltooide script

Hier is het voltooide script zonder interuptions die u kunt gewoon rechts schuif in uw script en worden gedaan met het. U moet de regel die verwijst naar de afbeelding naar een afbeelding die u in een map die u wilt, maar herinner me geen gebruik maken van een map op het volume dat u wilt verwijderen of het zal verpletteren uit omdat het niet in de map vinden wilt omleiden. Ook vergeet niet dat u de stationsletters en GUID wijzigen aan uw werkelijke degenen zoals deze mijne weerspiegelen en kunnen eventueel sodemieter van uw systeem. Kijken fo de Rem-regels voor de regel die u wilt wijzigen en u zou fijn moeten zijn:

set shellobj = CreateObject("WScript.Shell")
shellobj.run "cmd"
WScript.Sleep 200
REM Wijzig de volgende regel aan de stationsaanduiding van het station
shellobj.SendKeys "mountvol g:\ /d {Voer}"
WScript.Sleep 2000
REM Wijzig de regel van de volgende bestemmingspunt de werkelijke naam en directory van de afbeelding weer te geven met behulp van uw
shellobj.SendKeys "c:\3.jpg{enter}exit{enter"}

Dim MyVar
myVar = 2
terwijl myvar = 2
MyVar = MsgBox ("Turn drive back op", 65, "Turn station terug op")
wend

MsgBox ("We zullen nu aanzetten harde schijf terug!!!")
shellobj.run "cmd"
WScript.Sleep 200
REM Wijzig de GUID in uw werkelijke GUID en de stationsaanduidingen (beiden) aan het feitelijke station
rem brief en het label elk etiket wilt u het station worden gelabeld
shellobj.SendKeys "mountvol g: \\?\Volume{{}c0ea045c-56fe-11de-8a5a-001111cb3c76{}}\{enter}label g: HDD1e {Voer} taskkill/f im rundll32.exe{enter}exit{enter}"