troubleshooting Question

WPA wireless network automate

Avatar of interrelateIT
interrelateITFlag for Australia asked on
Windows BatchWindows XP
1 Comment1 Solution1018 ViewsLast Modified:
Hi Guys,
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")
 
With objShell
  .Run "control netsetup.cpl"
  wscript.sleep 1000
  .AppActivate "Wireless Network Setup Wizard"
  .SendKeys "%NSN" & SSID & "%MN"
  .SendKeys "%W" & Key
  .SendKeys "%O" & Key
  .SendKeys "%NSN+{Tab}~"
End With
 
Set objShell=Nothing
ASKER CERTIFIED SOLUTION
interrelateIT

Our community of experts have been thoroughly vetted for their expertise and industry experience.

Join our community to see this answer!
Unlock 1 Answer and 1 Comment.
Start Free Trial
Learn from the best

Network and collaborate with thousands of CTOs, CISOs, and IT Pros rooting for you and your success.

Andrew Hancock - VMware vExpert
See if this solution works for you by signing up for a 7 day free trial.
Unlock 1 Answer and 1 Comment.
Try for 7 days

”The time we save is the biggest benefit of E-E to our team. What could take multiple guys 2 hours or more each to find is accessed in around 15 minutes on Experts Exchange.

-Mike Kapnisakis, Warner Bros