Question

asp中把代表URL的变量传递

html="http://"
html=html&Request.ServerVariables("Server_Name")
html=html&Request.ServerVariables("URL")

if request.ServerVariables("QUERY_STRING")<>"" then
html = html &"?"& Request.ServerVariables("QUERY_STRING")
end if
这个程序读出当前页面地址，而我当前页面有这样一个
[</font><font size="2"><a href="javascript:if(window.confirm('确定要删除 <% =rs("date") %> 的 <% =rs("ylname") %> 邮路信息吗?删除后不可恢复!')==true){parent.window.location='ywdel2.asp?del_id=<% =rs("id") %>'};"><font color="#4C7BAB">删除</font></a><font color="#4C7BAB">]

ywdel2.asp是这样写的：dele_id = Request("del_id")

sql="select * from yw where id like '"&dele_id&"'"

set rs=conn.execute(sql) '打开数据库
if (rs.eof and rs.bof) then

Response.Write "<script language='javascript'>alert('无此数据记录');</script>"
response.write "<meta http-equiv=refresh content=""1;URL=yw2.asp"">"

else

wwddel="delete from yw where id like '"&dele_id&"'"
conn.execute wwddel
aa=1
End If

if aa=1 then
response.redirect "yw2.asp"
end if

conn.close()
set conn=nothing

删除操作后就返回到yw2.asp，我想返回到当前页面，该如何该，参数html如何传递？

Answer 1

response.write "<meta http-equiv=refresh content=""1;URL=" & Request.ServerVariables("HTTP_REFERER") & """>"

追问

还是不行，response.redirect "yw2.asp"
怎么改

追答

response.redirect Request.ServerVariables("HTTP_REFERER")

追问

报错》
错误类型：
Response 对象, ASP 0158 (0x80004005)
URL 是必需的。
/yw/ywdel2.asp, 第 25 行

追答

如果不能保证一定会取到来路信息,那你只能换其它方法,比如URL传参,或是在取不到来路时返回到一个固定的页.
比如
If Request.ServerVariables("HTTP_REFERER")="" Then
response.redirect "yw2.asp"
Else
response.redirect Request.ServerVariables("HTTP_REFERER")
End If

Answer 2

把response.redirect "yw2.asp"
改成response.redirect html

追问

的确是能删除，删了之后总是提示“无此数据记录”

追答

那你数据库有没有数据呀

Answer 3

不晓得