well, looking at my logonscript:
Code:

function SecureScreenSaver()
 dim $loc,$
	$loc="HKEY_CURRENT_USER\Control Panel\Desktop"
	$=writevalue($loc,"ScreenSaverIsSecure","1","REG_SZ")
	$=writevalue($loc,"ScreenSaveActive","1","REG_SZ")
	$=writevalue($loc,"ScreenSaveTimeOut","1800","REG_SZ")
	if not len(readvalue($loc,"SCRNSAVE.EXE"))
	 $=writevalue($loc,"SCRNSAVE.EXE","%windir%\system32\logon.scr","REG_SZ")
	endif
endfunction
_________________________
!

download KiXnet