Muncul error saat membaca Device ID

  1. 9 bulan yang lalu

    Selamat malam Om @Caton

    saya mencoba untuk membaca Device ID komputer dan kode berhasil dengan baik

    akan tetapi ketika saya coba di komputer saya yang lain , malah muncul error

    Unable to open registry key "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\SQMClient\MachineId" for reading

    ini kode vba yg saya gunakan

    Sub DataID()
        
        Dim objShell As Object
        Dim DeviceID As String
        
        Set objShell = CreateObject("WScript.Shell")
        DeviceID = VBA.Replace(VBA.Replace(objShell.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\SQMClient\MachineId"), "{", ""), "}", "")
        
    End Sub

    apa yang harus saya perbaiki yaa om

  2. Caton

    15 Sep 2023 Terverifikasi Indonesia + 20.101 Poin

    @anggun123 ...

    ... apa yang harus saya perbaiki yaa ...

    Kayaknya gak ada yang harus diperbaiki scriptnya. Saya coba di Win10 64bit, scriptnya jalan kok. Jadi kemungkinannya di PC mbak yang lainnya, node key tersebut tidak ada/tidak ditemukan. Coba dulu periksa secara manual menggunakan Regedit apakah node key tersebut eksis.

    Demikian.

 

atau Mendaftar untuk ikut berdiskusi!