100分求 如何启动和关闭屏保

[therockdelt]

如何启动和关闭屏保，隔一段时间不用鼠标和键盘，机器自动启动屏幕保护保护程序，要开的时候需要在保护中输入密码才可使用电脑

[迈克揉索芙特]

用这两个API：

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Private Declare Sub keybd_event Lib "user32.dll" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)

[faysky2]

一定时间内鼠标和键盘操作则做某些事（比如关闭程序）：
http://community.csdn.net/expert/FAQ/FAQ_Index.asp?id=206623

[therockdelt]

可以具体一点吗 最好有个列子也好，还有如何在启动屏保的时候启动程序呢？

[therockdelt]

keybd_event 函数用呢？

[xinliangyu]

启动：

'声明API及常量
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Const WM_SYSCOMMAND = &H112
Const SC_SCREENSAVE = &HF140&

'这句就干那工作
SendMessage Me.hwnd, WM_SYSCOMMAND, SC_SCREENSAVE, 0

[xinliangyu]

//要开的时候需要在保护中输入密码才可使用电脑
这工作可以由屏保程序自己来作

[therockdelt]

我通过程序实现 在即将有鼠标或者键盘动作的时候，即退出屏保的时候启动程序，通过程序实现密码输入

[rainstormmaster]

什么系统?

先看看这个:
http://www.mf100.com/document/2005-11/835.shtml

[rainstormmaster]

简单说两句吧,想启动屏保,计算机必须设置屏保,如果想具有通用性的话,建议自己写一个类似屏保的程序

[therockdelt]

系统要求是所有windows系统的，可是要写一个类似乎的屏保程序的话，我觉得通用性好象差了一点，感觉不是很人性化，哪个要是写一个屏保程序是不是就是编译好后，要把程序扩展名改成scr才行

[rainstormmaster]

//哪个要是写一个屏保程序是不是就是编译好后，要把程序扩展名改成scr才行

对,是这样的,不过就你的问题而言,需要的只是实现了屏保功能的一个窗体,这个窗口完全在你的控制之中,而如果调用屏保的话,如果用户没设置屏保密码的话,自然也无法让用户在屏保中输入密码

//系统要求是所有windows系统的，可是要写一个类似乎的屏保程序的话，我觉得通用性好象差了一点，感觉不是很人性化

是否设置屏保,屏保是否设置了密码,这些都应该由用户决定,你不能让用户改变设置,而又想实现你的功能,我看也只能自己实现屏保的效果了

[therockdelt]

喔哦~~~ 那好 谢谢 暴风雨 谢谢各位