Can't change background (bkgrd/prop)

B

Bruce

My neice has a laptop with xp prof.
Happened yesterday, that she can not
change the background (properties/background)
Not able to highlight the names under the background list, nor the browse.
The color button can be accessed.
When she starts it, it will show the picture background
but when windows finally is all up, it has a color background.
Administrator is the only account.
thanks Bruce
 
C

Clark...

Bruce said:
My neice has a laptop with xp prof.
Happened yesterday, that she can not
change the background (properties/background)
Not able to highlight the names under the background list, nor the
browse. The color button can be accessed.
When she starts it, it will show the picture background
but when windows finally is all up, it has a color background.
Administrator is the only account.
thanks Bruce


are you missing tabs? if so try this follow this link
http://www.winhelponline.com/articles/38/1/ and look down to atachments
middle of the page follow directions OR do this, copy below paste into
notepad and save as a .vbs
then run it,
Clark...

'Restores missing tabs in the Display properties
'For use with Windows® XP only.
'Created on May 09, 2006
'~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
' Homepage: http://windowsxp.mvps.org
' Copyright © 2006, Ramesh Srinivasan
'~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Option Explicit
Dim WshShell, basekey,basekey2, rtn
Set WshShell = CreateObject("WScript.Shell")

basekey="HKLM\Software\Microsoft\Windows\CurrentVersion\Policies\System\"
Task1
basekey="HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\"
Task1
basekey2="HKLM\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\"
Task2
basekey2="HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\"
Task2

Sub Task1()
On Error Resume Next
rtn = WshShell.Regdelete (basekey & "NoDispCPL")
rtn = WshShell.Regdelete (basekey & "NoDispAppearancePage")
rtn = WshShell.Regdelete (basekey & "NoDispBackgroundPage")
rtn = WshShell.Regdelete (basekey & "NoDispScrSavPage")
rtn = WshShell.Regdelete (basekey & "NoDispSettingsPage")
On Error Goto 0
End Sub

Sub Task2()
On Error Resume Next
rtn = WshShell.Regdelete (basekey2 & "NoThemesTab")
rtn = WshShell.Regdelete (basekey2 & "ClassicShell")
rtn = WshShell.Regdelete (basekey2 & "NoChangingWallPaper")
rtn = WshShell.Regdelete (basekey2 & "ForceActiveDesktopOn")
rtn = WshShell.Regdelete (basekey2 & "NoActiveDesktop")
rtn = WshShell.Regdelete (basekey2 & "NoWebView")
On Error Goto 0
End Sub

Wshshell.RUN ("regsvr32.exe shell32.dll -i -s")
Wshshell.RUN ("regsvr32.exe themeui.dll -s")
Msgbox "Done"
Set WshShell = Nothing
 
B

Bruce

The tabs are there,
but not accessible. It shows the list, and the browse, but unable to
highlight or click them.
 
C

Clark...

Bruce said:
The tabs are there,
but not accessible. It shows the list, and the browse, but unable to
highlight or click them.
but have you tried the fix yet ?
Clark...
 
B

Bruce

Not as yet, brother is calling the manufacturer first,
generally I don't like running scripts.
Looking at the pictures, they are different than our particualr problem,
seeing we can see all the tabs.
 
C

Clark...

Bruce said:
Not as yet, brother is calling the manufacturer first,
generally I don't like running scripts.
Looking at the pictures, they are different than our particualr
problem, seeing we can see all the tabs.

I have used the script many times, it won't hurt your PC.
Sounds like you have a permissions problem as well
this program allows you to tune your permissions link:
http://www.derkeiler.com/Newsgroups/microsoft.public.security.virus/2006-02/msg00148.html
I had to use it because the customers PC could not change the settings of
display or open control panel etc,
I don't know what your afraid of but, it's your call,
Good luck

Clark...
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top