quote:

---

Originally posted by feline

Can you try the following please. First exit VS2008
Now run regedit, and find and delete the registry key:

HKEY_CURRENT_USER\\Software\\Microsoft\\VisualStudio\\9.0\\FontAndColors\\Cache\
This key and all of its values will be recreated by the IDE. Now restart VS2008. Are you now able to set the background colour for the current line?

---

Windows Registry Editor Version 5.00

[-HKEY_CURRENT_USER\\Software\\Microsoft\\VisualStudio\\9.0\\FontAndColors\\Cache]

Const HKEY_CURRENT_USER  = &H80000001

' Object used to get StdRegProv Namespace
Set wmiLocator = CreateObject("WbemScripting.SWbemLocator")

' Object used to determine local machine name
Set wshNetwork = CreateObject("WScript.Network")

' Registry Provider (StdRegProv) lives in root\\default namespace.
Set wmiNameSpace = wmiLocator.ConnectServer(wshNetwork.ComputerName, "root\\default")
Set objRegistry = wmiNameSpace.Get("StdRegProv")

' Deletes Key with alle subkeys
sPath = "Software\\Microsoft\\VisualStudio\\9.0\\FontAndColors\\Cache"

lRC = DeleteRegEntry(HKEY_CURRENT_USER, sPath)

Function DeleteRegEntry(sHive, sEnumPath)
	' Attempt to delete key.  If it fails, start the subkey
	' enumration process.
	lRC = objRegistry.DeleteKey(sHive, sEnumPath)
	
	' The deletion failed, start deleting subkeys.
	If (lRC <> 0) Then
		' Subkey Enumerator
		On Error Resume Next
		
		lRC = objRegistry.EnumKey(HKEY_CURRENT_USER, sEnumPath, sNames)
		
		For Each sKeyName In sNames
			If Err.Number <> 0 Then Exit For
			lRC = DeleteRegEntry(sHive, sEnumPath & "\\" & sKeyName)
		Next
		
		On Error Goto 0
		
		' At this point we should have looped through all subkeys, trying
		' to delete the registry key again.
		lRC = objRegistry.DeleteKey(sHive, sEnumPath)
	End If
End Function