haoyuo.asp

WEB2.0圈子交友平台,以用户影音创意和分享为主导, 为用户提供:圈子,个人空间,博客,话题,相册,分类信息,短信,交友等免费服务,致力打造中国第一套 WEB2.0交友系统开源网站.

<!--#include file="../main.asp" -->
<!--#include file="../IsLogin.asp" -->
<%
user=request("username")
set rs1=Server.CreateObject("Adodb.Recordset")
sql1="select * from "&WebSqlType&"_haoyuo"
rs1.open sql1,conn,1,3
rs1.addnew
rs1(""&WebSqlType&"_username")=Request.Cookies("userid")
rs1(""&WebSqlType&"_user")=user
rs1(""&WebSqlType&"_key")=1
rs1(""&WebSqlType&"_key1")=1
rs1.update
response.Redirect("index.asp?username="&user&"")
rs1.close
set rs1=nothing
conn.close
set conn = nothing
%>