1．登录
（1）用户登录代码实现
sql="select * from login where (username='"&nowusername&"' and pwd='"&md5(nowpwd)&"') or (bianhao='"&nowusername&"' and pwd='"&md5(nowpwd)&"')"
set ute(sql)
if rs.eof Then
ute("insert into rizi(username,class,address) values('"&nowusername&"','登陆失败','"&userip&"')")
%>
<script language=javascript>
alert('登录名称或密码错误！')
(-1)
</script>
<%
  d
end if
ute("insert into rizi(username,class,address) values('"&nowusername&"','登陆成功','"&userip&"')")
set rs_ute("select * from zu_login where id="&rs("id_zu"))
if f=false then
  session("shiwei_zu")=rs_zu("zu")
else
  session("shiwei_zu")=""
end if
（2）代码解释
nowusername 表示当前用户输入的用户名或编号
nowpwd 表示当前用户输入的密码
sql="select * from login where (username='"&nowusername&"' and pwd='"&md5(nowpwd)&"') or (bianhao='"&nowusername&"' and pwd='"&md5(nowpwd)&"')"
// sql 代表一个查询字符串变量  ， 表示要从login表中查询与当前输入的用户名和密码相符//录，其中对“用户名”和“编号”行模糊查询
set ute(sql)  //执行sql语句，并将查询结果保存到一个rs记录集中
if rs.eof Then    //如果rs记录集中没有记录，即用户名或密码错误
ute("insert into rizi(username,class,address) values('"&nowusername&"','登陆失败','"&userip&"')") //登录失败，将此次登录的用户名和ip地址，以及登录情况添加到rizi表里去
%>
<script language=javascript>
alert('登录名称或密码错误！')  //弹出一个提示框，提示用户名或密码错误
(-1)  //返回重新输入用户名和密码
</script>
<%
  d
end if
/
/如果上面的if条件不成立，则说明登录成功，执行下面语句,
ute("insert into rizi(username,class,address) values('"&nowusername&"','登陆成功','"&userip&"')") //将登录信息添加到rizi表中
（3）流程图
2．数字框
（1）文本框1：
-----A类型：定义一个方法chg1（a），如果a的值为0，则类型为“百分比”，反之则类型为“固定提成”，代码如图：
选择后在“员工提成文本框”输入任意的字符（数字或是文字…，其它已经输入正确），点击确认添加。如果输入的是数字类型，则确认后添加成功，反之弹出提示文本框“价格只能为数字！”代码如图：
点击确认键实质执行判断语句。
（2）文本框2
B类型：利用正则表达式来判断输入条件：正则表达式为“/[^\d.]/g,''”，意思是当文本框输入非法内容（即非数字），正则表达式作出判断，且利用Data('text').replace（）删除括号内的非法输入
<1>“ onKeyUp="place(/[^\d.]/g,'')  ”表明是当按键弹起时，开始清除非数字或小数点的内容
<2>”onbeforepaste="clipboardData.setData('text',Data('text').replace(/[^\d.]/g,''))"> ”表明是当粘贴前，开始清除所复制的非数字或小数点内容
这个正则表达式（/[^\d.]/g,''）是说明：只允许输入数字和小数点
（3）文本框3（同2）
.
（4）文本框4（同2）
文本框5
【onKeyUp="this.value=place(/\D/g,'')"  onafterpaste="this.value=place(/\D/g,'')" value="0">】
这个正则表达式（/\D/g,''）解释：当在文本框输入或粘贴为非数字内容，则删除这些非数字内容。
<1>onKeyUp="this.value=place(/\D/g,'') 表明是当按键弹起时，开始清除非数字的内容。<2>onafterpaste="this.value=place(/\D/g,'') 表明是当粘贴前，开始清除所复制的非数字内容。
3．下拉列表
（1）下拉框静态代码
<select name=”下拉框传到后台的参数名”>
    <option value=”下拉选项传到后台的参数值1”>下拉选项显示值1</option>
<option value=”下拉选项传到后台的参数值2”>下拉选项显示值2</option>
<option value=”下拉选项传到后台的参数值3”>下拉选项显示值3</option>
……
</select>
（2）库表下拉框的asp代码
<%
if session("shiwei_id")=1 then
sql="select * from ku order by id"
set rs_ute(sql)
else
sql="select * from ku where instr(login,'"&session("shiwei_id")&",')>0 order by id"
set rs_ute(sql)
end if
if f then
%>
<script language="javascript">
alert("没有属于你管理的仓库,请先添加仓库！")
window.location.href="../system/ku_add.asp"
</script>
<%
d
end if
%>
仓库: <select name="ku<%=x%>">
<%
do while f=false
%>
<option value="<%=rs_ku("id")%>"<%if rs_ku("moren") then%> selected="selected"<%end if%>><%=rs_ku("ku")%></option>
<%
venext
loop
%>
</select>
（3）库表实现流程图及代码批注：
4．查询组合
例：库存管理—>库存查询 页面的查询组合，如下图：
（1）查询组合代码实现
怎么写代码做软件
sql="select * from produit where 1=1"
  if nowkeyword<>"" then
    sql=sql&" and (title like '%"&nowkeyword&"%' or huohao like '%"&nowkeyword&"%')"
  end if
  if nowku<>"" then

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。