afoocn Posted July 30, 2016 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
kcvinu Posted July 30, 2016 Posted July 30, 2016 Check for @error Spoiler My Contributions Glance GUI Library - A gui library based on Windows api functions. Written in Nim programming language. UDF 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 values PrintList ----- prints arrays into console for testing. Alert ------ An alternative for MsgBox MousePosition ------- A simple tooltip display of mouse position GRM Helper -------- A littile tool to help writing code with GUIRegisterMsg function Access_UDF -------- An UDF for working with access database files. (.*accdb only)
JohnOne Posted July 30, 2016 Posted July 30, 2016 Post link to documentation. AutoIt Absolute Beginners Require a serial Pause Script Video Tutorials by Morthawt ipify Monkey's are, like, natures humans.
Danyfirex Posted July 30, 2016 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 Skysnake 1 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
afoocn Posted July 31, 2016 Author 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
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now