CheckFile函数之asp实现检查某一文件是不是存在的代码

CheckFile函数之asp实现检查某一文件是不是存在的代码：

'==================================================

'函数名: CheckFile

'作  用：检查某一文件是否存在

'参  数：FileName ------ 文件地址 如:/swf/1.swf

'返回值：False  ----  True

'==================================================

    Public Function CheckFile(FileName)

         On Error Resume Next

         Dim FsoObj

         Set FsoObj = Server.CreateObject("Scripting.FileSystemObject")

          If Not FsoObj.FileExists(Server.MapPath(FileName)) Then

              CheckFile = False

              Exit Function

          End If

         CheckFile = True:Set FsoObj = Nothing

    End Function

（编辑：银川站长网）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!