|
huzixuan
高级用户
积分 537
发帖 219
注册 2006-10-31
来自 芜湖
状态 离线
|
『楼 主』:
VBS循环执行"没有发现.qdt文件,就执行关机命令"
我是从 QQ群 里下载东西,因为有很多,而且必须等他们完全下载好才可以关机.
而下载未完成的文件 全部是 .qdt 格式,完成后就会转变成 他们真正的拓展名
例:
下载未完成的 文件名 (1.mp3.qdt)
下载完成的 文件名 (1.mp3)
但我又不能傻傻的等在计算机前,因此我想到了用 VBS 来循环遍历当前目录,如果在当前目录没有发现 .qdt 文件,就执行关机命令.
请问用 VBS 如何写呢?
[ Last edited by huzixuan on 2007-4-16 at 04:44 AM ]
|
江湖远
碧空长
路茫茫
一个人漫无目的的奔跑,风,刺骨的冷.... |
|
 2007-4-15 10:11 |
|
|
huzixuan
高级用户
积分 537
发帖 219
注册 2006-10-31
来自 芜湖
状态 离线
|
『第
2 楼』:
如何写呢?
|
江湖远
碧空长
路茫茫
一个人漫无目的的奔跑,风,刺骨的冷.... |
|
|
2007-4-15 21:48 |
|
|
huzixuan
高级用户
积分 537
发帖 219
注册 2006-10-31
来自 芜湖
状态 离线
|
『第
3 楼』:
用 vbs
[ Last edited by huzixuan on 2007-4-16 at 07:25 AM ]
|
江湖远
碧空长
路茫茫
一个人漫无目的的奔跑,风,刺骨的冷.... |
|
|
2007-4-16 04:44 |
|
|
baomaboy
银牌会员
积分 1513
发帖 554
注册 2005-12-30
状态 离线
|
|
|
2007-4-16 07:00 |
|
|
huzixuan
高级用户
积分 537
发帖 219
注册 2006-10-31
来自 芜湖
状态 离线
|
『第
5 楼』:
对 vbs 一窍不通的我,如果没有一段完整的代码
拼凑也是拼凑不来的。
并且我是搜索过了,确定是我无法解决的问题,我才好发帖来求助的
|
江湖远
碧空长
路茫茫
一个人漫无目的的奔跑,风,刺骨的冷.... |
|
|
2007-4-16 07:23 |
|
|
Waterlive
初级用户
积分 52
发帖 21
注册 2007-2-9
状态 离线
|
 『第
6 楼』:
为何要用VBS而不用批处理呢....
@echo off
echo 下载完成自动关机
:1 for /r "文件夹路径" %%i in (*.qdt) do shutdown -t 0
goto 1
请高手指点下需要改进的地方..
[ Last edited by Waterlive on 2007-4-16 at 03:27 PM ]
|
|
|
2007-4-16 15:23 |
|
|
huzixuan
高级用户
积分 537
发帖 219
注册 2006-10-31
来自 芜湖
状态 离线
|
『第
7 楼』:
1.是借机学习一下
2.因为 VBS 效率高嘛
|
江湖远
碧空长
路茫茫
一个人漫无目的的奔跑,风,刺骨的冷.... |
|
|
2007-4-17 08:00 |
|
|
huzixuan
高级用户
积分 537
发帖 219
注册 2006-10-31
来自 芜湖
状态 离线
|
『第
8 楼』:
set fso1=createobject("scripting.filesystemobject")
set folder1=fso1.getfolder("a")
do
a=0
set files1=folder1.files
for each fi in files1
if right(fi.path,4)=".qdt" then
a=a+1
end if
next
if a=0 then
CreateObject("Wscript.Shell").run "shutdown -s -t 999"
exit do
end if
wscript.sleep 5000
loop
|
江湖远
碧空长
路茫茫
一个人漫无目的的奔跑,风,刺骨的冷.... |
|
|
2007-4-17 08:20 |
|
