共10 条记录, 每页显示 10 条, 页签: [1]

标题：秀秀我做的定时打开及关闭屏保

1楼

yangming 发表于：2009/5/24 13:06:00

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

下载信息 [文件大小：下载次数： ]
点击浏览该文件:新建文件夹.rar

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

2楼

mr725 发表于：2009/5/24 13:09:00

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

3楼

yangming 发表于：2009/5/24 13:11:00

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

看附件

4楼

mr725 发表于：2009/5/24 13:22:00

呵呵。。。。很好！我电脑里有同名的屏保，可以直接点击打开了～
图片点击可在新窗口打开查看

此主题相关图片如下：屏保+-.gif

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

5楼

yangming 发表于：2009/5/24 13:24:00

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

那好啊,呵呵

6楼

太空地球 发表于：2009/5/24 15:15:00

不错的，就是不太看得懂代码？？

7楼

yangming 发表于：2009/5/24 15:25:00

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

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

8楼

mr725 发表于：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楼

太空地球 发表于：2009/5/24 15:31:00

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

10楼

shxiaoya 发表于：2009/5/25 11:12:00

加上FileExists、CopyFile自动一下更好

共10 条记录, 每页显示 10 条, 页签: [1]