1986年分钱硬币价格表:asp问题,急....

Login.Asp

<!--#include file="conn.asp"-->'连接数据库
'获取表单信息，并将获取来的信息声明变量。有很多种，下面为常用的过滤功能
<%
UserName=trim(request.form("User_Name"))
password=trim(request.form("user_psw"))
'当然也可以对获取的信息加以判断，如用户名的长短和密码的长短,下面是判断。意思是：用户名为空或大于20或小于4则跳转到:错误的用户名.Asp
if UserName="" or len(UserName)>20 or len(UserName)<4 then
conn.close
set conn=nothing
Response.Redirect "../错误的用户名.Asp"
Response.End
'也可以用于密码，不列出了。自己套用一下
'然后打开数据库，进行数据的核对，若信息正确的就执行某些操作，若错误的反之。
set rs=server.createobject("adodb.recordset")
sql="select user_name,user_psw from [user] where user_name='"&username&"'"
rs.open sql,conn,1,3
'我这里给的是1.3及可以更新的，如登陆几次、IP地址等信息。若不需要就1.1即可。
if rs.bof and rs.eof then
rs.Close
set rs=nothing
conn.close
set conn=nothing
response.write"<script>alert('用户名或密码错误！');window.close();</Script>"
end if

if rs("user_psw")<> password then
rs.Close
set rs=nothing
conn.close
set conn=nothing
response.write"<script>alert('对不起，您输入的密码不正确。请重新输入！');history.back();</Script>"
Response.End
end if

...........

%>

login.htm
<form name=form action=login.asp method=post>
<input type=text name=user_name >
<input type=password name=user_psw>
<input type=submit value=登录 name=submit>
</form>

login.asp

<%
username=request.form("user_name")
password=request.form("user_psw")
%>
你提交的用户名是<%=username%>
<br>密码是<%=password%>

login.asp
<%
dim username,userpsw
username=request.querystring("user_name")
userpsw=request.querystring("user_psw")
%>
用户名：<%=username%>
密码：<%=userpsw%>

<%
user_name = request.form("user_name")
user_psw = request.form("user_psw")
%>

dim username,userpsw
username=request.querystring("user_name")
userpsw=request.querystring("user_psw")