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