Windows 10 lisans anahtarımı nasıl öğrenebilirim |
8 Mesajlar | 2.156 Okunma | ||
- Üyelik 24.01.2020
- Yaş/Cinsiyet 25 / E
- Meslek Öğrenci
- Konum Çorum
- Ad Soyad Y** B**
- Mesajlar 912
- Beğeniler 91 / 118
- Ticaret 1, (%100)
Satın aldığım yerden lisans anahtarı vs vermediler bilgisayarda kurulu olan Windows 10'un lisans anahtarını nasıl öğrenebilirim?
- Üyelik 16.08.2014
- Yaş/Cinsiyet 31 / E
- Meslek Operaio Specializzato
- Konum Çorum
- Ad Soyad T** K**
- Mesajlar 244
- Beğeniler 49 / 48
- Ticaret 4, (%100)
CMD veya Powershell admin yetkisi ile
wmic path softwarelicensingservice get OA3xOriginalProductKey
kodunu calisirman yeterli
Powershell kodu:
(Get-WmiObject -query 'select * from SoftwareLicensingService').OA3xOriginalProductKey
wmic path softwarelicensingservice get OA3xOriginalProductKey
kodunu calisirman yeterli
Powershell kodu:
(Get-WmiObject -query 'select * from SoftwareLicensingService').OA3xOriginalProductKey
- Üyelik 24.01.2020
- Yaş/Cinsiyet 25 / E
- Meslek Öğrenci
- Konum Çorum
- Ad Soyad Y** B**
- Mesajlar 912
- Beğeniler 91 / 118
- Ticaret 1, (%100)
Onu denedim sonuç çıkmadı hocam
- Üyelik 12.01.2016
- Yaş/Cinsiyet 30 / E
- Meslek Otel
- Konum Antalya
- Ad Soyad R** A**
- Mesajlar 1263
- Beğeniler 214 / 215
- Ticaret 1, (%100)
windows 10 kurduğun zaman otomatik lisnası algılar biosta gömülü olur lisans
- Üyelik 23.01.2016
- Yaş/Cinsiyet 45 / E
- Meslek bilgisayar mühendisi
- Konum İstanbul Avrupa
- Ad Soyad M** E**
- Mesajlar 1366
- Beğeniler 9 / 379
- Ticaret 0, (%0)
command prompt açın .
komut işletimine tıklayın
aşağıdakini kopyalayıp yapıştırın ve enter a basın
wmic path softwarelicensingservice get OA3xOriginalProductKey
lisans anahtarı ekrana gelecek kopyalayıp bir yere kayıt edin
komut işletimine tıklayın
aşağıdakini kopyalayıp yapıştırın ve enter a basın
wmic path softwarelicensingservice get OA3xOriginalProductKey
lisans anahtarı ekrana gelecek kopyalayıp bir yere kayıt edin
- Üyelik 25.03.2021
- Yaş/Cinsiyet 44 / E
- Meslek Muhasebe
- Konum Balıkesir
- Ad Soyad F** K**
- Mesajlar 52
- Beğeniler 0 / 9
- Ticaret 0, (%0)
Show key plus ile urun anahtarinizi ogrenebilirsiniz.
- Üyelik 24.01.2020
- Yaş/Cinsiyet 25 / E
- Meslek Öğrenci
- Konum Çorum
- Ad Soyad Y** B**
- Mesajlar 912
- Beğeniler 91 / 118
- Ticaret 1, (%100)
command prompt açın .
komut işletimine tıklayın
aşağıdakini kopyalayıp yapıştırın ve enter a basın
wmic path softwarelicensingservice get OA3xOriginalProductKey
lisans anahtarı ekrana gelecek kopyalayıp bir yere kayıt edin
komut işletimine tıklayın
aşağıdakini kopyalayıp yapıştırın ve enter a basın
wmic path softwarelicensingservice get OA3xOriginalProductKey
lisans anahtarı ekrana gelecek kopyalayıp bir yere kayıt edin
Hocam buldum lisans anahtarınıda bu anahtar internette birçok sitede mevcutmuş lisans anahtarı herkese farklı olmuyor mu? 1 lisans anahtarını nasıl birçok kişi kullanabiliyor
- Üyelik 23.11.2015
- Yaş/Cinsiyet 35 / E
- Meslek Öğrenen
- Konum Ankara
- Ad Soyad Y** A**
- Mesajlar 378
- Beğeniler 128 / 54
- Ticaret 1, (%100)
Not defterine yapıştır aşağıdaki kodu uzantısını ".bat" olarak kaydet detaylı bilgi öğren
const HKEY_LOCAL_MACHINE = &H80000002
strKeyPath = "SOFTWARE\Microsoft\Windows NT\CurrentVersion"
strValueName = "DigitalProductId"
dim iValues()
Set oReg = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\default:StdRegProv")
oReg.GetBinaryValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,iValues
Dim arrDPID
arrDPID = Array()
For i = 52 to 66
ReDim Preserve arrDPID( UBound(arrDPID) + 1 )
arrDPID( UBound(arrDPID) ) = iValues(i)
Next
Dim arrChars
arrChars = Array("B","C","D","F","G","H","J","K","M","P","Q","R","T","V","W","X","Y","2","3","4","6","7","8","9")
For i = 24 To 0 Step -1
k = 0
For j = 14 To 0 Step -1
k = k * 256 Xor arrDPID(j)
arrDPID(j) = Int(k / 24)
k = k Mod 24
Next
strProductKey = arrChars(k) & strProductKey
If i Mod 5 = 0 And i <> 0 Then strProductKey = "-" & strProductKey
Next
strFinalKey = strProductKey
Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2")
Set colOperatingSystems = objWMIService.ExecQuery ("Select * from Win32_OperatingSystem")
For Each objOperatingSystem in colOperatingSystems
strOS = objOperatingSystem.Caption
strBuild = objOperatingSystem.BuildNumber
strSerial = objOperatingSystem.SerialNumber
strRegistered = objOperatingSystem.RegisteredUser
Next
Set wshShell=CreateObject("wscript.shell")
strPopupMsg = strOS & vbNewLine & vbNewLine
strPopupMsg = strPopupMsg & "Build Number: " & strBuild & vbNewLine
strPopupMsg = strPopupMsg & "PID: " & strSerial & vbNewLine & vbNewLine
strPopupMsg = strPopupMsg & "Registered to: " & strRegistered & vbNewLine & vbNewLine & vbNewLine
strPopupMsg = strPopupMsg & "Your Windows Product Key is:" & vbNewLine & vbNewLine & strFinalKey
strPopupTitle = "Microsoft Windows License Information"
wshShell.Popup strPopupMsg,,strPopupTitle,vbCancelOnly+vbinformation
WScript.Quit
Konuyu toplam 1 kişi okuyor. (0 kullanıcı ve 1 misafir)