Windows 10 Ürün Anahtarı Nasıl Öğrenilir?

Yorum bırakın / nasıl yapılır / Yazan Görkem

(*10*)

Windows 10 ürün anahtarını öğrenmek için hangi işlemlerin gerçekleştirilmesi gerekiyor? Bu yazıda oldukça büyük bir popülerliğe olan işletim sisteminin lisans anahtarına iyi mi erişebileceğinizi açıkladık.

Microsoft tarafınca geliştirilen Windows 10 işletim sisteminin lisansını başka bir bilgisayara aktarmak istiyorsanız ya da yalnızca sürüm yükselttiyseniz kullanmakta olduğunuz ürün anahtarına gereksinim duyabilirsiniz.

Windows 10 Ürün Anahtarı Öğrenme Nasıl Yapılır?

• Komut İstemi ile Lisans Anahtarı Öğrenme
• ProduKey ile Ürün Anahtarı Öğrenme
• Windows 10 Kutu İçeriğine Bakma
• Windows Ayarlarını Kullanma
• Not Defteri ile Ürün Anahtarı Öğrenme

Komut İstemi ile Lisans Anahtarı Öğrenme

• Vazife Çubuğu’nda yer edinen arama kutusuna tıklayın.
• Komut İstemi yazın.
• Arama sonuçlarının sağ kısmındaki “Yönetici olarak çalıştır” yazısına tıklayın.
• “wmic path SoftwareLicensingService get OA3xOriginalProductKey” kodunu yazın.
• Son olarak “Enter” tuşuna basın.

Windows 10 ile birlikte gelen bilgisayarlarda ürün anahtarı, anakartın durağan(durgun) yazılımında yer alır. Eğer yeni bilgisayarınızdaki ürün anahtarını öğrenmek istiyorsanız, bunu komut istemi aracılığı ile yapmanız mümkündür.

ProduKey ile Ürün Anahtarı Öğrenme

Eğer komut istemi ile ürün anahtarınızı öğrenemediyseniz üçüncü parti bir uygulamadan yardım almayı düşünebilirsiniz. ProduKey kolay kullanımı ile tercih edebileceğiniz uygulamalardan birisi olarak öne çıkıyor. Ürün anahtarınızı öğrenmek için uygulamayı indirmeniz ve yüklemeniz kafi olacaktır.

(*10*)

(*10*)

ProduKey

ProduKey, bilgisayarınızda yüklü programların ürün anahtarlarını gösteren ve kaydetme imkanı tanıyan bir programdır.

(*10*)

(*10*)⤓ İndir

Windows 10 Kutu İçeriğine Bakma

Popüler işletim sistemini kutulu olarak satın aldıysanız, lisans anahtarına ürünün kutusunun içinden erişebilirsiniz. Bu işlem için kutunun içeriğini denetim etmeniz kafi olacaktır. Eğer ürünün kutusunu kaybettiyseniz, listedeki diğeri şekilleri uygulayabilirsiniz.

Windows Ayarlarını Kullanma

• Windows + I klavye kısayolunu kullanarak ayarlar penceresini görüntüleyin.
• Oluşturulan pencere üstünden “Güncelleştirme ve Güvenlik” yazısına tıklayın.
• “Etkinleştirme” sekmesine tıklayın ve adımları takip edin.

İşletim sisteminin lisans anahtarını görüntüleyebilmek için uygulayabileceğiniz bir yöntem daha bulunuyor. Üçüncü parti yazılım kullanmak istemiyorsanız ayarlar sayfası üstünden oldukça ergonomik ve süratli bir halde anahtara erişebilirsiniz.

Not Defteri ile Ürün Anahtarı Öğrenme

• Yeni bir not defteri dosyası oluşturun.
• Derhal aşağıda yer edinen kodu bu not defterine yapıştırın.
• “Değişik Kaydet” seçeneğine tıklayın.
• “Kayıt Türü” kısmında “Tüm Dosyalar” seçeneğini seçin.
• Dosyayı WindowsLisans.vbs olarak adlandırın.
• Pencereyi kapatın.
• Kaydedilen dosyaya çift tıkladığınızda ürün anahtarınızı görebilirsiniz.

