【企业管理】一个在线交易市场方案的设计与实现

一个在线交易市场方案的设计与实现莱阳农学院徐鹏民盖凌云李常先本文设计了一个网上商品交易系统。作为虚拟社区的一部分，系统模拟现实生活中人们的市场行为，为社区用户提供购销服务。利用该系统，用户既可发布和查询供求信息，又可实时在线交流，表达购销意向，从事购销活动，从而实现在线交易。系统以WindowsNT4.0为平台，采用IIS4.0做Web服务器，MSSQLServer7.0做数据库服务器，数据库中设有用户表、供求信息表和成交记录表，三个数据表记录有关的交易数据，开发工具采用HTML、ASP和JavaScript，部分程序如下。用户身份认证子系统系统采用会员制，所有用户必须首先注册，才能进入市场。对用户进行分级管理，根据不同的用户级别决定用户所登记的供求信息发布时间的长短。通过用户名和密码控制用户的登记行为和交易行为。该子系统主要由程序LOGIN.HTM、CHECK.ASP完成。提供用户登录界面//LOGIN.HTM……用户：密码：response.write用户名和密码不匹配！response.write原因与处理办法：1.如果您是第一次登录，则是该用户名已经被他人注册过!您只能换其他名字注册；response.write2.如果您以前曾经用该名字注册成功，那么是密码错误；response.write3.如果密码没有问题，则可能是您的用户名已经被别人盗用，并且盗用者更改了密码response.write请与管理员联系。response.write点击这里进行修改response.endelse'登录正确,进入市场response.redirectmarket.htmendif'处理未注册的新用户elsesql1=insertpark_usersvalues('＆username＆','＆userpd＆',getdate(),getdate(),1)sql2=insertpark_onlinevalues('＆username＆','＆ip＆',getdate())conn.execute(sql1)conn.execute(sql2)response.write！！！欢迎您光临！！！response.write您的用户名是：＆request.form(username)＆＆密码是：＆request.form(userpd)＆response.write再次光临您可继续使用以上数据！endif……供求信息查询子系统用户通过本子系统可得到详细的供求信息，包括供求的商品名称、价格、数量、联系方法以及有关描述，甚至图片、音频和视频。用户可采用分类浏览和关键词查询两种方式，对于关键词查询，只要输入商品名称或表示商品用途、形状等的单词或短语，系统即可通过专门的查询算法，对数据库进行准全文式的模糊查询。本子系统主要由程序SEARCH1.ASP、SEARCH2.ASP和LINK.ASP完成。接受并完成用户查询请求//SEARCH1.ASP……'来自查询界面的数据c_type=request.querystring(c_type)goods_class=request.form(D1)s=request.form(T1)setconn=server.createobject(adodb.connection)'打开数据库conn.connectionstring=driver={sqlserver};server=;uid=;pwd=;database=conn.opensetsession(rs)=server.createobject(adodb.recordset)'构造检索算法ifgoods_class=全部thensql=selectgoods_name,goods_class,description,publisher,contact,pub_datefrommarket_goodswhereclient_type='＆c_type＆'andgoods_namelike'％＆s＆％'elsesql=selectgoods_name,goods_class,description,publisher,contact,pub_datefrommarket_goodswhereclient_type='＆c_type＆'andgoods_class='＆goods_class＆'andgoods_namelike'％＆s＆％'endif……ifc_type=sthenresponse.write卖方市场elseresponse.write买方市场endif……response.writeresponse.write＆session(rs).absoluteposition＆fori=0tosession(rs).fields.count－1response.write＆session(rs)(i).value＆nextresponse.writesession(rs).movenextifsession(rs).eofthenexitforendifnext……nowpage=session(rs).absolutepage－1elsenowpage=session(rs).pagecountendifresponse.write|当前页数：＆nowpage＆response.write|总页数：＆session(rs).pagecount＆response.write|总记录数：＆session(rs).recordcount＆response.write|每页记录数：＆session(rs).pagesize＆fori=1tosession(rs).pagecountifinowpagethenresponse.writeahref=search2.asp?page=＆i＆＆i＆＆elseresponse.writei＆endifnext％供求信息登记子系统用户可以及时地将自己的商品或需求信息发布到网上。用户供求信息由后台数据库通过触发器，根据用户级别自动管理，定时删除。本子系统主要由程序GOODS_ADD.ASP完成。接受来自用户的登记信息并完成登记//GOODS_ADD.ASP％'接受来自商品登记界面的数据username=request.cookies(username)……setconn=server.createobject(adodb.connection)conn.connectionstring=driver={sqlserver};server=;uid=;pwd=;database=conn.open'进行用户身份验证sql1=select＊frompark_onlinewherename='＆username＆'orderbynamesetrs1=conn.execute(sql1)ifrs1.eofthenresponse.write拒绝访问:response.endsql=insertintomarket_goodsvalues('＆client_type＆','＆goods_name＆','＆goods_class＆','＆description＆','＆publisher＆','＆contact＆',getdate())conn.execute(sql)setconn=nothingresponse.redirect../log.htm％在线用户交谈子系统系统模仿现实生活中的市场，在线的供求双方可以直接交流商品的有关信息，确定商品的交易价格，以决定成交与否。主要由程序ADDSAY.ASP、SAY.ASP完成。//ADDSAY.ASP％……says=request.form(says)says=server.HTMLEncode(says)sql=insertintopark_saysvalues('＆username＆','＆towho＆','＆towhoway＆','＆subject＆','＆says＆',getdate(),'')conn.executesqlsetconn=nothingresponse.redirectsay.asp……//SAY.ASP％username=request.cookies(username)subject=request.cookies(subject)setconn=server.createobject(adodb.connection)conn.connectionstring=driver={sqlserver};server=ntd0;uid=xpm;pwd=xpm123;database=parkconn.opensetrs=conn.execute(selectnamefrompark_onlinewherename='＆username＆')ifrs.eofthen％'对于不遵守市场规则的用户,禁止其继续留在市场％endif％％setrs=server.createobject(adodb.recordset)sql=selectname,towho,towhoway,contents,timefrompark_saysrs.opensql,conn,3,1ifnotrs.eofthenline=1rs.movelastdowhilenotrs.bofifline15thenexitdoendififtrim(rs(1))全部andtrim(rs(2))=1thenifusername=trim(rs(0))orusername=trim(rs(1))thenresponse.write＆trim(rs(0))＆只对＆trim(rs(1))＆说＆rs(3)＆(＆timevalue(rs(4))＆)line=line＋1endifelseresponse.write＆trim(rs(0))＆对＆trim(rs(1))＆说＆rs(3)＆(＆timevalue(rs(4))＆)line=line＋1endifrs.movepreviousloopifrs.bofthenrs.movefirstendifendifrs.closeconn.close％成交记录子系统本子系统主要是为在线用户而设，当在线用户通过交谈决定成交后，由本系统对此做详细的成交记录，包括交易双方的名字、成交商品的名称、数量、价格、要求和所提供的服务等项目。当交易产生争执时可提供证据，从而在一定程度上解决交易过程中的违规行为，以保证在线交易的信誉。本子系统通过发送COOKIES进行用户身份验证，以确保用户的真实身份，避免冒充他人从事交易的欺骗行为。系统主要由程序AGREE.ASP完成。记录用户交易过程，以备查询//AGREE.ASP％'接受来自用户同意界面的数据username=request.cookies(username)client_type=request.form(jy1)object=trim(request.form(jy2))goods=request.form(jy3)amount=request.form(jy4)price=request.form(jy5)description=request.form(jy6)writer=trim(request.form(jy7))says=writer＋client_type＋object＋goods＋amount＋price＋descriptionsetconn=server.createobject(adodb.connection)conn.connectionstring=driver={sqlserver};server=;uid=;pwd=;database=conn.opensql1=select＊frompark_onlinewherename='＆username＆'orderbynamesetrs1=conn.execute(sql1)ifrs