调用屏幕保护

由于公司用光纤拨号上网，每人一个帐号，开机手动拨号麻烦，即使拖一个快捷方式在启动菜单也没有，还得用鼠标再点一下拨号按钮，动作慢一点都满了挤不上去了，麻烦！

1、自动拨号：

建一个批处理放到启动菜单里：
@cd/

@rem ---------- 拨号连接8次，看它上不上？！ ----------
rasdial 宽带连接 czmf14 12345678
@rasdial 宽带连接 czmf14 12345678 >>"%userprofile%/Local Settings/Temp/rasdial.tmp"
@rasdial 宽带连接 czmf14 12345678 >>"%userprofile%/Local Settings/Temp/rasdial.tmp"
@rasdial 宽带连接 czmf14 12345678 >>"%userprofile%/Local Settings/Temp/rasdial.tmp"
@rasdial 宽带连接 czmf14 12345678 >>"%userprofile%/Local Settings/Temp/rasdial.tmp"
@rasdial 宽带连接 czmf14 12345678 >>"%userprofile%/Local Settings/Temp/rasdial.tmp"
@rasdial 宽带连接 czmf14 12345678 >>"%userprofile%/Local Settings/Temp/rasdial.tmp"
@rasdial 宽带连接 czmf14 12345678 >>"%userprofile%/Local Settings/Temp/rasdial.tmp"

@rem ---------- 删除临时文件 ----------
@rem del "%userprofile%/Local Settings/Temp/rasdial.tmp"

@rem ---------- 记录拨号日期时间 ----------
@date /t >>"%userprofile%/Local Settings/Temp/rasdial.tmp"
@time /t >>"%userprofile%/Local Settings/Temp/rasdial.tmp"
@echo ---------------------------------------- >>"%userprofile%/Local Settings/Temp/rasdial.tmp"

@rem ---------- 断开连接 ----------
@rem rasdial 宽带连接 /disconnect

@rem pause

2、自动登录

开机自动拨号解决了，但进入操作系统还得输密码登录呀？

运行：“control userpasswords2”
 

 

3、取消自动登录

输入登录默认用户名和密码，下次开机就可以自动登录了，想取消自动登录，同样“control userpasswords2”进入，勾选“要使用本机，用户必须输入用户名和密码”即可。

4、批处理运行屏保

嘿嘿，自动登录+自动拨号，上班一进办公室就按下电源开关打开电脑，让电脑帮我抢宽带座位，我先去泡杯茶先……等等，若电脑全部搞掂了，进入了桌面，在那等着欢迎我使用，但我还站在窗户旁一边喝茶一边看着街上的美女，这时一个变态佬同事因为上不了宽带就悄悄地潜入我的办公桌……后果很严重！啥办？！

让电脑拨号完成后自动运行带有密码保护的屏保？！嘿嘿，应该还可以，虽然中间拨号操作有一段无保护的空白时间，但至少还不算太长，至少比我喝茶看美女的时间短多了！

拨号批处理后加一句：“start logon.scr /s”，但它没有密码保护，不行。

5、用WinAPI调用屏保

这样可以，转自：http://www.cnblogs.com/myamanda/articles/1523940.html (Delphi代码)

如何通过代码调用Windows 屏幕保护程序？
有两种方法:
第一个方法是调用WinAPI 函数 PostMessage(GetDesktopWindow, WM_SYSCOMMAND, SC_SCREENSAVE, 0)
第二个方法是运行一个扩展名是.SCR 的屏幕保护文件。这个方法不可以调用密码保护。
我希望单击一个小程序开始屏幕保护，并调用密码保护（当屏幕保护运行的时候有效地锁定我的桌面），所以生成以下.dpr 文件：
program SaveScrn;
uses
Forms,
Windows,
Messages;

{$R *.RES}
var
b: Bool;
begin
Application.Initialize;
{ 首先检查屏幕保护程序是否存在 }
if (SystemParametersInfo(SPI_GETSCREENSAVEACTIVE, 0, @b, 0)
and (b) then
begin
{ 调用屏幕保护 }
PostMessage(GetDesktopWindow, WM_SYSCOMMAND, SC_SCREENSAVE, 0);
end;
Application.Terminate;
end.
现在运行这个应用程序，桌面将会变得安全。

6、完成。

喝茶