通过本文主要向大家介绍了check file,check file system,check file integrity,file check failed,校验大师filecheck等相关知识,希望对您有所帮助,也希望大家支持linkedu.com www.linkedu.com
'==================================================
'函数名: 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 </div>
'函数名: 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 </div>