• Home
 · 
• Windows System Services
 · 
• This code will open the screen saver with one comand line NO API

This code will open the screen saver with one comand line NO API

This code will open the screen saver with one comand line NO API

Rate This code will open the screen saver with one comand line NO API

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

'The following command will Run a screen saver 
'you may need a command button named "command1"

Private sub command1_click()
on error goto err
dim aa
aa=shell("c:\windows\system\windows.scr /s",1)
exit sub
err:
Msgbox err.Description


'Note : if your windows directory was not in the path "C:\windows\system" then what you need to do is changing the directory from "C:\windows\system" to your windows directory
'Note2 : the "windows.scr" is the name of the screen saver you want to run...but in the windows directory there is a screen saver named windows

'I Hopy you like this code
'Faris Mlaeb
'[email protected]
'[email protected]