Screen Saver

[BigAl68]

Does any one have a solution for setting a network wide screen saver I was thinking about using Windows Marquee with a message but it seems that it needs to be setup on each PC and not run from a central location. Any ideas any one!

 

[grimmy26]

http://mcpmag.com/columns/article.asp?EditorialsID=588

MCSE NT4, 2000, 2003

 

[markdmac]

I was faced with this a while back and wrote a script to configure the Marque screen saver on the PCs. Just set this as a login script and you can configure all aspects of the Marque screen saver.

In the below example the displayed text is elephant.(I picked a strange value to set in my screen saver manually to help me locate the appropriate keys in the registry in case you are wondering)

'==========================================================================
'
' NAME: SetMarqueeScrSettings.vbs
'
' AUTHOR: Mark D. MacLachlan , The Spider's Parlor
' URL: [URL unfurl="true"]http://www.thespidersparlor.com[/URL]
' DATE  : 8/11/2004
'
' COMMENT: <comment>
'
'==========================================================================
Dim path

Set WSHShell = Wscript.CreateObject("WScript.Shell")

'set the key path here.  IF you don't end with a '\' then WSH assumes you are pathing to a value. 
path = "HKCU\Control Panel\Screen Saver.Marquee\"


WSHShell.RegWrite path & "BackgroundColor","0 18 128","REG_SZ"
WSHShell.RegWrite path & "CharSet","0","REG_SZ"
WSHShell.RegWrite path & "Font","Tahoma","REG_SZ"
WSHShell.RegWrite path & "Mode","1","REG_SZ"
WSHShell.RegWrite path & "Size","24","REG_SZ"
WSHShell.RegWrite path & "Speed","14","REG_SZ"

' the next line contains the marquee text to display.
WSHShell.RegWrite path & "Text","elephant","REG_SZ"
WSHShell.RegWrite path & "TextColor","255 0 255","REG_SZ"
WSHShell.RegWrite path & "Attributes","00000","REG_SZ"

I hope you find this post helpful.

Regards,

Mark

 

[MrTBC]

Here's the Microsoft notes too:

http://www.microsoft.com/resources/...0/server/reskit/en-us/prork/prdb_cdk_ugxd.asp