WinFuture-Forum.de: Office Xp Serial Auslesen - WinFuture-Forum.de

Zum Inhalt wechseln

Nachrichten zum Thema: Office
Seite 1 von 1

Office Xp Serial Auslesen


#1 Mitglied ist offline   macoku 

  • Gruppe: Mitglieder
  • Beiträge: 1
  • Beigetreten: 18. August 06
  • Reputation: 0

geschrieben 18. August 2006 - 13:29

hallo,
kann einer mir sagen wie ich das serial für XP Office 2003 auslese.

gibt es da inen tool für?

danke und gruss
macoku

PS: Die Original CD-Hülle, haben meine beiden kinder als Bastelvorlage benutzt :-(
0

Anzeige



#2 Mitglied ist offline   Cuilanor 

  • Gruppe: aktive Mitglieder
  • Beiträge: 347
  • Beigetreten: 19. Januar 06
  • Reputation: 0
  • Wohnort:A-Dorf

geschrieben 18. August 2006 - 15:37

Schau mal hier Jelly Bean
0

#3 Mitglied ist offline   Stefan_der_held 

  • Gruppe: Offizieller Support
  • Beiträge: 14.289
  • Beigetreten: 08. April 06
  • Reputation: 885
  • Geschlecht:Männlich
  • Wohnort:Dortmund NRW
  • Interessen:Alles wo irgendwie Strom durchfließt fasziniert mich einfach weswegen ich halt Elektroinstallateur geworden bin :)

geschrieben 30. August 2006 - 09:33

Ich wage mal zu bezweifeln, dass diese KeyFinder sauber sind. Das ist schließlich eine gute Methode Malware einzuschleusen :wink:
0

#4 _MagicAndre1981_

  • Gruppe: Gäste

geschrieben 30. August 2006 - 09:43

wieso? der algorithmus ist nicht schwer und den gibts genug im Netz :wink:
0

#5 Mitglied ist offline   Stefan_der_held 

  • Gruppe: Offizieller Support
  • Beiträge: 14.289
  • Beigetreten: 08. April 06
  • Reputation: 885
  • Geschlecht:Männlich
  • Wohnort:Dortmund NRW
  • Interessen:Alles wo irgendwie Strom durchfließt fasziniert mich einfach weswegen ich halt Elektroinstallateur geworden bin :)

geschrieben 30. August 2006 - 09:54

Der Algorythmus ja. Aber da kannst du noch eine Menge ranfügen :) Ich hatte vor 2 Jahren mal einem mit nem Keylogger erwischt. Also Nix ist unmöglich :wink:
0

#6 Mitglied ist offline   caryasil 

  • Gruppe: Mitglieder
  • Beiträge: 15
  • Beigetreten: 30. August 06
  • Reputation: 0
  • Wohnort:Bremen
  • Interessen:...ne menge!

geschrieben 30. August 2006 - 10:12

mit tweak-xp kannst du die serial für office und windows auslesen.

guggst du hier -> http://www.totalidea...tent/index.html
0

#7 Mitglied ist offline   puppet 

  • Gruppe: aktive Mitglieder
  • Beiträge: 2.857
  • Beigetreten: 27. April 04
  • Reputation: 0
  • Geschlecht:Männlich
  • Wohnort:Rudoltown

geschrieben 30. August 2006 - 11:41

Du kannst das ganze auch mit VBS machen wenn du den Keyfindern nicht traust.
Hier ein Beispiel für Office XP Professional:
Set WshShell = WScript.CreateObject("WScript.Shell")
HexBuf = WshShell.RegRead("HKLM\SOFTWARE\Microsoft\Office\10.0\Registration\{90280409-6000-11D3-8CFE-0050048383C9}\DigitalProductId")
For l = lBound(HexBuf) to uBound(HexBuf)
	tmp=tmp & " "& Hex (HexBuf(l))
next
StartOffset = 52
EndOffset =67
Dim Digits (24)
Digits (0) = "B" : Digits (1) = "C": Digits (2) = "D": Digits (3) = "F":
Digits (4) = "G": Digits (5) = "H": Digits (6) = "J": Digits (7) = "K":
Digits (8) = "M": Digits (9) = "P": Digits (10) = "Q": Digits (11) = "R":
Digits (12) = "T": Digits (13) = "V": Digits (14) = "W": Digits (15) = "X":
Digits (16) = "Y": Digits (17) = "2": Digits (18) = "3": Digits (19) = "4":
Digits (20) = "6" : Digits (21) = "7" : Digits (22) = "8": Digits (23) = "9"
dLen = 29
sLen = 15
Dim HexDigitalPID (15)
Dim Des (30)
For i = StartOffset to EndOffset
	HexDigitalPID (i-StartOffset) = HexBuf(i)
	tmp2=tmp2 & " "& Hex (HexDigitalPID(i-StartOffset))
next
KEYSTRING =""
for i=dLen-1 to 0 step -1
	if ((i + 1) mod 6) = 0 then
		Des (i) = "-"
		KEYSTRING =KEYSTRING & "-"
	else
		HN = 0
		For N = (sLen -1) to 0 step -1
			Value = ( (HN *2^8 ) Or HexDigitalPID (N))
			HexDigitalPID (N) = Value \ 24
			HN = (Value mod 24)
		next
		Des(i) = Digits(HN)
		KEYSTRING =KEYSTRING & Digits(HN)
	end if
next
KEYSTRING2 = StrReverse (KEYSTRING)
WScript.Echo "Product Key: " & KEYSTRING2


Für Office 2003 (Professional) einfach den Reg-Key (in der zweiten Zeile) etwas abändern:
HKLM\SOFTWARE\Microsoft\Office\11.0\Registration\{90110407-6000-11D3-8CFE-0150048383C9}\DigitalProductId

Dieser Beitrag wurde von puppet bearbeitet: 30. August 2006 - 11:51

0

Thema verteilen:


Seite 1 von 1

1 Besucher lesen dieses Thema
Mitglieder: 0, Gäste: 1, unsichtbare Mitglieder: 0