网学网为广大网友收集整理了，ASP企业物流管理网站，希望对大家有所帮助！
3．运单修改 运单修改主要用于管理员修改运单信息。运单信息修改页面也是由两部分组成，即用于收集运单信息的前台表单部分和用于对数据库进行操作的后台处理部分。运单修改页面的设计效果如图26所示。 图26 运单修改页面设计效果 运单修改页面中所涉及的HTML表单元素如表8所示。 表8 运单修改页面中所涉及到的HTML表单元素
运单修改页面所涉及到的相关程序代码如下： <% set rs1=server.CreateObject("adodb.recordset") sql1="select * from yundan where id ="&request("id") rs1.open sql1,conn,1,1 if request("post")<>"" then call writ end if function writ if request("start")<>"" and request("mudidi")<>"" and request("ctime")<>""and request("beizhu")<>"" then set rs=server.CreateObject("adodb.recordset") sql="select * from yundan where id="&request("id") ''接收id值，并进行查询相关记录信息 rs.open sql,conn,1,3 rs("start")=request("start") rs("mudidi")=request("mudidi") rs("ctime")=request("ctime") rs("fg")=request("fg") rs("beizhu")=request("beizhu") rs.update rs.close response.Write("<script language=javascript>alert(''提交成功'')</script>") else response.Write("<script language=javascript>alert(''请把信息填写完整'');location=''javascript:history.go(-1)''</script>") end if end function %> 运单修改时显示选中下拉列表的内容，实现此功能所涉及到的程序代码如下： <td> <select name="lei" > ''根据记录集rs中的lei字段的内容，显示下拉列表框的默认选项 <option value="公司新闻" <%if rs("lei")="公司新闻" then%>selected<% End If %>>公司新闻</option> <option value="行业新闻" <%if rs("lei")="行业新闻" then%>selected<% End If %>>行业新闻</option> </select> </td> 运单修改页面的运行结果如图27所示。 图27 运单修改页面的运行结果 4．运单删除 运单删除主要用于管理员删除运单信息。运单删除时，将给予提示框，提示是否确定删除此运单，单击【确定】按钮，将删除已选定的运单。运单删除页面所涉及到的程序代码如下： <a href="xinxi.asp?del=<%=rs("id")%>&p=<%=requestpage%>" onClick="return confirm(''你确定删除吗？'')">删除</a> 
| ||||||||||||||||||||||||||||||||||||||||||||
| 本站发布的计算机毕业设计均是完整无错的全套作品，包含开题报告+程序+论文+源代码+翻译+答辩稿PPT | ||||||||||||||||||||||||||||||||||||||||||||
本文选自计算机毕业设计http://myeducs.cn
|
