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