Hvordan koble til en ekstern datamaskin i VBScript

May 21

Du kan bruke VBScript til å koble til en ekstern datamaskin i enten et bedriftsnettverk eller annen sikker, interne nettverket. Din evne til å koble til en ekstern datamaskin ved hjelp av en VBScript filen vil kreve datamaskinen til å være slått på og å ha en IP-adresse eller domenenavn for å gjøre tilkoblingen i et nettverk. Når du har etablert disse forutsetningene, vil du skrive manuset for å teste tilkoblingen.

Bruksanvisning

Validere ekstern datamaskin er tilgjengelig

1 Klikk på "Start" -knappen, og klikk "Run."

2 Skriv "cmd / k" i Åpne-tekstboksen, og klikk på "OK" -knappen.

3 Skriv inn følgende ved ledeteksten, der "datamaskinnavn" er enten IP-adressen eller domenenavnet til datamaskinen: "ping datamaskinnavn".

4 Kontroller at systemet går tilbake med fire svarmeldinger.

Skrive og Kjør en Connection Script

5 Åpne din tekst editor.

6 Skriv inn følgende kode:

maskin = InputBox ( "Skriv inn navn på den eksterne datamaskinen:", "Spør!")

cimv2_string = "WINMGMTS:" & "\" & maskin & "\ root \ cimv2"

query = "select * from Win32_TerminalServiceSetting"

value_to_set = 1 '0 = av, 1 = på

satt cimv2 = GetObject (cimv2_string)

sette elementer = cimv2.ExecQuery (spørring)

for hvert element i elementer

item.SetAllowTSConnections (value_to_set)

neste

wscript.Echo "Terminal Services er aktivert."

7 Lagre filen med et VBS utvidelse til harddisken på datamaskinen.

8 Dobbeltklikk VBS-filen, og skriv inn navnet på datamaskinen i tekstboksen. Kontroller at det er tilbake med meldingen "Terminal Services er aktivert."

9 Forsøk å koble til den eksterne datamaskinen ved hjelp av Remote Desktop Protocol program i Windows. Hvis du er i stand til å logge inn, så den eksterne tilkoblingen VBScript har utført på riktig måte.