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

两个函数都是基于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
%>
华山资源网 Design By www.eoogi.com
广告合作:本站广告合作请联系QQ:858582 申请时备注:广告合作(否则不回)
免责声明:本站资源来自互联网收集,仅供用于学习和交流,请遵循相关法律法规,本站一切资源不代表本站立场,如有侵权、后门、不妥请联系本站删除!
华山资源网 Design By www.eoogi.com

P70系列延期,华为新旗舰将在下月发布

3月20日消息,近期博主@数码闲聊站 透露,原定三月份发布的华为新旗舰P70系列延期发布,预计4月份上市。

而博主@定焦数码 爆料,华为的P70系列在定位上已经超过了Mate60,成为了重要的旗舰系列之一。它肩负着重返影像领域顶尖的使命。那么这次P70会带来哪些令人惊艳的创新呢?

根据目前爆料的消息来看,华为P70系列将推出三个版本,其中P70和P70 Pro采用了三角形的摄像头模组设计,而P70 Art则采用了与上一代P60 Art相似的不规则形状设计。这样的外观是否好看见仁见智,但辨识度绝对拉满。