Goto.asp代码如下:
<%
'导入数据库连接文件,此处略
dim pid,url
pid=cint(request("id"))
url=conn.execute("select pd_url from PD where PD_ID="&pid)(0)
response.redirect(url)
%>
首先 连接数据库,读取数据库,设置全局变量 ,比如 id 为 sid,url为surl
<%
dim nowpd_id
nowpd_id=request("id")
set rs=server.createobject("Adodb.Recordset")
sql="Select * from PD where pd_id="&nowpd_id&""
rs.open sql,conn,1,3
nowpd_url=rs("pd_url")
set rs=nothing
%>