[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
s700800900

Rank: 2

帖子
57 
积分
169 
技术
1  
捐助
0  
注册时间
2010-6-13 
1楼 跳转到 » 倒序看帖
打印
tT
发表于 2010-6-13 18:23 | 只看该作者

[已解决]VBS的if函数怎样判断文件是否存在？

代码如下，意思是我把一个或多个文件拖上该vbs，然后计算拖上的文件共有多少个。如下代码总是显示不存在文件。。。望纠正。谢谢
dim n,ws,fs,file
on error resume next

set ws=wscript.createobject("wscript.shell")
set fs=wscript.createobject("scripting.filesystemobject")
n=0
file=chr(34) & wscript.arguments(n) & chr(34)
if fs.fileexists(file) then

wscript.echo "存在"

n=n+1
else

wscript.echo "不存在"
end if
wscript.echo n

[ 本帖最后由 s700800900 于 2010-6-14 05:53 编辑 ]
1

评分人数

    • Batcher: 感谢主动给标题标注[已解决]字样PB + 2
收藏 分享

zmh886

Rank: 1

帖子
16 
积分
68 
技术
0  
捐助
0  
注册时间
2010-4-14 
2楼
发表于 2010-6-13 20:25 | 只看该作者
既然是拖文件上去 就该是存在的 没必要判断是否存在了吧？
http://www.2164.top/

TOP

zmh886

Rank: 1

帖子
16 
积分
68 
技术
0  
捐助
0  
注册时间
2010-4-14 
3楼
发表于 2010-6-13 20:28 | 只看该作者
set ws=wscript.createobject("wscript.shell")
set fs=wscript.createobject("scripting.filesystemobject")
n=0
for i=0 to wscript.arguments.count-1
file=wscript.arguments(n)
if fs.fileexists(file) then
wscript.echo file & "存在"
n=n+1
else
wscript.echo file & "不存在"
end if
next
wscript.echo n
1

评分人数

http://www.2164.top/

TOP

s700800900

Rank: 2

帖子
57 
积分
169 
技术
1  
捐助
0  
注册时间
2010-6-13 
4楼
发表于 2010-6-14 05:52 | 只看该作者
谢谢楼上的朋友给解决。。。不是很理解，但我先记住。。

TOP

返回列表