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

ttx9n

'==================================================
'函数名: 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

leidie123a

好人好人好人好人

nwk53kbd

呵呵呵呵呵呵

czoz5y

的谁vdvdsvdsvdsdsv

醉梦娱乐网

儿童服务绯闻绯闻绯闻

shw5ovr

天天源码社区论坛

fenghaoke

快更新啊，我擦

uj9lpc

的谁vdvdsvdsvdsdsv

qwe520

天天源码论坛

8ayoqrpj

1312315458748777