silent vbs.
HejJeg skal skrive et script der opretter gæste/midlertidige brugere på vores trådsløse netværk.
Mit problem er at man kan se dette script i baggrunden med login og kommandoer, ikke smart og derfor vil jeg gerne køre det silent. dog skal input bokse kunne benyttes.
Jeg har skrevet et script som følger:
**************************************************************
Option Explicit
Dim oShell, strUser, strPass
set oShell= WScript.CreateObject("WScript.Shell")
strUser =Inputbox ("Indtast ny bruger")
strPass =Inputbox ("Indtast kode til ny bruger")
oShell.Run "telnet"
WScript.Sleep 500
oShell.Sendkeys "open 10.10.15.11~"
WScript.Sleep 500
oShell.Sendkeys "adminbruger~"
WScript.Sleep 500
oShell.Sendkeys "adminpassword~"
WScript.Sleep 100
oShell.Sendkeys "config~"
WScript.Sleep 100
oShell.Sendkeys "netuser add "&strUser&" "&strPass&" wlan 1 userType guest lifetime 3600~"
WScript.Sleep 100
oShell.Sendkeys "end~"
WScript.Sleep 100
oShell.Sendkeys "logout~"
WScript.Sleep 100
oShell.Sendkeys "n~"
oShell.Sendkeys "<enter>~"
oShell.Sendkeys "q~"
MsgBox ("Bruger: "&strUser&""&vbNewLine&"Password: "&strPass&""&vbNewLine&"Er nu oprettet..!")
**************************************************************
hvordan vil man nemmest kunne dette?