asp判断某个文件是否存在的函数

最近在写功能的时候需要判断某个文件是否存在，存在则调用，不存在则动态显示页面的功能，用到了下面的代码，特分享一下需要的朋友可以参考一下。

两个函数都是基于ASP中的FileSystemObject对象，也就是FSO，写成函数方便以后使用。

ASP检查目录是否存在的函数代码

Function isExistFolder(Byval folderDir)
	on error resume next
	If objFso.FolderExists(server.MapPath(folderDir)) Then isExistFolder=True Else isExistFolder=False
	if err then err.clear:isExistFolder=False
End Function

ASP检查文件是否存在的函数代码

Function isExistFile(Byval fileDir)
	on error resume next
	If (objFso.FileExists(server.MapPath(fileDir))) Then isExistFile=True Else isExistFile=False
	if err then err.clear:isExistFile=False
End Function

asp中判断文件是否存在（不是本机上的文件）

用fso.fileexists只能查询本地文件是否存在，用组件xmlhttp的readyState的方法可以获取远程文件是否存在，返回大于0，表示文件存在，否则，就是不存在。

set XMLHTTP =Server.CreateObject("Microsoft.XMLHTTP")
XMLHTTP.open("HEAD","http://www.test.com/test.htm",false)
XMLHTTP.send()
if XMLHTTP.status=200 then
'文件存在
end if

ASP判断文件是否存在以及删除文件实例代码

<%
'ASP判断文件是否存在以及删除文件实例代码
dim htmlFilefs
htmlFile="../book_show.html"
htmlFile=server.MapPath(htmlFile)
Set fs=Server.CreateObject("Scripting.FileSystemObject")
If fs.FileExists(htmlFile) Then '判断文件是否存在
   fs.DeleteFile htmlFile,true '如果文件存在，则删除文件
end if
Set fs=Nothing
%>

到此这篇关于asp判断某个文件是否存在的函数的文章就介绍到这了,更多相关asp文件是否存在内容请搜索我们以前的文章或继续浏览下面的相关文章希望大家以后多多支持我们！

赞 (0)

