服务器之家:专注于服务器技术及软件下载分享
分类导航

PHP教程|ASP.NET教程|Java教程|ASP教程|编程技术|正则表达式|C/C++|IOS|C#|Swift|Android|VB|R语言|JavaScript|易语言|vb.net|

服务器之家 - 编程语言 - ASP教程 - CheckFile函数之asp实现检查某一文件是否存在的代码

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

2019-10-09 14:20asp代码网 ASP教程

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

  1. '==================================================  
  2. '函数名: CheckFile  
  3. '作  用:检查某一文件是否存在  
  4. '参  数:FileName ------ 文件地址 如:/swf/1.swf  
  5. '返回值:False  ----  True  
  6. '==================================================  
  7.     Public Function CheckFile(FileName)  
  8.          On Error Resume Next  
  9.          Dim FsoObj  
  10.          Set FsoObj = Server.CreateObject("Scripting.FileSystemObject")  
  11.           If Not FsoObj.FileExists(Server.MapPath(FileName)) Then  
  12.               CheckFile = False  
  13.               Exit Function  
  14.           End If  
  15.          CheckFile = True:Set FsoObj = Nothing  
  16.     End Function 

延伸 · 阅读

精彩推荐