Windowss 10 işletim sisteminizin anahtarına yetişebilmek için not defterini kullanabilirsiniz. Böylelikle herhangi bir yazılımı kurmadan lisans anahtarına erişmiş olmuş olmuş olmuş olmuş olmuş olmuş olursunuz. Bu yöntem için yukarıda yer edinen adımları sırasıyla uygulamanız gerekir.

Not defterine kaydetmeniz gereksinim duyulan satırlar şu şekilde:

Option Explicit

Dim objshell,path,DigitalID, Result

Set objshell = CreateObject(“WScript.Shell”)

‘Set registry key path

Path = “HKLMSOFTWAREMicrosoftWindows NTCurrentVersion”

‘Registry key value

DigitalID = objshell.RegRead(Path & “DigitalProductId”)

Dim ProductName,ProductID,ProductKey,ProductData

‘Get ProductName, ProductID, ProductKey

ProductName = “Product Name: ” & objshell.RegRead(Path & “ProductName”)

ProductID = “Product ID: ” & objshell.RegRead(Path & “ProductID”)

ProductKey = “Installed Key: ” & ConvertToKey(DigitalID)

ProductData = ProductName  & vbNewLine & ProductID  & vbNewLine & ProductKey

‘Show messbox if save to a file

If vbYes = MsgBox(ProductData  & vblf & vblf & “Save to a file?”, vbYesNo + vbQuestion, “BackUp Windows Key Information”) then

   Save ProductData

End If

‘Convert binary to chars

Function ConvertToKey(Key)

    Const KeyOffset = 52

    Dim isWin8, Maps, i, j, Current, KeyOutput, Last, keypart1, insert

    ‘Check if OS is Windows 8

    isWin8 = (Key(66) 6) And 1

    Key(66) = (Key(66) And &HF7) Or ((isWin8 And 2) * 4)

    i = 24

    Maps = “BCDFGHJKMPQRTVWXY2346789”

    Do

        Current= 0

        j = 14

        Do

           Current = Current* 256

           Current = Key(j + KeyOffset) + Current

           Key(j + KeyOffset) = (Current 24)

           Current=Current Mod 24

            j = j -1

        Loop While j >= 0

        i = i -1

        KeyOutput = Mid(Maps,Current+ 1, 1) & KeyOutput

        Last = Current

    Loop While i >= 0

    keypart1 = Mid(KeyOutput, 2, Last)

    insert = “N”

    KeyOutput = Replace(KeyOutput, keypart1, keypart1 & insert, 2, 1, 0)

    If Last = 0 Then KeyOutput = insert & KeyOutput

    ConvertToKey = Mid(KeyOutput, 1, 5) & “-” & Mid(KeyOutput, 6, 5) & “-” & Mid(KeyOutput, 11, 5) & “-” & Mid(KeyOutput, 16, 5) & “-” & Mid(KeyOutput, 21, 5)

End Function

‘Save data to a file

Function Save(Data)

    Dim fso, fName, txt,objshell,UserName

    Set objshell = CreateObject(“wscript.shell”)

    ‘Get current user name

    UserName = objshell.ExpandEnvironmentStrings(“%UserName%”)

    ‘Create a text file on desktop

    fName = “C:Users” & UserName & “DesktopWindowsKeyInfo.txt”

    Set fso = CreateObject(“Scripting.FileSystemObject”)

    Set txt = fso.CreateTextFile(fName)

    txt.Writeline Data

    txt.Close

End Function

(*10*)(*10*)YAZILIM

Windows 11’in Bilinmeyen Özellikleri

Windows 11’in bilinmeyen özellikleri neler? Microsoft’un yeni işletim sistemine geçiş yaptıysanız bu probleminin yanıtını merak ediyor olabilirsiniz.