SSID= " WIFINETWORK " 'Przystosowywać the SSID
Key= " Hasło " 'Przystosowywać the klucz
Ciemnawy objShell: Ustalony objShell=CreateObject ("Wscript.Shell")
Z objShell
. Bieg "kontrolny netsetup.cpl"
wscript.sleep 1000
.AppActivate "Sieć Bezprzewodowa Ustawianie Czarownik"
.SendKeys "%NSN" & SSID & "%MN"
.SendKeys "%W" & Klucz
.SendKeys "%O" & Klucz
.SendKeys "%NSN+ {Zakładka} ~"
Końcówka Z
Ustalony objShell=Nothing
|