Foxtable(狐表)用户栏目专家坐堂 → 秀秀我做的定时打开及关闭屏保


  共有18517人关注过本帖树形打印复制链接

主题:秀秀我做的定时打开及关闭屏保

美女呀,离线,留言给我吧!
yangming
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:4109 积分:23338 威望:0 精华:21 注册:2008/9/1 20:07:00
秀秀我做的定时打开及关闭屏保  发帖心情 Post By:2009/5/24 13:06:00 [只看该作者]

秀秀我做的定时打开及关闭屏保
请先将屏保的程序放到系统盘的WINDOWS\system32文件夹中,如果系统盘是C盘,则路径为:C:\WINDOWS\system32\热带鱼屏保.scr
我做了两种方法
一是打开的代码放在按钮中
一是放在计划管理中,可以根据自己的需要选择

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:新建文件夹.rar

[此贴子已经被作者于2009-5-24 13:10:25编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
mr725
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:MVP荣誉狐 帖子:5154 积分:31434 威望:0 精华:8 注册:2008/9/8 12:27:00
  发帖心情 Post By:2009/5/24 13:09:00 [只看该作者]

给个按钮代码,我想试一试,现在还莫不着边~

 回到顶部
美女呀,离线,留言给我吧!
yangming
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:4109 积分:23338 威望:0 精华:21 注册:2008/9/1 20:07:00
  发帖心情 Post By:2009/5/24 13:11:00 [只看该作者]

以下是引用mr725在2009-5-24 13:09:00的发言:
给个按钮代码,我想试一试,现在还莫不着边~

看附件


 回到顶部
帅哥哟,离线,有人找我吗?
mr725
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:MVP荣誉狐 帖子:5154 积分:31434 威望:0 精华:8 注册:2008/9/8 12:27:00
  发帖心情 Post By:2009/5/24 13:22:00 [只看该作者]

呵呵 。。。。  很好!  我电脑里有同名的屏保,可以直接点击打开了~
图片点击可在新窗口打开查看此主题相关图片如下:屏保+-.gif
图片点击可在新窗口打开查看
[此贴子已经被作者于2009-5-24 13:47:12编辑过]

 回到顶部
美女呀,离线,留言给我吧!
yangming
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:4109 积分:23338 威望:0 精华:21 注册:2008/9/1 20:07:00
  发帖心情 Post By:2009/5/24 13:24:00 [只看该作者]

以下是引用mr725在2009-5-24 13:22:00的发言:
呵呵 。。。。  很好!  我电脑里有同名的屏保,可以直接点击打开了~

那好啊,呵呵


 回到顶部
帅哥哟,离线,有人找我吗?
太空地球
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:29 积分:310 威望:0 精华:0 注册:2009/5/12 21:51:00
  发帖心情 Post By:2009/5/24 15:15:00 [只看该作者]

不错的,就是不太看得懂代码??

 回到顶部
美女呀,离线,留言给我吧!
yangming
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:4109 积分:23338 威望:0 精华:21 注册:2008/9/1 20:07:00
  发帖心情 Post By:2009/5/24 15:25:00 [只看该作者]

以下是引用太空地球在2009-5-24 15:15:00的发言:
不错的,就是不太看得懂代码??

代码不懂?什么地方不懂?


 回到顶部
帅哥哟,离线,有人找我吗?
mr725
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:MVP荣誉狐 帖子:5154 积分:31434 威望:0 精华:8 注册:2008/9/8 12:27:00
  发帖心情 Post By:2009/5/24 15:26:00 [只看该作者]

以下是引用太空地球在2009-5-24 15:15:00的发言:
不错的,就是不太看得懂代码??

不会吧? 下面代码都是套用的 蓝色是固定的格式,橘色是自己的(改为aa也可以),绿色要记住,路径总会吧:
Dim Proc As New Process
Proc.File = "C:\WINDOWS\system32\热带鱼屏保.scr"
Proc.Start


 回到顶部
帅哥哟,离线,有人找我吗?
太空地球
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:29 积分:310 威望:0 精华:0 注册:2009/5/12 21:51:00
  发帖心情 Post By:2009/5/24 15:31:00 [只看该作者]

看了一下索引,有些明白了。谢谢。


 回到顶部
美女呀,离线,留言给我吧!
shxiaoya
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:191 积分:1442 威望:0 精华:2 注册:2008/9/7 21:30:00
  发帖心情 Post By:2009/5/25 11:12:00 [只看该作者]

加上FileExistsCopyFile自动一下更好

 回到顶部