Control Startup Numlock Status to On/Off

Discussion in 'Windows' started by pradeep, May 17, 2007.

  1. pradeep

    pradeep Team Leader

    Joined:
    Apr 4, 2005
    Messages:
    1,645
    Likes Received:
    87
    Trophy Points:
    0
    Occupation:
    Programmer
    Location:
    Kolkata, India
    Home Page:
    http://blog.pradeep.net.in
    If you want Numlock to stay On or Off at startup, you can do that with a registry edit.

    Navigate to HKEY_CURRENT_USER\Control Panel\Keyboard\InitialKeyboardIndicators and the change the value to 0 if you want Numlock enabled at starup, and 2 to have it enabled at startup.

    Alternatively, you can use the VB ShellScript below to do the work for you.

    Code:
    Option Explicit
      On Error Resume Next
      
      Dim WSHShell, n, rK, itemtype, MyBox, vbdefaultbutton
      Set WSHShell = WScript.CreateObject("WScript.Shell")
      
      rK = "HKEY_CURRENT_USER\Control Panel\Keyboard\InitialKeyboardIndicators"
      itemtype = "REG_SZ"
      
      n = WSHShell.RegRead (rK)
      errnum = Err.Number
      
      if errnum <> 0 then
          WSHShell.RegWrite rK, 2, itemtype
      End If
      
      If n = 0 Then
         WshShell.RegWrite rK, 2, itemtype
         MyBox = MsgBox("Numlock is now ENABLED", 64, "Enable Numlock")
      End If
      
      If n = 2 Then 
         WshShell.Regwrite rK, 0, itemtype
         MyBox = MsgBox("Numlock is now DISABLED", 64, "Enable Numlock")
      End If
      
      Set WshShell = Nothing
     

Share This Page

  1. This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
    By continuing to use this site, you are consenting to our use of cookies.
    Dismiss Notice