檢查當前目錄下是否存在指定的文件,如果存在就重新命名
當前位置:點晴教程→知識管理交流
→『 技術文檔交流 』
<%[br]function judgefileexit(strfilename)[br]dim objfso,objfile,objfj[br]dim strfilepath[br]dim blfj[br]dim intflag[br]intflag=0[br]set objfso=createobject("scripting.filesystemobject")[br]strfilepath=server.mappath("./")[br]if right(strfilepath,1)<>"/" or right(strfilepath,1)<>""" then[br]strfilepath=strfilepath&"""[br]end if[br]blfj=objfso.fileexists(strfilepath&strfilename)[br]do while blfj=true[br]intflag=intflag+1[br]blfj=objfso.fileexists(strfilepath &intflag&strfilename)[br]loop[br]if intflag=0 then[br]judgefileexit= strfilename[br]else[br]judgefileexit=intflag&strfilename[br]end if [br]set objfso=nothing[br]end function[br]response.write judgefileexit("22.htm")[br]%>
該文章在 2010/7/5 0:14:30 編輯過 |
關鍵字查詢
相關文章
正在查詢... |