Save / Restore Wireless profiles

[BlackHoleSun]

I'm trying to create a script that will save a users wireless profile settings (name, security, password) and restore them later. There will be 3 networks that are standard and won't need to be saved at all. The profiles can be saved to either an INI or XML file, I have experience with INIs, but if XML would be better that's fine.

All I've been able to find for the most part has been scripts dealing with the wireless adapters, nothing on the profile side of things. Thanks.

[willichan]

A little Google goes a long way.

http://technet.microsoft.com/en-us/library/cc755301%28WS.10%29.aspx

[BrewManNH]

Willichan, that only applies to Server 2008, and maybe Vista/7, won't work if the user is on XP.

Check out this thread and see if you can use some of the UDF's functions to do what you need

Edited November 1, 2010 by BrewManNH

[willichan]

NETSH works under XP as well. I have been using it for years.

http://www.microsoft.com/resources/documentation/windows/xp/all/proddocs/en-us/netsh.mspx?mfr=true

But if the UDF does what is needed, I'm all for not re-inventing the wheel.

[BrewManNH]

I didn't mean that Netsh didn't work in XP, what I meant was that the page you referenced only applies to Server 2008 and maybe Vista/7. Also, I'm not sure that Netsh under XP allows you to access the WLAN profiles the same way it does under Vista/7, I haven't been able to find any commands for XP that work to save profiles, probably just missed them as I was just browsing the subject.

[willichan]

@BrewManNH: You are right. Wireless does get left out on the XP version.

I guess the XP scripts I did were more for RAS profiles (dating myself a bit?).

@BlackHoleSun: Go with the UDF link that BrewManNH gave you.

[BlackHoleSun]

It's been a busy week, but I have worked on implementing Wifi33B into my code. It looks like it can back the profiles up, but I noticed it's not the same when it comes to the password as it is in my Win7 exports. Also when I import I use the ConsoleWrite and it says it's an invalid schema. This goes for the original XP profiles as well as the Win7 profiles. In the XML outputs, Win7 has a longer password than XP and Win7 also shows it as a "passPhrase" whereas XP has it as "networkKey".

Below are the 2 functions relating to backing up and restoring. Maybe I'm doing something wrong.

expandcollapse popup

;~ =============================================================
Func BackupProfiles($osVersion, $user)
    If ($osVersion = "Win_7") Then
        ;Win7 code goes here
        If DirGetSize($user) < 0 Then
            DirCreate($user)
        EndIf
        RunWait("netsh wlan export profile folder=" & $user)
        Return -1
    ElseIf ($osVersion = "Win_XP") Then
        ;XP code goes here
        If DirGetSize($user) < 0 Then
            DirCreate($user)
        EndIf
        
        _Wlan_StartSession()
        Local $sProfile
        Local $asProfileList = _Wlan_GetProfileList(-1, -1)
        For $i = 0 To UBound($asProfileList) - 1
            $sProfile = _Wlan_GetProfileXML(-1, -1, $asProfileList[$i])
            FileWrite($user & "\Wireless Network Connection-" & $asProfileList[$i] & ".xml", $sProfile)
        Next
        _Wlan_EndSession(-1)
        
        Return -1
    EndIf
EndFunc ;==>RestoreProfiles

;~ =============================================================
Func RestoreProfiles($osVersion)
    If ($osVersion = "Win_7") Then
        ;Win7 code goes here
        Local $search, $file, $netsh
        $search = FileFindFirstFile($userName & "\*.xml")
        For $i = 1 to 200
            $file = FileFindNextFile($search)
            If @error Then ExitLoop
            $netsh = 'netsh wlan add profile filename="' & $userName & '\' & $file & '"'
            RunWait($netsh)
        Next
        FileClose($search)
        Return -1
    ElseIf ($osVersion = "Win_XP") Then
        ;XP code goes here
        
        _Wlan_StartSession()
        Local $sProfile, $asProfileList, $nextFile
        Local $firstProfile = FileFindFirstFile($userName & "\*.xml")
        FileOpen($firstProfile)
        For $i = 0 To $firstProfile + 1
            $nextFile = FileFindNextFile($firstProfile)
            FileOpen($nextFile)
            $sProfile = _Wlan_SetProfileXML(-1, -1, $nextFile)
            FileClose($nextFile)
            ConsoleWrite($sProfile & @CRLF)
        Next
        FileClose($firstProfile)
        _Wlan_EndSession(-1)
        
        Return 0
    EndIf
EndFunc ;==>RestoreProfiles

This is the Win7 XML:

<?xml version="1.0"?>
<WLANProfile xmlns="http://www.microsoft.com/networking/WLAN/profile/v1">
    <name>SSIDNAME</name>
    <SSIDConfig>
        <SSID>
            <hex>SSIDHEX</hex>
            <name>SSIDNAME</name>
        </SSID>
        <nonBroadcast>false</nonBroadcast>
    </SSIDConfig>
    <connectionType>ESS</connectionType>
    <connectionMode>auto</connectionMode>
    <MSM>
        <security>
            <authEncryption>
                <authentication>WPA2PSK</authentication>
                <encryption>AES</encryption>
                <useOneX>false</useOneX>
            </authEncryption>
            <sharedKey>
                <keyType>passPhrase</keyType>
                <protected>true</protected>
                <keyMaterial>LongPasswordCodeHere</keyMaterial>
            </sharedKey>
        </security>
    </MSM>
</WLANProfile>

This is the XP XML:

<?xml version="1.0"?>
<WLANProfile xmlns="http://www.microsoft.com/networking/WLAN/profile/v1">
    <name>SSIDNAME</name>
    <SSIDConfig>
        <SSID>
            <hex>SSIDHEX</hex>
            <name>SSIDNAME</name>
        </SSID>
    </SSIDConfig>
    <connectionType>ESS</connectionType>
    <MSM>
        <security>
            <authEncryption>
                <authentication>WPA2PSK</authentication>
                <encryption>AES</encryption>
                <useOneX>false</useOneX>
            </authEncryption>
            <sharedKey>
                <keyType>networkKey</keyType>
                <protected>false</protected>
                <keyMaterial>ShortPasswordCodeHere</keyMaterial>
            </sharedKey>
        </security>
    </MSM>
</WLANProfile>