Help please: AutoIT mapping network drive in WinPE 10 does not work, but a batch file or command line does!

[ModemJunki 2]

Hello,

I'm working in Windows PE environment (10.0.10586). I think I have some permissions issue related to AutoIT

I've tried with Net Share and with DriveMapAdd - neither work.

So finally I made the script output a batch file with a pause and what I found is that in WinPE, the batch file behaves differently if it's run at the command prompt or if it is spawned by AutoIT.

If spawned by AutoIT, the net use command gives error 1231 "The network location cannot be reached". I assume this is the same problem that DriveMapAdd is having.

But if I run the same batch file under the command shell in the Windows PE instance, it works.

I also made a simple test with Ping() and it always returns 1 (host is offline) but I can ping it from the command line in the same PE session.

Are there service dependencies for this to work? What is preventing AutoIT from accessing the network?

Below sample is kind of dirty but illustrates what I'm doing.

expandcollapse popup

#RequireAdmin
#include <Array.au3>
;~ #include <AutoItConstants.au3>

$s_user = "USER"
$s_pass = "PASS"

_SetUpPEIP()

Func _SetUpPEIP()
    Local $s_RMTIP = "10.1.1.4"
    Local $s_RMTSHR = "SHARED_FOLDER"
    Local $s_Mapbat = "X:\MapShare.bat"
    Local $s_IPPrefix = "10.1.1."
    Local $s_netMask = "255.255.255.0"
    Local $s_StartIP = 20
    Local $a_NICs[1]
    Local $objWMIService = ObjGet("winmgmts:\\localhost\root\CIMV2")
    Local $colItems = $objWMIService.ExecQuery("SELECT * FROM Win32_NetworkAdapter", "WQL")

    If IsObj($colItems) Then ; gather network card names
        For $objItem In $colItems
            If $objItem.NetConnectionStatus == "2" Or $objItem.NetConnectionStatus == "9" Then
                _ArrayAdd($a_NICs, $objItem.NetConnectionID)
            EndIf
        Next
    EndIf

    If IsArray($a_NICs) Then ; assign them I.P. addresses
        For $i = 1 To UBound($a_NICs) - 1
            $s_setIP = "netsh interface IP set address name=""" & $a_NICs[$i] & """ static " & $s_IPPrefix & $i + $s_StartIP - 1 & " " & $s_netMask
            $s_ipRes = RunWait(@ComSpec & " /c " & $s_setIP, @ScriptDir, @SW_HIDE) ; expect 0
            Sleep(100)
            ConsoleWrite($s_setIP & " result is:  " & $s_ipRes & @CRLF)
        Next

        ; now map a drive
        $s_mapDrv = "net use Z: \\" & $s_RMTIP & "\" & $s_RMTSHR & " /user:" & $s_user & " " & $s_pass & " /y"


        $OpenMapFile = FileOpen($s_Mapbat, 2)
        FileWriteLine($OpenMapFile, $s_mapDrv)
        FileWriteLine($OpenMapFile, "pause")
        FileClose($OpenMapFile)

;~      $s_mapRes = RunWait(@ComSpec & " /c " &  $s_Mapbat, @ScriptDir) ; expect 0
        $s_mapRes = ShellExecuteWait($s_Mapbat, "", @ScriptDir) ; expect 0

        ConsoleWrite("result of " & $s_mapDrv & " is:  " & $s_mapRes & " extended code is " & @error & @CRLF)
    Else
        ; error! No cards found!
    EndIf
EndFunc   ;==>_SetUpPEIP