NUMLOCK wil niet

[knarfje]

Hallo,

Om de één of andere reden start mijn pc niet meer op met NUMLOCK aan.
Nu weet ik wel dat dit in de Bios staat ingesteld en staat daar ook op AAN.
Ik heb in bios al NUMLOCK op uit gezet en opnieuw opgestart en daarna weer op AAN ingesteld en weer herstart maar hij blijft UIT met de start van mijn windows XP PRO.

Staat er in windows zelf (register ofzo) ook nog wat ingesteld zodat mijn pc niet meer met NUMLOCK aan opstart??

Thanks.

 

[ikself]

Dit scriptje zou het probleem misschien kunnen oplossen.

Je virusscanner gaat wel protesteren, maar je kunt het toelaten.

 

[gezina]

Misschien zegt dit jou iets?

Numlock

Use this vb script vb script or go to - Click Start/Run/Regedit

HKEY CURRENT USER\Control Panel\Keyboard\InitialKeyboardIndicators

0 = numberlock off
2 = numberlock on

If you want the numlock on at the Welcome Screen you also need to change:

HKEY USERS\.DEFAULT\Control Panel\Keyboard\InitialKeyboardIndicators (same number values as above).

Or...

Create a Notepad file and copy the following two lines into it.

set WshShell = CreateObject("WScript.Shell")
WshShell.SendKeys "{NUMLOCK}"

Save the file with a VBS extension. Create a shortcut to the VBS file you just saved in your Start Menu, Programs, Startup folder.

Gevonden op: http://www.kellys-korner-xp.com/xp_abc.htm Onderaan.
Ook Microsoft heeft iets dergelijks te melden:
http://support.microsoft.com/?kbid=314879

* Ik weet nou ff niet of dit nou hetzelfde is als wat Ikself meldt.

 

[ikself]

Geplaatst door gezina
* Ik weet nou ff niet of dit nou hetzelfde is als wat Ikself meldt.

Is hetzelfde, alleen kun je tijdens de uitvoer van ´mijn´ scriptje een keuze maken. Dit is de inhoud:

Option Explicit
On Error Resume Next

Dim WSHShell, n, p, itemtype, MyBox, vbdefaultbutton
Set WSHShell = WScript.CreateObject("WScript.Shell")

p = "HKEY_CURRENT_USER\Control Panel\Keyboard\InitialKeyboardIndicators"
itemtype = "REG_SZ"

n = WSHShell.RegRead (p)
errnum = Err.Number

if errnum <> 0 then

WSHShell.RegWrite p, 2, itemtype
End If

If n = 0 Then
WshShell.RegWrite p, 2, itemtype
MyBox = MsgBox("Numlock is now ENABLED", 64, "Enable Numlock")
End If

If n = 2 Then
WshShell.Regwrite p, 0, itemtype
MyBox = MsgBox("Numlock is now DISABLED", 64, "Enable Numlock")
End If

Set WshShell = Nothing

VisitKelly's Korner

Sub VisitKelly's Korner
If MsgBox("This script came from the Tweaks Section of Kelly's Korner" & vbCRLF & vbCRLF & "Would you like to visit Kelly's Web Site now?", vbQuestion + vbYesNo + vbDefaultButton, "Visit Kelly's Korner") =6 Then
wshshell.Run "http://www.kellys-korner-xp.com/xp_tweaks.htm"
End If
End Sub

 

[gezina]

Is hetzelfde, alleen kun je tijdens de uitvoer van ´mijn´ scriptje een keuze maken.

Dat lijkt me in dit geval dan beter, we wachten het af.

 

[knarfje]

Deze stond dus fout.
HKEY USERS\.DEFAULT\Control Panel\Keyboard\InitialKeyboardIndicators
Stond op 0 en nu op 2 gezet en probleem is opgelost.

Thanks allen met het mee denken:thumb: