[Solved] Dllcall help

[afoocn 0]

Here there is a hardwareid.dll, can be used to generate machine code, including HDD, NIC, CPU, BIOS, can be a single, can also be a combination of the four. attachment's inside contains the code written in VB, I tried DLLCALL, but failed.

here is my code.

#include "array.au3"
Local $result = DllCall("HardwareID.dll", "str", "GetHardwareID", "BOOLEAN", False, "BOOLEAN", False , "BOOLEAN", True, "BOOLEAN", True, "str","R5LR-S4TQ")
;_arraydisplay($result)
MsgBox(0,0,$result[0])

 

 

HardwareID VB6.zip

Edited August 1, 2016 by afoocn

[kcvinu 64]

Check for @error

[JohnOne 1,594]

Post link to documentation.

[Danyfirex 539]

You can do it like this.

 

Local $aRet = DllCall("HardwareID.dll", "long", "GetHardwareId", "bool", False, "bool", False, "bool", True, "bool", True, "str", "", "int", 255)
If Not @error And $aRet[0] > 0 Then
    Local $sHardwareId = $aRet[5]
    MsgBox(0, "HardwareId", $sHardwareId)
EndIf

Saludos

Edited July 30, 2016 by Danyfirex

[afoocn 0]

7 hours ago, Danyfirex said:

You can do it like this.

 

Local $aRet = DllCall("HardwareID.dll", "long", "GetHardwareId", "bool", False, "bool", False, "bool", True, "bool", True, "str", "", "int", 255)
If Not @error And $aRet[0] > 0 Then
    Local $sHardwareId = $aRet[5]
    MsgBox(0, "HardwareId", $sHardwareId)
EndIf

Saludos

Thanks a lot @Danyfirex, and both of upstairs.

I found that there is a problem, I use WINDOWS 64-bit version, but also add a line: # PRE_UseX64 = n