Page 1 of 1 1
Topic Options
#46422 - 2003-10-08 04:15 PM Screensaver
Woodenchef Offline
Fresh Scripter

Registered: 2003-08-29
Posts: 11
Why is this not working? Below script writes all the values to HKCU registry however the screensaver is not being enabled. The black16.scr files gets copied over as well

When I check GUI from desktop / properties the screensaver shows none.

I am trying to enable this for NT/2K users...below is the portion of the script...

thanks for any input

$hkcu = 'HKEY_CURRENT_USER'
$hkcus = 'HKEY_CURRENT_USER\SOFTWARE'
$poleditkey = $hkcus+"\Microsoft\Windows\CurrentVersion\Policies\System"
$screensavekey = $hkcu+"\Control Panel\Desktop"
$sysini = "%Windir%\System.ini"

; -- Hide the screensaver tab (can also be done in POLEDIT)
$screensavetab = Readvalue($poleditkey,"NoDispScrSavPage")
IF $screensavetab <> 1
$systempol = EXISTKEY($poleditkey)
IF $systempol <> 0
$rc = ADDKEY($poleditkey)
ENDIF
$rc = WRITEVALUE($poleditkey,"NoDispScrSavPage","0","REG_DWORD")
ENDIF

; -- Set the timeout
IF "60" <> Readvalue($screensavekey,"ScreenSaveTimeOut")
$rc = WRITEVALUE($screensavekey,"ScreenSaveTimeOut","60","REG_SZ")
ENDIF
; -- Be sure that the screen saver is active
IF 1 <> Readvalue($screensavekey,"ScreenSaveActive")
$rc = WRITEVALUE($screensavekey,"ScreenSaveActive","1","REG_SZ")
ENDIF

IF "%OS%" = "Windows_NT"
IF "%windir%\system32\black16.scr" <> Readvalue($screensavekey,"SCRNSAVE.EXE")
$rc = WRITEVALUE($screensavekey,"SCRNSAVE.EXE","%windir%\system32\black.scr","REG_SZ")
ENDIF
ELSE
IF "%windir%\System\black16.scr" <> ReadProfileString($sysini,"boot","scrnsave.exe")
$rc = WriteProfileString($sysini,"boot","scrnsave.exe","%windir%\System\black16.scr")
ENDIF
ENDIF

IF 1 <> Readvalue($screensavekey,"ScreenSaverIsSecure")
$rc = WRITEVALUE($screensavekey,"ScreenSaverIsSecure","1","REG_SZ")
ENDIF [Confused]

Top
#46423 - 2003-10-08 05:05 PM Re: Screensaver
Richie19Rich77 Offline
Seasoned Scripter
*****

Registered: 2002-08-16
Posts: 624
Loc: London, England
Look at the following Post:
Screen Saver Settings

The important part is:

code:
setm 'ss='


Top
#46424 - 2003-10-08 05:32 PM Re: Screensaver
Sealeopard Offline
KiX Master
*****

Registered: 2001-04-25
Posts: 11165
Loc: Boston, MA, USA
See also the UDF Forum under SecureScreenSaver() - Enables Screen Saver Security
_________________________
There are two types of vessels, submarines and targets.

Top
Page 1 of 1 1


Moderator:  Jochen, Allen, Radimus, Glenn Barnas, ShaneEP, Ruud van Velsen, Arend_, Mart 
Hop to:
Shout Box

Who's Online
0 registered and 640 anonymous users online.
Newest Members
ManuvdWielNL, Sir_Barrington, batdk82, StuTheCoder, M_Moore
17887 Registered Users

Generated in 0.051 seconds in which 0.024 seconds were spent on a total of 12 queries. Zlib compression enabled.

Search the board with:
superb Board Search
or try with google:
Google
Web kixtart.org