相关推荐

  • ASP如何检测某文件夹是否存在,不存在则自动创建

    直接给大家分享一下我们测试正常可以使用的代码,并且支持多级目录创建 代码一 Function CreateMultiFolder(ByVal CFolder) Dim objFSO, PhCreateFolder, CreateFolderArray, CreateFolder Dim i, ii, CreateFolderSub, PhCreateFolderSub, BlInfo BlInfo = False CreateFolder = CFolder On Error Resume Ne

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

    '================================================== '函数名: CheckFile '作  用:检查某一文件是否存在 '参  数:FileName ------ 文件地址 如:/swf/1.swf '返回值:False  ----  True '==================================================     Public Function CheckFile(FileName)          O

  • asp 判断上传文件中是否存在危险代码

    复制代码 代码如下: <% function CheckFileContent(FileName) dim ClientFile,ClientText,ClientContent,DangerString,DSArray,AttackFlag,k set ClientFile=Server.CreateObject("Scripting.FileSystemObject") set ClientText=ClientFile.OpenTextFile(Server.MapPath

  • asp判断某个文件是否存在的函数

    最近在写功能的时候需要判断某个文件是否存在,存在则调用,不存在则动态显示页面的功能,用到了下面的代码,特分享一下需要的朋友可以参考一下. 两个函数都是基于ASP中的FileSystemObject对象,也就是FSO,写成函数方便以后使用. ASP检查目录是否存在的函数代码 Function isExistFolder(Byval folderDir) on error resume next If objFso.FolderExists(server.MapPath(folderDir)) Th

  • 判断dll文件是否已经注册的ASP函数代码

    asp判断服务器是否安装了某个组件,也就是是否安装了某个dll文件,判断某个组件是否在服务器注册了,asp组件很多,它的判断可以减少很多asp错误,主要是用下面的函数: 复制代码 代码如下: <% '功能:检查是否存在系统组件或组件是否安装成功 '参数:组件名 Function IsObjInstalled(strClassString) On Error Resume Next IsObjInstalled = False Err = 0 Dim xTestObj Set xTestObj =

  • PHP使用get_headers函数判断远程文件是否存在的方法

    本文实例讲述了PHP使用get_headers函数判断远程文件是否存在的方法.分享给大家供大家参考.具体实现方法如下: 以前讲过程关于php判断远程文件是否存在的文章都是利用fopen,sockt,curl函数来实现检查远程文件是否存在,下面我再介绍利用 get_headers来检查远程文件是否存在,感兴趣的朋友可以参考一下. 先来简单了解get_headers()函数 get_headers() 返回一个数组m包含有服务器响应一个 HTTP 请求所发送的标头. get_headers:发送服务

  • ASP生成静态文件编码为UTF-8格式的HTML文件

    一般我们在ASP环境下,运行动生静操作时都用到的是FSO,他是专门对文件进行操作的一个组件,他FSO的编码属性只有三种,系统默认,Unicode,ASCII,并没有我们要的utf-8,所以一般中文系统上使用FSO组件生成的文件都是gb2312格式的了,即便您在网页内写上charset="utf-8"也是没用的 要生成utf-8格式的文件,ASP环境下我们用 ADODB.Stream代替FSO读写utf-8文件,因为,ADODB.Stream,有一个CharSet 属性,可以让您定义要打

  • ASP.NET中文件上传下载方法集合

    文件的上传下载是我们在实际项目开发过程中经常需要用到的技术,这里给出几种常见的方法,本文主要内容包括: 1.如何解决文件上传大小的限制 2.以文件形式保存到服务器 3.转换成二进制字节流保存到数据库以及下载方法 4.上传Internet上的资源 第一部分: 首先我们来说一下如何解决ASP.NET中的文件上传大小限制的问题,我们知道在默认情况下ASP.NET的文件上传大小限制为2M,一般情况下,我们可以采用更改WEB.Config文件来自定义最大文件大小,如下: <httpRuntime exec

  • php下利用curl判断远程文件是否存在的实现代码

    复制代码 代码如下: //判断远程文件 function check_remote_file_exists($url) { $curl = curl_init($url); // 不取回数据 curl_setopt($curl, CURLOPT_NOBODY, true); // 发送请求 $result = curl_exec($curl); $found = false; // 如果请求没有发送失败 if ($result !== false) { // 再检查http响应码是否为200 $

  • 用ASP读取XML文件的具体方法与示例

    分别保存下面两段代码,一个保存为readxml.asp另一个保存为test.xml,放在同一个目录下面,调试程序即可,在程序里面我已经做了解释,读取代码可以做成一个readxml的函数,通过使用输入的参数而读取xml不同数据记录的不同的值.这段程序的改编来自互联网,有什么出入请见谅. 复制代码 代码如下: <% dim xml,objNode,objAtr,nCntChd,nCntAtr Set xml=Server.CreateObject("Microsoft.XMLDOM"

  • fckeditor asp版本的文件重命名

    定位到:editor\filemanager\connectors\asp\io.asp 主要是修改:SanitizeFileName这个函数,并添加取得扩展名和文件重命名的方法,详细代码如下: 复制代码 代码如下: ' Do a cleanup of the file name to avoid possible problems function SanitizeFileName( sNewFileName ) Dim oRegex Dim oExt Set oRegex = New Reg

  • ASP 判断是否有中文的代码

    在 ASP(VBScript 为语言)中,Asc 函数的返回值小于 0 的,可以被判断为中文字符.Asc 函数返回与字符串的第一个字母对应的 ANSI 字符代码. 复制代码 代码如下: '判断字符串中是否有中文字符 '有-返回 true '无-返回 false '这里的中文字符可能还包括日文.韩文等东方文字 function HasChinese(str) HasChinese = false dim i for i=1 to Len(str) if Asc(Mid(str,i,1)) < 0

  • VC判断一个文件为目录的方法

    本文实例讲述了VC判断一个文件为目录的方法,分享给大家供大家参考.具体实现方法如下: 这是一个自定义函数,用于判断一个文件是否为目录: 复制代码 代码如下: /**  * check whether a file is a directory  @return true if is a directory, else false(if file not exists, false)  */ __declspec(dllexport) bool IsDirectory(const char* fi

随机推荐