我在网站上添加数据的时候,添加完毕,点”确定”结果提示无法找到网页,出现一段乱码
”Microsoft VBScript 运行时错误 错误 '800a003a'
文件已存在
/Agent/admin_qiye.asp,行 633 ”
这个是什么意思,我应该怎么解决.我是菜鸟级别希望回答的高手尽可能详细一些,倾家荡产悬赏给我解决问题的!
我在网上找了很多,但都是提出这个问题,没有说怎么解决的,跪求高手赐予解决方案!
多谢各位高手!
在下感激不尽,下面是633行左右的源码!望各高手指点
new_folder="webgroud/"&namenow&""
set fso=CreateObject("Scripting.fileSystemObject")
set MyFile=fso.CreateFolder(server.mappath(new_folder))
set fso=nothing
conn.execute("update online set companymun=companymun+1")
Response.Redirect "admin_qiye.asp?action=sussecc&tatty="&request("tatty")&"&username="&request("username")&"&endtime="&buytime&""
參考答案:你第一次执行这段代码的时候,应该是在webgroud文件夹下建立了一个namenow里存放的名字的一个文件.但是你的二次执行时,当然会提示你已经存在这个文件了,你可以加上判断,
new_folder="webgroud/"&namenow&""
set fso=CreateObject("Scripting.fileSystemObject")
if fso.Exists(new_folder) then
else
set MyFile=fso.CreateFolder(server.mappath(new_folder))
end if
set fso=nothing