asp会员注册后自动登陆
<%
set rs=server.createobject("adodb.recordset")
sql="select * from YONGHU where (ID is null)"
rs.open sql,conn,1,3
rs.addnew
rs("USERNAME")=request("username")
rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing
session("username")=rs("name")
response.redirect "index.asp"
%>
在首页显示用户名就用 <%=session("username")%>
=====================================
在用户注册成功后：
1、添加变量session("names")为用户名称；
2、检测len(session("names"))是否为0（即变量是否空），如果不空，response.Redirect("会员中心页面") ，如果空，仍然在登录页面，提示登录不成功。
相关文档：
‘防注入把它加到conn里这样就ok了
dim sql_injdata
SQL_injdata = "’|and|exec|insert|select|delete|update|count|*|%|chr|mid|master|truncate|char|declare"
SQL_inj = split(SQL_Injdata,"|")
If Request.QueryString<>"" Then
For Each SQL_Get In Request.QueryString
For SQL_Data=0 To Ubo ......
dim conn,connstr
Set conn = Server.CreateObject("ADODB.Connection")'创建一个数据库链接对象conn，方便后面调用
connstr="Provider=SQLOLEDB;Data Source=(local);Initial Catalog=111;User ID=sa;Password=1234;" '创建一个数据库的recordset对象，方便以后调用
conn.Open connstr'打开数据库 ......
引言
采用WEB技术实现B/S（浏览器/服务器）结构的管理系统是办公自动化的发展趋势。基于WEB技术的管理系统，由于开发周期短；与用户平台无关；易于实现交互式应用；能对信息进行快速、高效的收集、处理和发布，近几年来得到了迅速发展。而ASP技术由于其开发效率高、交互性好，安全性强等特点，逐渐成为开发管理系统 ......
<%@ Language=VBScript %>
<SCRIPT id=DebugDirectives runat=server language=javascript>
// Set these to true to enable debugging or tracing
@set @debug=false
@set @trace=false
</SCRIPT>
<HTML>
<HEAD>
<META name=VI60_defaultClientScript content=VBScript>
< ......
