myGully.com Boerse.SH - BOERSE.AM - BOERSE.IO - BOERSE.IM Boerse.BZ .TO Nachfolger
Zurück   myGully.com > Computer & Technik > Programmierung
Seite neu laden

[BATCH] HardWare ID

Willkommen

myGully

Links

Forum

 
Antwort
Themen-Optionen Ansicht
Ungelesen 26.09.09, 16:35   #1
BadFriend
Erfahrener Newbie
 
Registriert seit: Apr 2009
Beiträge: 149
Bedankt: 878
BadFriend ist unten durch! | -1688 Respekt PunkteBadFriend ist unten durch! | -1688 Respekt PunkteBadFriend ist unten durch! | -1688 Respekt PunkteBadFriend ist unten durch! | -1688 Respekt PunkteBadFriend ist unten durch! | -1688 Respekt PunkteBadFriend ist unten durch! | -1688 Respekt PunkteBadFriend ist unten durch! | -1688 Respekt PunkteBadFriend ist unten durch! | -1688 Respekt PunkteBadFriend ist unten durch! | -1688 Respekt PunkteBadFriend ist unten durch! | -1688 Respekt PunkteBadFriend ist unten durch! | -1688 Respekt Punkte
Standard [BATCH] HardWare ID

Hey, ich bins mal wieder

Ich wollte fragen wie man die Hardware ID verschiedener PC Kompnenten herausfinden kann.
Ich hab das mal in einer Batch von nem gecrackten CsS Hack gesehen.
Diese war leider kompiliert (.exe) sodass ich den code nicht angucken konnte

Weiß zufällig einer hier wie der code heißt bzw wie das ganze funktioniert ?


BadFriend
BadFriend ist offline   Mit Zitat antworten
Ungelesen 27.09.09, 23:13   #2
targhed
? ??? ? ??? ?
 
Benutzerbild von targhed
 
Registriert seit: Oct 2008
Beiträge: 107
Bedankt: 342
targhed ist noch neu hier! | 0 Respekt Punkte
Standard

also mit wmi gehts so

cpu id
Zitat:
LOCAL lcComputerName, loWMI, lowmiWin32Objects, lowmiWin32Object
lcComputerName = GETWORDNUM(SYS(0),1)
loWMI = GETOBJECT("WinMgmts://" + lcComputerName)
lowmiWin32Objects = loWMI.InstancesOf("Win32_Processor")
FOR EACH lowmiWin32Object IN lowmiWin32Objects
WITH lowmiWin32Object
? "ProcessorId: " + TRANSFORM(.ProcessorId)
ENDWITH
ENDFOR
mac adresse
Zitat:
LOCAL lcComputerName, loWMIService, loItems, loItem, lcMACAddress
lcComputerName = "."
loWMIService = GETOBJECT("winmgmts:\\" + lcComputerName + "\root\cimv2")
loItems = loWMIService.ExecQuery("Select * from Win32_NetworkAdapter",,4
FOR EACH loItem IN loItems
lcMACAddress = loItem.MACAddress
IF !ISNULL(lcMACAddress)
? "MAC Address: " + loItem.MACAddress
?
ENDIF
ENDFOR
hdd id
Zitat:
LOCAL lcComputerName, loWMIService, loItems, loItem, lcVolumeSerial
lcComputerName = "."
loWMIService = GETOBJECT("winmgmts:\\" + lcComputerName + "\root\cimv2")
loItems = loWMIService.ExecQuery("Select * from Win32_LogicalDisk")
FOR EACH loItem IN loItems
lcVolumeSerial = loItem.VolumeSerialNumber
IF !ISNULL(lcVolumeSerial)
? "Name: " + loItem.NAME
? "Volume Serial Number: " + loItem.VolumeSerialNumber
?
ENDIF
ENDFOR
__________________
Gras wächst auch nicht schneller, wenn man daran zieht!
targhed ist offline   Mit Zitat antworten
Antwort


Forumregeln
Du kannst keine neue Themen eröffnen
Du kannst keine Antworten verfassen
Du kannst keine Anhänge posten
Du kannst nicht deine Beiträge editieren

BB code is An
Smileys sind An.
[IMG] Code ist An.
HTML-Code ist Aus.

Gehe zu


Alle Zeitangaben in WEZ +1. Es ist jetzt 23:14 Uhr.


Sitemap

().