首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 网站开发 > ASP >

asp检查登录有关问题

2013-01-07 
asp检查登录问题!--#include fileconn_2.asp--%Dim nameDim pwdname Trim(Request.Form(username

asp检查登录问题
<!--#include file="conn_2.asp"-->
<%  
Dim name
Dim pwd
name = Trim(Request.Form("username1"))
pwd  = Trim(Request.Form("password1"))
If name = "" Or pwd = "" Then   
Response.Write "<Script>alert('请输入帐号或密码!');history.go(-1);</Script>"
 Response.End 
Else
Set Rs = Server.CreateObject("ADODB.Recordset")
Sql = "Select * From administrator Where userrname='"&name&"'"
Rs.Open Sql,conn,3,3      
If Rs.BOF Or Rs.EOF Then
Response.Write "<Script>alert('账号有误!');history.go(-1);</Script>"
 Response.End 
Else
End if
 
If name = Rs("name") And pwd = Rs("pwd") Then
Session("username1")=Rs("username")
session("key")=Rs("oskey")
Response.Redirect "mymanage.asp"
Else 
    Response.Write "<Script>alert('密码错误!');history.go(-1);</Script>"
 Response.End
 
End If
End If
Rs.Close
Set Rs=nothing
Conn.Close
Set Conn=nothing
%>
大神们帮忙看看这段代码有什么问题吧,
它显示:至少一个参数没有被指定值。
类似的指定pwd那里出了问题,因为我写代码是pwd一直是黑色的,而name是红色的。
[解决办法]
userrname 
这个是不是写错了?

热点排行