save_link.asp

来自「非常有商业价值的软件」· ASP 代码 · 共 56 行

<!--#include file="chk.asp"-->
<!--#include file="db_conn.asp"-->
<!--#include file="../my_lib/my_request.asp"-->
<%
yqjlink1=my_request("yqjlink1",0)
yqjlink2=my_request("yqjlink2",0)
yqjlink3=my_request("yqjlink3",0)
yqjlink4=my_request("yqjlink4",0)
yqjlink5=my_request("yqjlink5",0)
yqjlinku1=my_request("yqjlinku1",0)
yqjlinku2=my_request("yqjlinku2",0)
yqjlinku3=my_request("yqjlinku3",0)
yqjlinku4=my_request("yqjlinku4",0)
yqjlinku5=my_request("yqjlinku5",0)
yqjlinkw1=my_request("yqjlinkw1",0)
yqjlinkw2=my_request("yqjlinkw2",0)
yqjlinkw3=my_request("yqjlinkw3",0)
yqjlinkw4=my_request("yqjlinkw4",0)
yqjlinkw5=my_request("yqjlinkw5",0)
yqjlinkwu1=my_request("yqjlinkwu1",0)
yqjlinkwu2=my_request("yqjlinkwu2",0)
yqjlinkwu3=my_request("yqjlinkwu3",0)
yqjlinkwu4=my_request("yqjlinkwu4",0)
yqjlinkwu5=my_request("yqjlinkwu5",0)

sql="select * from weblink where id=1"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,3
rs("yqjlink1")=yqjlink1
rs("yqjlink2")=yqjlink2
rs("yqjlink3")=yqjlink3
rs("yqjlink4")=yqjlink4
rs("yqjlink5")=yqjlink5
rs("yqjlinku1")=yqjlinku1
rs("yqjlinku2")=yqjlinku2
rs("yqjlinku3")=yqjlinku3
rs("yqjlinku4")=yqjlinku4
rs("yqjlinku5")=yqjlinku5
rs("yqjlinkw1")=yqjlinkw1
rs("yqjlinkw2")=yqjlinkw2
rs("yqjlinkw3")=yqjlinkw3
rs("yqjlinkw4")=yqjlinkw4
rs("yqjlinkw5")=yqjlinkw5
rs("yqjlinkwu1")=yqjlinkwu1
rs("yqjlinkwu2")=yqjlinkwu2
rs("yqjlinkwu3")=yqjlinkwu3
rs("yqjlinkwu4")=yqjlinkwu4
rs("yqjlinkwu5")=yqjlinkwu5
rs.update
rs.close
set rs=nothing
response.redirect "link.asp"
conn.close
set conn=nothing
%>