nword_save.asp

来自「shopxp网上购物系统v6.6已经调试,百分百可用」· ASP 代码 · 共 25 行

<!--#include file="config.asp" -->
<!--#include file="conn.asp" -->
<%
url=request.form("url")
title=request.form("title")
set rs=server.createobject("adodb.recordset")
sql="select * from kheu_nWord where (id is null)" 
rs.open sql,conn,1,3
rs.addnew
rs("url")=url
rs("title")=title
if Session("user_id")="" then
nUser=2
else
nUser=Session("user_id")
end if
rs("nUser")=nUser
rs.update
set rs=server.createobject("adodb.recordset")
sql="select top 1 id from kheu_nWord order by id desc" 
rs.open sql,conn,1,1
id=rs("id")
response.redirect "nWord_Pay.asp?id="&id
%>