企业进销存管理系统毕业论文（设计）(5)

大学本科毕业论文（设计) 第 – 17 – 页

set rs=server.CreateObject(\ '创建记录集对象 conn.open application(\sql=\

rs.open sql,conn,1,3 '打开记录集 %>

商品信息添加时的数据处理页主要是将用户提交的表单信息保存到数据库中，数据处理页的程序代码如下：

<%

spname=trim(request(\jc=trim(request(\cd=trim(request(\dw=trim(request(\gg=trim(request(\bz=trim(request(\ph=trim(request(\

pzwh=trim(request(\

gysname=trim(request(\memo=trim(request(\

set conn=server.createobject(\set rs=server.createobject(\set myrs=server.createobject(\set rec=server.createobject(\conn.open application(\sql=\rs.open sql,conn,1,3

if not rs.eof then '如果没到记录尾 sql=\myrs.open sql,conn,1,3 str=myrs(\

spid=cint(mid(str,3,4))+1 spid=\else

spid=\ end if

sql=\values('\&\ '插入

本科毕业论文（设计) 第 – 18 – 页

新记录

rec.open sql,conn,1,3 %>

商品信息管理页面的运行结果如图7所示。

图7 商品信息管理页面的运行结果

7.2 商品信息查询设计

用户可以通过单击菜单主导航“基础信息”/“商品信息查询”超链接，进入商品信息查询页面。该页面主要完成商品信息的检索。

商品信息查询页面设计效果如图8所示。

图8 商品信息查询页面设计效果

商品信息查询页面中涉及的HTML表单元素如表4所示。

大学本科毕业论文（设计) 第 – 19 – 页

表4 商品信息查询页面中涉及的HTML表单元素

名称 myform 类型 form 表单 含义 重要属性 action=\ sel select 选择查询字段 ??

利用JavaScript编写检测用户输入信息是否为空的函数，并通过单击【查询】按钮调用该函数，当用户输入合法信息后，提交该表单。关键代码如下：

应用JavaScript动态向select中添加一个新的选项“all”，并将该选项设置为被选择的项，通过单击【显示全部数据】按钮调用该函数。关键代码如下：

商品信息展示页面检索数据库的程序代码如下： <%

path=request.servervariables(\

本科毕业论文（设计) 第 – 20 – 页

set conn=server.createobject(\ '创建数据库对象 set rs=server.createobject(\ '创建记录集对象 conn.open application(\ '打开数据库 if request(\ tj=request(\

lname=request(\ jname=request(\ session(\

session(\ session(\end if '查询

if session(\ '精确查询 sql=\\

end if

if session(\ '模糊查询

sql=\'%\

end if

if session(\ '查询全部 sql=\end if

rs.open sql,conn,1,3 %>

分页显示查询结果的代码如下： <%'分页

rs.pagesize=5 '每页显示的记录数 page=clng(request(\ '获取当前页码 if page<1 then page=1

if page>rs.pagecount then page=rs.pagecount show rs,page '分页子程序开始 sub show(rs,page)

rs.absolutepage=page '将记录指针定位到指定页 for i=1 to rs.pagesize rs.movenext

大学本科毕业论文（设计) 第 – 21 – 页

if rs.eof then exit for '如果到记录尾结束循环 next end sub %>

使用如下代码来为其他页面添加超链接：

商品信息查询页面的运行结果如图9、图10所示。

图9 商品信息查询条件页面运行结果