计算机应用 | 古代文学 | 市场营销 | 生命科学 | 交通物流 | 财务管理 | 历史学 | 毕业 | 哲学 | 政治 | 财税 | 经济 | 金融 | 审计 | 法学 | 护理学 | 国际经济与贸易
计算机软件 | 新闻传播 | 电子商务 | 土木工程 | 临床医学 | 旅游管理 | 建筑学 | 文学 | 化学 | 数学 | 物理 | 地理 | 理工 | 生命 | 文化 | 企业管理 | 电子信息工程
计算机网络 | 语言文学 | 信息安全 | 工程力学 | 工商管理 | 经济管理 | 计算机 | 机电 | 材料 | 医学 | 药学 | 会计 | 硕士 | 法律 | MBA
现当代文学 | 英美文学 | 通讯工程 | 网络工程 | 行政管理 | 公共管理 | 自动化 | 艺术 | 音乐 | 舞蹈 | 美术 | 本科 | 教育 | 英语 |

企业进销存管理系统设计(一)毕业论文(3)

2013-05-31 01:08
导读:bsp;表2 用户登录页面中涉及的HTML表单元素 名称类型含义重要属性 myformform表单action="checklogin.asp" method="post" usernametext用户名id="username2" PWDpassword密码style=
bsp;表2                        用户登录页面中涉及的HTML表单元素
名称 类型 含义 重要属性 
myform form 表单 action="checklogin.asp" method="post" 
username text 用户名 id="username2" 
PWD password 密码 style=" font-family:Wingdings; width:129;" oncopy="return false" oncut="return false" onpaste="return false" 
Submit3 button 【确定】按钮 onClick="check(myform)" 
reset1 reset 【取消】按钮 class="btn_grey" value="取消" 
 利用java script编写检测用户输入信息是否合法的函数,并通过单击【确定】按钮调用该函数,判断用户名或密码是否为空,如果为空,系统将给予提示。当用户输入合法信息后,提交该表单,完整代码如下:
<script language="java script">
function check(myform){
if (myform.username.value==""){       //判断用户名是否为空,并弹出提示对话框
 alert("请输入用户名!");myform.username.focus();return;}
if(myform.PWD.value==""){           //判断密码是否为空,并弹出提示对话框
 alert("请输入密码!");myform.PWD.focus();return;}
 myform.submit();
}
</script>
 在登录页面时,当用户提交了登录资料后,就由表单action属性指定的ASP文件在服务器端对这些资料进行验证。它的工作主要是判断用户的登录的用户名和密码是否正确。完成这些工作,就必须从连接储存用户数据库中取出相关的信息记录。如果记录验证无误,就通过ASP的Response对象的redirect方法,将用户登录的页面传到客户端的浏览器上;如果用户输入了错误的用户名或密码,就通过ASP的Response对象的Write方法弹出错误提示。 (科教作文网http://zw.NSEaC.com编辑发布)
 在开始编写程序之前,首先使用Session来存储用户的相关信息,并与客户端保持联系。本页使用session("ulogin")以存储在数据库中的标识符作为信息记载,并以判断这个值是否为空来判断用户是否登录。
 表单提交到处理页后会验证用户登录的身份,完整代码如下:
<!--#include virtual="adovbs.inc"-->
<!-- #include file="Conn/Conn.asp" -->  <!--包含数据库连接文件-->
<%
Session.Timeout=30                            '设置Session的过期时间为30分钟
session("ulogin")="no"
cname=trim(request("username"))                 '获取用户名
pass=request.Form("PWD")         '获取密码
pass=replace(pass,"'","")
set conn=server.createobject("adodb.connection")
set comm=server.CreateObject("adodb.command")        '创建对象
conn.open application("dsn")         '打开数据库
set comm.activeconnection=conn
comm.commandtype=adcmdstoredproc
comm.commandtext="checklogin"
set mpf=comm.createparameter("cname",advarchar,adparaminput,20)
comm.parameters.append mpf
set mps=comm.createparameter("pass",advarchar,adparaminput,20)
comm.parameters.append mps
comm("cname")=cname
comm("pass")=pass
set rs=comm.execute
if rs.eof then
 response.Write("<script language='java script'>alert('请输入正确的用户名和密码');window.location.href='login.asp';</script>")'弹出提示对话框,并转向指定页面
else
 session("id")=rs("id")
 session("name")=rs("name") (转载自http://zw.NSEAC.com科教作文网)
 session("quan")=rs("quan")
 session("ulogin")="yes"
 response.redirect "default.asp"     
上一篇:网上书店销售系(一)毕业论文网 下一篇:没有了