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("会员中心页面") ,如果空,仍然在登录页面,提示登录不成功。
相关文档:
安装过程顺畅,ASP页面在其它环境下能正常调试,文件路径配置正确情况下,不能调试ASP 页面,参考一下内容
第一
修改端口配置 一些优化和防护软件对端口有特殊的“照顾”
第二
常见的“500内部服务器错误”万金油:
1、卸载“internet信息服务(IIS)”,
2、看看事件查看器里有没 ......
<%
response.Charset = "gb2312"
if request("test") <> "" then
On Error Resume Next
dim fso
set fso = server.createObject("Scripting.FileSystemObject")
if Err.Number > 0 then
  ......
我想在asp中加一个链接,指向asp.net网页,但asp.net的网址是经过HttpUtility.UrlEncode变形和HttpUtility.UrlDecode变回的,而asp的server.urlencode却产生不了和HttpUtility.UrlEncode一样的编码,请问有没有解决办法
补充:原来asp.net的是"web.aspx?str="+HttpUtility.UrlEncode(str)
和HttpUtility.UrlDecode(Requ ......
‘防注入把它加到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'打开数据库 ......