You could try removing the network drives individually rather than using "*" - perhaps "*" is dropping IPC connections as well?

Here is an example of how to remove drive mappings using the recently posted EnumNetworkDrives() udf:
Code:
For Each $sDriveMap In EnumNetworkDrives()
If Not @ERROR
$sDriveLetter=Split($sDriveMap,",")[0]
"Removing network mapping '"+$sDriveLetter+"'..."+@CRLF
Use $sDriveLetter /delete /persistent
If @ERROR "Got error ["+@ERROR+"] "+@SERROR+@CRLF EndIf
EndIf
Next

Function EnumNetworkDrives()
Dim $WshNetwork, $oDrives, $i, $DriveArray[0]
$EnumNetworkDrives=""
$WshNetwork = CreateObject("WScript.Network")
If Not @ERROR
$oDrives = $WshNetwork.EnumNetworkDrives
For $i = 0 To $oDrives.Count - 1 Step 2
$DriveArray[Ubound($DriveArray)]=$oDrives.Item($i)+','+$oDrives.Item($i+1)
ReDIM Preserve $DriveArray[UBound($DriveArray)+1]
Next
If UBound($DriveArray) > 0
ReDIM Preserve $DriveArray[UBound($DriveArray)-1]
Else
$DriveArray = 0
EndIf
Else
$EnumNetworkDrives=@ERROR
Exit $EnumNetworkDrives
EndIf
$EnumNetworkDrives=$DriveArray
EndFunction