afoocn 0 Posted July 30, 2016 (edited) 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 Share this post Link to post Share on other sites
kcvinu 64 Posted July 30, 2016 Check for @error Hide kcvinu's signature Hide all signatures My ContributionsUDF Link Viewer --- A tool to visit the links of some most important UDFs Includer_2 ----- A tool to type the #include statement automatically Digits To Date ----- date from 3 integer valuesPrintList ----- prints arrays into console for testing. Alert ------ An alternative for MsgBox MousePosition ------- A simple tooltip display of mouse positionGRM Helper -------- A littile tool to help writing code with GUIRegisterMsg functionAccess_UDF -------- An UDF for working with access database files. (.*accdb only) Share this post Link to post Share on other sites
JohnOne 1,594 Posted July 30, 2016 Post link to documentation. Hide JohnOne's signature Hide all signatures AutoIt Absolute Beginners Require a serial Pause Script Video Tutorials by Morthawt ipify Monkey's are, like, natures humans. Share this post Link to post Share on other sites
Danyfirex 541 Posted July 30, 2016 (edited) 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 1 Skysnake reacted to this Hide Danyfirex's signature Hide all signatures Danysys.com AutoIt... UDFs: VirusTotal API 2.0 UDF - libZPlay UDF - Apps: Guitar Tab Tester - VirusTotal Hash Checker Examples: Text-to-Speech ISpVoice Interface - Get installed applications - Enable/Disable Network connection PrintHookProc - WINTRUST - Mute Microphone Level - Get Connected NetWorks - Create NetWork Connection ShortCut Share this post Link to post Share on other sites
afoocn 0 Posted July 31, 2016 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 Share this post Link to post Share on other sites
