您的位置:首頁技術文章
文章詳情頁

asp判斷某個文件是否存在的函數

瀏覽:163日期:2022-06-04 16:46:09

最近在寫功能的時候需要判斷某個文件是否存在,存在則調用,不存在則動態顯示頁面的功能,用到了下面的代碼,特分享一下需要的朋友可以參考一下。

兩個函數都是基于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文件是否存在內容請搜索以前的文章或繼續瀏覽下面的相關文章希望大家以后多多支持!

標簽: ASP
相關文章:
国产综合久久一区二区三区