Ich habe folgendes Script, um die Windows-Version eines entfernten Systems zu ermitteln.
Hatte eigentlich gehofft, damit die Major & Minor-Version zurückzubekommen. Aber irgendwo hat sich mal wieder ein Fehler eingeschlichen. Die schwierigen DllCall's. Kann mir jemand erklären was ich flasch gemacht habe ?
Spoiler anzeigen
_NetWkstaGetInfo("\\Servername")
[/autoit] [autoit][/autoit] [autoit]Func _NetWkstaGetInfo($sServer)
Local $sBuffer = DllStructCreate("dword;ptr;ptr;dword;dword")
Local $return = DllCall("netapi32.dll","int","NetWkstaGetInfo", _
"wstr",$sServer, _
"int",100, _
"ptr",DllStructGetPtr($sBuffer))
If $return[0] Then
MsgBox(0,"Fehler","Fehler beim DllCall 'NetWkstaGetInfo'")
Else
MsgBox(0,"Ausgabe",DllStructGetData($sbuffer,4))
EndIf
$return = DllCall("netapi32.dll","int","NetApiBufferFree", _
"ptr",DllStructGetPtr($sBuffer))
If $return[0] Then
MsgBox(0,"Fehler","Fehler beim DllCall 'NetApiBufferFree'")
EndIf
EndFunc
Besten Dank
micha_he