WIN7 锁屏屏保 图片 WEB
WinXP 下,有一个Web桌面背景,很不错, 但在Win7下已经取消.
我们可以用Php程序,生成一张jpg/png图片

1 <?php 2 date_default_timezone_set('PRC'); 3 //$yanzhengma = date("Y-m-d H:i:s"); 4 $yanzhengma = 2022*10000+date("d")*100+date("H")*2; 5 $dst_path = 'pingbao.png'; 6 //创建图片的实例 7 $dst = imagecreatefromstring(file_get_contents($dst_path)); 8 //打上文字 9 $font = 'msyh.ttf';//字体 10 $black = imagecolorallocate($dst, 0xFF, 0xFF, 0xFF);//字体颜色 11 imagefttext($dst, 50, 0, 500, 140, $black, $font, '停车验证码为:'.$yanzhengma); 12 //imagefttext($dst, 字体大小, 0, 左右, 上下, $black, $font, '停车验证码为:'.$yanzhengma); 13 //输出图片 14 list($dst_w, $dst_h, $dst_type) = getimagesize($dst_path); 15 switch ($dst_type) { 16 case 1://GIF 17 header('Content-Type: image/gif'); 18 imagegif($dst); 19 break; 20 case 2://JPG 21 header('Content-Type: image/jpeg'); 22 imagejpeg($dst); 23 break; 24 case 3://PNG 25 header('Content-Type: image/png'); 26 imagepng($dst); 27 break; 28 default: 29 break; 30 } 31 imagedestroy($dst); 32 ?>
当然,也是要配置好字体 msyh.ttf 和 图片背景pingbao.png, 一起上传到PHP 空间

1 Function UnixTime() 2 Set objWMIService = _ 3 GetObject("winmgmts:\\.\root\cimv2") 4 Set colItems = objWMIService.ExecQuery _ 5 ("Select * from Win32_OperatingSystem",,48) 6 For Each objItem in colItems 7 TimeZone = objItem.CurrentTimeZone 8 Next 9 UnixTime = DateDiff("s", "01/01/1970 00:00:00", Now()) 10 UnixTime = UnixTime - TimeZone * 60 11 End Function 12 'MsgBox UnixTime, 64 '获取时间戳,作为变量请求URL 13 do 14 Set Post = CreateObject("Msxml2.XMLHTTP") 15 Set Shell = CreateObject("Wscript.Shell") 16 Post.Open "GET","http://localhost/shuiyin.php?"&UnixTime,0 17 Post.Send() 18 Set aGet = CreateObject("ADODB.Stream") 19 aGet.Mode = 3 20 aGet.Type = 1 21 aGet.Open() 22 aGet.Write(Post.responseBody) 23 aGet.SaveToFile "D:\Tools\wamp\www\shuiyin\shuiyin.jpg",2 24 wscript.sleep 1000 25 'Shell.Run ("D:\Tools\wamp\www\shuiyin\shuiyin.jpg") '延迟过后执行下载文件 26 '保存图片,并打开. 27 wscript.sleep 1000*60 28 loop
我们用VBS 去自动下载该图片到指定目录,
设置屏保-图片-路径为下载好的图片路径.
直接在开始运行里,或资源管理器 打开%comspec% /k C:\Windows\System32\PhotoScreensaver.scr /s 即可看到效果.
也是可以在cmd下 C:\Windows\System32\PhotoScreensaver.scr /s 一样.
不加参数/S 将启动配置程序.