I was wondering if I could get some help setting up a wireless WPA network automatically.
At the moment, the code I have attached is for a WEP network. I was wondering how I would change it to a WPA network.
Thanks Heaps for your help.
SSID="WIFINETWORK" 'Adjust to read the SSID
Key="Password" 'Adjust to read the key
Dim objShell:Set objShell=CreateObject("Wscript.Shell")
.Run "control netsetup.cpl"
.AppActivate "Wireless Network Setup Wizard"
.SendKeys "%NSN" & SSID & "%MN"
.SendKeys "%W" & Key
.SendKeys "%O" & Key