ASP判断文件是否存在的函数

2009年11月25日 | 九创主题

ASP判断文件是否存在的函数
'[测试某个文件存在否]
'函数名:CheckFile
'作 用:测试某个文件存在否
'参 数:ckFilename ---- 被测试的文件名(包括路径)
'返回值:文件存在返回True,否则False
'**************************************************
Public Function CheckFile(ByVal ckFilename)
Dim M_fso
CheckFile=False
Set M_fso = CreateObject("Scripting.FileSystemObject")
If M_fso.FileExists(ckFilename) Then
CheckFile=True
End If
Set M_fso = Nothing
End Function


转载文章请注明转载自:九创主题

标签: , ,

留下回复

您必须登录才能发表评论。