诸子百家

采天地之灵气 汲日月之精华

ASP利用FSO查找本地文件

因为需求比较简单,未进行遍历操作。

<%
'函数:chkFile
'输入参数:path-要查找的路径
'          filename-要找的文件
'输出参数:chkFile-是否存在 1 存在 2不存在 3错误
'功能描述:查找对应文件是否存在
'
function chkFile(path,filename)
chkFile="2"
Set fso = CreateObject("Scripting.FileSystemObject")
on error resume next
set objFolder=fso.GetFolder(path)

set objFiles=objFolder.Files
for each objFile in objFiles
    if objFile.name=filename then
     chkFile="1"
     exit for
    end if
next

dispose:
set objFolder=nothing
set objSubFolders=nothing
set fso=nothing
end function

dim filename
if month(now)<10 then
  filename = year(now) & "-0" & month(now) & "-" & day(now)
  else
 filename = year(now) & "-" & month(now) & "-" & day(now)
end if
Response.write chkFile("f:/mes/fso","ChkFile.asp")
%>

阅读更多
文章标签: asp function path each
个人分类: HTML | JS | VBS
想对作者说点什么? 我来说一句

js使用FSO读取本地文件信息

2010年06月11日 30KB 下载

没有更多推荐了,返回首页

不良信息举报

ASP利用FSO查找本地文件

最多只允许输入30个字

加入CSDN,享受更精准的内容推荐,与500万程序员共同成长!
关闭
关闭