政府采购管理信息系统

政府采购管理信息系统摘要随着社会信息化的发展，社会上很多事务的管理也跟着相应发生了根本的变化，府采购行为、优化财政支出管理，各级政府纷纷以立法形式推行政府采购制度的实施，使采购的方式、程序和采购合同的履行等市场行为得以规范。同时，随着“政府上网工程”的进一步深入，政府部门相继在网上建立站点，并提供信息共享和便民服务的应用项目。

工欲善其事必先利其器。采购一套专门处理政府物资采购的网络办公系统———政府采购管理信息系统，可谓恰逢其时。

应用政府采购管理系统以后，一方面通过交互式动态网站建立了便民服务的窗口，不仅能及时发布各种信息，还允许供应商进行网上登记和注册。

另一方面，无纸的“绿色办公”得以实现，部门办公效率明显提高，同时由于采用“公平、公正、公开”的电子招投标，使更多供应商参与竞争，大大降低了采购成本。

在将来,政府采购管理信息系统将得到全面系统的应用，实现了包括公开招标、邀请招标、竞争性谈判、询价以及定点采购等方式在内的各种采购方式流程的处理，全面满足政府业务需要。

同时，系统对网上发布公开招标公告、供应商在线注册和网上竞价等功能的支持也对当前新兴的政府网络采购提供了一个完善而系统的借鉴。关键字：Dreamweaver；ACCESS；ASP政府采购管理信息系统全文共51页，当前为第1页。

政府采购管理信息系统全文共51页，当前为第1页。Alongwiththedevelopmentofsocialinformationization,societyalotofbusinessofmanagementalsofollowedtocorrespondoccurrencerootofvariety,mansionpurchasebehavior,excellentturnpublicfinanceexpendituremanagement,thealllevelsgovernmentpromoteagovernmentprocurementwiththelawmakingforminsuccessionsystemofimplement,makepurchaseofimplementofway,procedureandpurchasecontractetc.marketbehaviorcannorm.Inthemeantime,alongwith"thegovernmentgettotheInternetengineering"offurtherthorough,governmentsectionsuccessiveonthenetestablishmentstationpoint,andprovideaninformationshareandconveniencesforcitizensserviceofapplicationitem.Theworkdesirekinditsmatterthebenefititsmachinenecessarilyandfirst.Thepurchaseisasetofspecializedprocessinggovernmentsuppliespurchaseofthenetworktransactsystem-governmentprocurementmanagementinformationsystem,itmaybesaidandinchanceencounterithour.Applicationgovernmentprocurementmanagementsystemafter,ontheotherhandpasstohandoverwitheachotheratypedynamicstateawebsiteestablishmentconveniencesforcitizensserviceofwindowway,notonlyabilityreleasevariousinformationintime,returnallowsuppliertocarryonanettoptoregisterandregister.Ontheotherhand,havenopaperof"greentransact"canrealization,thesectiontransactanefficiencyobviousexaltation,inthemeantimebecauseofadoption"fair,fair,public"oftheelectronicsrecruittobid,makemoresupplierparticipatecompetitionandconsumedlyloweredpurchasingcost.Atfuture,governmentprocurementmanagementtheinformationsystemwillgetoverallsystemofapplication,realizationincludepublicinvitebids,invitationinvitebids,thecompetitionnegotiation,inquiryandfixed-pointpurchaseetc.wayatinsideofvariouspurchasewayprocessofprocessing,overallsatisfygovernmentbusinessdemand.Inthemeantime,systemtothenetreleasepublicinvitebidstoannounce,thesupplierbeon-lineregisterandon-lineJingpriceetc.functionofsupportalsorightnesscurrentnewlyarisengovernmentnetworkpurchaseprovidedoneperfectbutdrawlessonsfromofsystem.Keyword:Dreamweaver;ACCESS;ASP政府采购管理信息系统全文共政府采购管理信息系统全文共51页，当前为第2页。目录摘要 .3第1章ASP简介 ..31.1ActiveServerPages简介 .31.2ASP的新功能 41.3ASP页面的结构 51.4ASP的运行环境 51.5ASP内建对象 51.6ASP的主要内置组件 61.7DatabaseAccess组件ADO 61.8ASP的脚本语言 61.9ASP能干什么？ 71.10HTML和ASP的区别 7第二章运行环境及系统性能需求分析52.1、硬件需求52.2、软件需求62.3、开发环境6第三章政府采购管理信息系统的设计93.1、系统详细功能分析83.2、数据库设计与实现19第四章政府采购管理信息系统的实现254.1、数据库的连接254.2、登录界面设计284.3、系统用户注册模块334.4、采购模块374.5、发布招标信息模块394.6生成中标信息模块包括414.7、招标信息管理模块包括444.8用户信息管理模块47总结50致谢51参考文献52政府采购管理信息系统全文共51页，当前为第3页。政府采购管理信息系统全文共51页，当前为第3页。第1章ASP简介1.1ActiveServerPages简介MicrosoftActiveServerPages(ASP)是服务器端的脚本编写环境，通过这种环境用户可用它来创建动态Web页或生成功能强大的Web应用程序。ASP页是包括HTML标记、文本和脚本命令的文件。ASP页可调用ActiveX组件来执行任务，例如连接到数据库或进行商务计算。通过ASP，可为用户的Web页添加交互内容或用HTML页构成整个Web应用程序，这些应用程序使用HTML页作为用户的客户的界面。对于HTML编写人员：如果用户是位HTML编写人员，用户将发现ASP脚本提供了创建交互页的简便方法。如果用户曾想从HTML表格中收集数据，或用顾客的姓名个人化HTML文件，或根据浏览器的不同使用不同的特性，用户会发现ASP提供了一个出色的解决方案。以前，要想从HTML表格中收集数据，就不得不学习一门编程语言来创建一个CGI应用程序。现在，用户只要将一些简单的指令嵌入到用户的HTML文件中，就可以从表格中收集数据并进行分析。用户再不必学习完整的编程语言或者单独编译程序来创建交互页。随着不断掌握使用ASP和脚本语言的技巧，用户可以创建更复杂的脚本。对于ASP，用户可以便捷地使用ActiveX组件来执行复杂的任务，比如连接数据库以存储和检索信息。对于有经验的脚本编写人员：如果用户已经掌握一门脚本语言，如VBScript、JavaScript或PERL，而且用户已经了解使用ASP的方法。只要安装了符合ActiveX脚本标准的相应脚本引擎，就可以在ASP页中使用任何一种脚本语言。ASP带有MicrosoftVisualBasicScriptingEdition（VBScript）和MicrosoftJScript的脚本引擎，这样用户可以立即开始编辑脚本。PERL、REXX和Python的ActiveX脚本引擎可以从第三方开发人员处获得。政府采购管理信息系统全文共51页，当前为第4页。对于Web开发人员：如果用户已经掌握了一门编程语言，如VisualBasic，用户将发现ASP是快速创建Web应用程序的一个非常灵活的方法。通过向HTML中添加脚本命令，用户能够创建应用程序的HTML接口。通过创建自己的ActiveX组件，可以将应用程序中的商业逻辑封装到能够从脚本、其他组件或从其他程序中调用的模块。使用ASP进行计算的Web可转化为有形的利益，它使Web供应商能够提供交互的商业应用而不仅仅是发布内容。例如，旅行社能够比公布航空时刻表做得更多；用ASP脚本可以让客户察看现有的航班、比较费用并预定座位。包含在WindowsNTOptionpack中的MicrosoftTransactionServer（MTS）可以降低在服务器上构造程序的复杂性和费用。MT政府采购管理信息系统全文共51页，当前为第4页。ActiveServerPages模型：浏览器从Web服务器上请求.asp文件时，ASP脚本开始运行。然后Web服务器调用ASP，ASP全面读取请求的文件，执行所有脚本命令，并将Web页传送给浏览器。由于脚本在服务器上而不是在客户端运行，传送到浏览器上的Web页是在Web服务器上生成的。所以不必担心浏览器能否处理脚本：Web服务器已经完成了所有脚本的处理，并将标准的HTML传输到浏览器。由于只有脚本的结果返回到浏览器，所以服务器端脚本不易复制。用户看不到创建他们正在浏览的页的脚本命令。1.2ASP的新功能ActiveServerPages在功能方面有所增强，更易于开发应用程序。Microsoft脚本调试程序。用户可以使用脚本调试程序调试.asp文件。事务性脚本。ASP页和页中使用的对象可以运行于事务环境之下。在页上的全部工作只有两种结果：提交或终止。事务可以保护应用程序免于因失败而导致数据丢失。管理工具。许多应用程序设置可在Internet服务管理器上进行，这是InternetInformationServer和PersonalWebServer（在WindowsNTWorkstation上）的管理工具。文件上载。浏览器可以通过PostingAcceptor应用程序将文件上载到Web服务器。可以编写ASP脚本来发送带有从PostingAcceptor传来的信息的email，如每一个上载文件的位置和名称。新的ASP组件。ASP提供了新的基础组件。政府采购管理信息系统全文共51页，当前为第5页。应用程序根目录的改变。ASP应用程序的根政府采购管理信息系统全文共51页，当前为第5页。支持HTTP1.1协议。InternetInformationServer和PersonalWebServer支持HTTP1.1协议。在响应支持HTTP1.1的浏览器（例如InternetExplorer4.0）时，这一支持可使ASP利用新协议的高效率。例如，当向浏览器返回页的时候，ASP使用大块转换编码以提高网络效率。1.3ASP页面的结构ASP的程序代码简单、通用，文件名由.asp结尾，ASP文件通常由四部分构成：标准的HTML标记：所有的HTML标记均可使用。ASP语法命令：位于＜％％＞标签内的ASP代码。服务器端的include语句：可用#include语句调入其他ASP代码，增强了编成的灵活性。脚本语言：ASP自带JaverScript和VBScript两种脚本语言，增加了ASP的编程功能，用户也可安装其他脚本语言，如Perl、Rexx等。1.4ASP的运行环境目前ASP可运行在四种环境下：WINDOWSNTserver，运行IIS(InternetInformationService)4.0以上。WINDOWSNTworkstation运行PWS（PersonalWebServer）4.0以上。WINDOWS95/98/Me运行PWS4.0以上。WINDOWS2000/XP运行IIS5.0/5.1（支持最新的ASP3.0）1.5ASP内建对象ActiveServerPages提供内建对象，这些对象使用户更容易收集通过浏览器请求发送的信息、响应浏览器以及存储用户信息（如用户首选项）。Application对象：可以使用Application对象使给定应用程序的所有用户共享信息。Request对象：可以使用Request对象访问任何用HTTP请求传递的信息，包括从HTML表格用POST方法或GET方法传递的参数、cookie和用户认证。Request对象使您能够访问发送给服务器的二进制数据，如上载的文件。Response对象：可以使用Response对象控制发送给用户的信息。包括直接发送信息给浏览器、重定向浏览器到另一个URL或设置cookie的值。政府采购管理信息系统全文共51页，当前为第6页。Server对象：政府采购管理信息系统全文共51页，当前为第6页。Session对象：可以使用Session对象存储特定的用户会话所需的信息。当用户在应用程序的页之间跳转时，存储在Session对象中的变量不会清除；而用户在应用程序中访问页时，这些变量始终存在。也可以使用Session方法显式地结束一个会话和设置空闲会话的超时期限。ObjectConection对象：可以使用ObjectConection对象提交或撤消由ASP脚本初始化的事务。1.6ASP的主要内置组件AdRotator组件：可用来安指定计划在同一页上自动轮换显示广告，用于WWW上日益重要的广告服务。BrowserCapabilities组件：确定访问WEB站点的用户浏览器的功能数据，包括类型、性能、版本等。DatabaseAccess组件：提供ADO（ActiveXDataObjects）来访问支持ODBC的数据库。FileAccess组件：提供对服务器端文件的读写功能。ContentLinking组件：生成WEB页内容列表，并将各页顺序连接，用于制作导航条。此外，还可安装Myinfo、Counters、ContentRotator、PageCount等组件，用户也可自行编制Active组件，以提高系统的实用性。1.7DatabaseAccess组件ADOWWW上很重要的应用是访问WEB数据库，用ASP访问WEB数据库时，必须使用ADO组件，ADO是ASP内置的ActiveX服务器组件（ActiveXServerComponent）,通过在WEB服务器上设置ODBC和OLEDB可连接多种数据库：如SYBASE、ORACLE、INFORMIX、SQLSERVER、ACCESS、VFP等，是对目前微软所支持的数据库进行操作的最有效和最简单直接的方法。ADO组件主要提供了以下七个对象和四个集合来访问数据库。Connection对象：建立与后台数据库的连接。Command对象：执行SQL指令，访问数据库。Parameters对象和Parameters集合：为Command对象提供数据和参数。RecordSet对象：存放访问数据库后的数据信息，是最经常使用的对象。Field对象和Field集合：提供对RecordSet中当前纪录的各个字段进行访问的功能。Property对象和Properties集合：提供有关信息，供Connection、Command、RecordSet、Field对象使用。Error对象和Errors集合：提供访问数据库时的错误信息。1.8ASP的脚本语言政府采购管理信息系统全文共51页，当前为第7页。脚本语言是一种介于HTML和VB、JAVA等高级语言之间的一种语言，它可以和HTML语言混在一起使用，可以用来在浏览器客户端进行程序编制，从而控制浏览器等对象操作。ASP本身不是一种脚本语言，但他却为嵌入HTML的脚本语言提供了运行环境。ASP中常用的脚本语言有VBScript和JavaScript，系统默认语言是VBS政府采购管理信息系统全文共51页，当前为第7页。1．9ASP能干什么？用HTML,CSS已经能够编写非常漂亮的静态网页，但是这些网页缺乏和用户的互动性。比如，你需要为你的网站增加用户注册和登录的功能；你可能还需要做一些网上调查，了解用户对于某个事件或者产品的反馈；你还可能需要一个电子商务网站，及时发布产品信息和满足用户在线订购的需要编写ASP动态网页能够帮助你实现这些和用户互动的功能。1.10HTML和ASP的区别HTML是编写网页的最简单的语言。HTML只能用于编写静态的网页。当一个用户浏览器(下图所示：WebClient)

从Web服务器(下图所示：WebServer)要求一个HTML网页时，Web服务器就将这个网页直接发送给用户浏览器，不经过计算处理。然后用户浏览器会处理该网页的HTML代码，然后将结果显示出来。见下图所示：（2.1）而ASP的处理过程则更复杂些。当一个用户浏览器(下图所示：WebClient)从Web服务器(下图所示：WebServer)要求一个

ASP网页时，Web服务器会将这个ASP文件发送给Web服务器的ASP引擎(下图所示：ASPEngine)，ASP引擎则将该ASP网页中所有的服务器端脚本(下图所示：<%和%>之间的代码)

转换成HTML代码，然后将所有HTML代码发送给用户浏览器。见下图所示：(2.2)政府采购管理信息系统全文共51页，当前为第8页。政府采购管理信息系统全文共51页，当前为第8页。图2.1

图2.2政府采购管理信息系统全文共51页，当前为第9页。政府采购管理信息系统全文共51页，当前为第9页。第二章运行环境及系统性能需求分析2.1、硬件需求：cpu:interpentuimII或等效处理器、300MHZ或更高内存：96MB可用内存硬盘：275MB以上可用磁盘空间显示器：可达800×600像素的256色显示器或更高2.2、软件需求：操作系统windows98/2000/NT(或更高版本)浏览器：netscapenavigator4.0或microsoftinternetexplover4.0或更高本。2.3、开发环境：dreamweaver主要利用ASP+ACCESS及IIS环境进行开发开发工具，主要利用Dreamweaver8.0及ACCESS进行开发政府采购管理信息系统全文共51页，当前为第10页。政府采购管理信息系统全文共51页，当前为第10页。第三章政府采购管理信息系统的设计3.1、系统详细功能分析一、模块划分系统登陆界面设计该系统基于互联网b/s模式设计。总体结构图如下图:各模块结构设计图如下：个人申报模块：推荐单位模块：政府采购管理信息系统全文共51页，当前为第11页。各模块对应的功能不同：个人申报模块提供的是面向个人的项目申报与管理功能；推荐单位模块提供的是管理个人申报项目与向卫生厅推荐合适项目的功能；管理中心模块提供的是对各推荐单位推荐上来的项目进行管理并分配专家进行评审，最后根据评审专家对该项目的意见与打分，决定是否对该项目进行立项的功能；评审专家模块提供专家对分配到的项目进行打分与提供专家意见的功能。政府采购管理信息系统全文共51页，当前为第11页。由于各模块功能设置不一样，为了避免系统权限分配混乱，我们采取的方法是：个人通过网页注册获得进入个人申报模块的用户名与密码（系统通过个人注册时填写的个人身份证号码进行辨别，保证用户的唯一性），进入个人申报模块后的个人将获得申报项目等权限。而管理中心的管理员用户名与密码将由我们直接在系统中进行设置，并提供给卫生厅科教处。确定该管理员人员名单后，将由该管理员在管理中心设置推荐单位与评审专家的用户帐号与密码并提供给相应的负责人。系统流程图如下：3.2、数据库设计与实现数据库名:数据库k.mdb数据库k.mdb表useridusernamepasswordtypemingchengdizidianhua表zbidtimuneirongtoubiaorentbshuomingzhuangtai采购商供应商发布招标信息生成中标信息政府采购管理信息系统全文共51页，当前为第12页。政府采购管理信息系统全文共51页，当前为第12页。政府采购管理信息系统全文共51页，当前为第13页。政府采购管理信息系统全文共51页，当前为第14页。政府采购管理信息系统全文共51页，当前为第13页。政府采购管理信息系统全文共51页，当前为第14页。第四章政府采购管理信息系统的实现4.1、数据库的连接<%dimdbsetdb=server.createobject("ADODB.connection")db.open"dbq="&server.mappath("data/k.mdb")&";driver={microsoftaccessdriver(*.mdb)};"4.2、登录界面设计<%Response.Buffer=True%><styletype="text/css"><!--.z{font-size:12px;color:#000000;}-->政府采购管理信息系统全文共51页，当前为第15页。</style>政府采购管理信息系统全文共51页，当前为第15页。</head><bodymarginheight="0"marginwidth="0"topmargin="0"bottommargin="0"><tablewidth="700"height="500"border="0"align="center"cellpadding="0"cellspacing="0"class="z"><tr><tdwidth="700"align="center"valign="middle"><%dimdb,strsql,rssetdb=server.createobject("ADODB.connection")db.open"dbq="&server.mappath("data/k.mdb")&";driver={microsoftaccessdriver(*.mdb)};"strSql="Selectusername,password,typeFromuser"strSql=strSql&"Whereusername='"&Request.Form("username")&"'Andpassword='"&Request.Form("password")&"'"Setrs=db.Execute(strSql)Ifnotrs.eofandnotrs.bofThenSession("username")=rs("username")session("type")=rs("type")Session("password")=rs("password")selectcaseSession("type")case"管理员"Response.Redirect"admin.asp"case"个人"Response.Redirect"user.asp"case"所属单位"Response.Redirect"user.asp"caseelse政府采购管理信息系统全文共51页，当前为第16页。Response.Redirect"index.asp"政府采购管理信息系统全文共51页，当前为第16页。endselectElseResponse.Write"对不起，用户名或密码有误,且不能为空，请<ahref='index.asp'>返回</a>重新登录"EndIf%></td></tr></table><%@LANGUAGE="VBSCRIPT"CODEPAGE="936"%><html><head><metahttp-equiv="Content-Type"content="text/html;charset=gb2312"/><title>政府采购管理信息系统</title><styletype="text/css"><!--.x{font-size:12px;color:#000000;text-decoration:none;}body{background-image:url(img/bg1.gif);}--></style></head>政府采购管理信息系统全文共51页，当前为第17页。<bodymarginheight="0"marginwidth="0"topmargin="0"bottommargin="0">政府采购管理信息系统全文共51页，当前为第17页。<tablewidth="760"border="0"align="center"cellpadding="0"cellspacing="0"><tr><td><imgsrc="img/1.jpg"width="760"height="160"></td></tr></table><tablewidth="760"border="0"align="center"cellpadding="0"cellspacing="0"bgcolor="#FFFFFF"><tr><tdalign="center"valign="top"><formname="form1"method="post"action="login.asp"><tablewidth="400"border="0"align="center"cellpadding="0"cellspacing="0"class="x"><tr><tdheight="30"colspan="2"align="center"valign="middle">用户登陆</td></tr><tr><tdwidth="40%"align="center"valign="bottom">类型:</td><tdalign="left"valign="middle"><label><selectname="select"><optionvalue="管理员">管理员</option><optionvalue="个人"selected>个人</option><optionvalue="所属单位">所属单位</option></select></label></td></tr>政府采购管理信息系统全文共51页，当前为第18页。<tr>政府采购管理信息系统全文共51页，当前为第18页。<tdalign="center"valign="bottom">账户:</td><tdalign="left"valign="bottom"><inputname="username"type="text"id="username"></td></tr><tr><tdalign="center"valign="bottom">密码:</td><tdalign="left"valign="bottom"><inputname="password"type="text"id="password"></td></tr><tr><tdalign="center"valign="bottom"><label></label></td><tdheight="20"align="left"valign="bottom"><inputtype="submit"name="Submit"value="用户登陆"><ahref="reg.asp"target="_blank">用户注册</a></td></tr></table></form></td></tr></table><!--#includefile="foot.htm"--></body></html>政府采购管理信息系统全文共51页，当前为第19页。4.3、系统用户注册管理模块政府采购管理信息系统全文共51页，当前为第19页。<%@LANGUAGE="VBSCRIPT"CODEPAGE="936"%><!--#includefile="Connections/conn.asp"--><%DimMM_editActionMM_editAction=CStr(Request.ServerVariables("SCRIPT_NAME"))If(Request.QueryString<>"")ThenMM_editAction=MM_editAction&"?"&Server.HTMLEncode(Request.QueryString)EndIf'booleantoabortrecordeditDimMM_abortEditMM_abortEdit=false%>政府采购管理信息系统全文共51页，当前为第20页。<%政府采购管理信息系统全文共51页，当前为第20页。If(CStr(Request("MM_insert"))="form1")ThenIf(NotMM_abortEdit)Then'executetheinsertDimMM_editCmdSetMM_editCmd=Server.CreateObject("ADODB.Command")MM_editCmd.ActiveConnection=MM_conn_STRINGMM_editCmd.CommandText="INSERTINTO[user](username,password,type,mingcheng,sfz,dizi,youbian,dianhua)VALUES(?,?,?,?,?,?,?,?)"MM_editCmd.Prepared=trueMM_editCmd.Parameters.AppendMM_editCmd.CreateParameter("param1",201,1,50,Request.Form("username"))'adLongVarCharMM_editCmd.Parameters.AppendMM_editCmd.CreateParameter("param2",201,1,50,Request.Form("password"))'adLongVarCharMM_editCmd.Parameters.AppendMM_editCmd.CreateParameter("param3",201,1,50,Request.Form("type"))'adLongVarCharMM_editCmd.Parameters.AppendMM_editCmd.CreateParameter("param4",201,1,50,Request.Form("mingcheng"))'adLongVarCharMM_editCmd.Parameters.AppendMM_editCmd.CreateParameter("param5",201,1,50,Request.Form("sfz"))'adLongVarCharMM_editCmd.Parameters.AppendMM_editCmd.CreateParameter("param6",201,1,50,Request.Form("dizi"))'adLongVarChar政府采购管理信息系统全文共51页，当前为第21页。MM_editCmd.Parameters.AppendMM_editCmd.CreateParameter("param7",201,1,50,Request.Form("youbian"))'adLongVarChar政府采购管理信息系统全文共51页，当前为第21页。MM_editCmd.Parameters.AppendMM_editCmd.CreateParameter("param8",201,1,50,Request.Form("dianhua"))'adLongVarCharMM_editCmd.ExecuteMM_editCmd.ActiveConnection.Close'appendthequerystringtotheredirectURLDimMM_editRedirectUrlMM_editRedirectUrl="cg.htm"If(Request.QueryString<>"")ThenIf(InStr(1,MM_editRedirectUrl,"?",vbTextCompare)=0)ThenMM_editRedirectUrl=MM_editRedirectUrl&"?"&Request.QueryStringElseMM_editRedirectUrl=MM_editRedirectUrl&"&"&Request.QueryStringEndIfEndIfResponse.Redirect(MM_editRedirectUrl)EndIfEndIf%><html><head><metahttp-equiv="Content-Type"content="text/html;charset=gb2312"/>政府采购管理信息系统全文共51页，当前为第22页。<title>用户注册-政府采购管理信息系统</title>政府采购管理信息系统全文共51页，当前为第22页。<styletype="text/css"><!--.x{ font-size:12px; color:#000000; text-decoration:none;}body{ background-image:url(img/bg1.gif);}--></style></head><bodymarginheight="0"marginwidth="0"topmargin="0"bottommargin="0"><tablewidth="760"border="0"align="center"cellpadding="0"cellspacing="0"><tr><td><imgsrc="img/1.jpg"width="760"height="160"></td></tr></table><tablewidth="760"border="0"align="center"cellpadding="0"cellspacing="0"bgcolor="#FFFFFF"><tr><tdalign="center"valign="top"><formname="form1"method="POST"action="<%=MM_editAction%>"><tablewidth="400"border="0"cellpadding="0"cellspacing="0"class="x">政府采购管理信息系统全文共51页，当前为第23页。<tr>政府采购管理信息系统全文共51页，当前为第23页。<tdheight="25"colspan="2"align="center"valign="middle">用户注册</td></tr><tr><tdwidth="40%"valign="bottom">用户名:</td><tdvalign="bottom"><label><inputname="username"type="text"id="username"></label></td></tr><tr><tdvalign="bottom">密码:</td><tdvalign="bottom"><inputname="password"type="text"id="password"></td></tr><tr><tdvalign="bottom">类型:</td><tdvalign="bottom"><label><selectname="type"id="type"><optionvalue="个人"selected>个人</option><optionvalue="所属单位">所属单位</option></select></label></td></tr><tr><tdvalign="bottom">个人/单位名称:</td><tdvalign="bottom"><inputname="mingcheng"type="text"id="mingcheng"></td></tr><tr>政府采购管理信息系统全文共51页，当前为第24页。<tdvalign="bottom">身份证:</td>政府采购管理信息系统全文共51页，当前为第24页。<tdvalign="bottom"><inputname="sfz"type="text"id="sfz"></td></tr><tr><tdvalign="bottom">地址:</td><tdvalign="bottom"><inputname="dizi"type="text"id="dizi"></td></tr><tr><tdvalign="bottom">邮编:</td><tdvalign="bottom"><inputname="youbian"type="text"id="youbian"></td></tr><tr><tdvalign="bottom">电话:</td><tdvalign="bottom"><inputname="dianhua"type="text"id="dianhua"></td></tr><tr><td> </td><tdvalign="bottom"><label><inputtype="submit"name="Submit"value="注册"></label></td></tr></table><inputtype="hidden"name="MM_insert"value="form1"></form></td>政府采购管理信息系统全文共51页，当前为第25页。</tr>政府采购管理信息系统全文共51页，当前为第25页。</table><!--#includefile="foot.htm"--></body></html>4.4、采购模块<%@LANGUAGE="VBSCRIPT"CODEPAGE="936"%><!--#includefile="Connections/conn.asp"--><%DimMM_editActionMM_editAction=CStr(Request.ServerVariables("SCRIPT_NAME"))If(Request.QueryString<>"")ThenMM_editAction=MM_editAction&"?"&Server.HTMLEncode(Request.QueryString)EndIf'booleantoabortrecordeditDimMM_abortEditMM_abortEdit=false%><%If(CStr(Request("MM_insert"))="form1")ThenIf(NotMM_abortEdit)Then'executetheinsertDimMM_editCmdSetMM_editCmd=Server.CreateObject("ADODB.Command")MM_editCmd.ActiveConnection=MM_conn_STRINGMM_editCmd.CommandText="INSERTINTOxiangmu(mingcheng,xueke,shengbaoren,jinfei,zhuangtai)VALUES(?,?,?,?,?)"政府采购管理信息系统全文共51页，当前为第26页。政府采购管理信息系统全文共51页，当前为第26页。MM_editCmd.Parameters.AppendMM_editCmd.CreateParameter("param1",202,1,50,Request.Form("mingcheng"))'adVarWCharMM_editCmd.Parameters.AppendMM_editCmd.CreateParameter("param2",202,1,50,Request.Form("xueke"))'adVarWCharMM_editCmd.Parameters.AppendMM_editCmd.CreateParameter("param3",202,1,50,Request.Form("shengbaoren"))'adVarWCharMM_editCmd.Parameters.AppendMM_editCmd.CreateParameter("param4",202,1,50,Request.Form("jinfei"))'adVarWCharMM_editCmd.Parameters.AppendMM_editCmd.CreateParameter("param5",202,1,50,Request.Form("zhuangtai"))'adVarWCharMM_editCmd.ExecuteMM_editCmd.ActiveConnection.Close'appendthequerystringtotheredirectURLDimMM_editRedirectUrlMM_editRedirectUrl="cg1.htm"If(Request.QueryString<>"")ThenIf(InStr(1,MM_editRedirectUrl,"?",vbTextCompare)=0)ThenMM_editRedirectUrl=MM_editRedirectUrl&"?"&Request.QueryStringElseMM_editRedirectUrl=MM_editRedirectUrl&"&"&Request.QueryString政府采购管理信息系统全文共51页，当前为第27页。EndIf政府采购管理信息系统全文共51页，当前为第27页。EndIfResponse.Redirect(MM_editRedirectUrl)EndIfEndIf%><!DOCTYPEHTMLPUBLIC"-//W3C//DTDHTML4.01Transitional//EN""/TR/html4/loose.dtd"><html><head><metahttp-equiv="Content-Type"content="text/html;charset=gb2312"><title>政府采购管理信息系统</title><styletype="text/css"><!--@importurl("img/x.css");--></style></head><bodymarginheight="0"marginwidth="0"topmargin="0"bottommargin="0"><tablewidth="760"border="0"align="center"cellpadding="0"cellspacing="0"><tr><td><imgsrc="img/1.jpg"alt="1"width="760"height="160"></td></tr></table>政府采购管理信息系统全文共51页，当前为第28页。<tablewidth="760"border="0"align="center"cellpadding="0"cellspacing="0"bgcolor="#FFFFFF"class="x">政府采购管理信息系统全文共51页，当前为第28页。<tr><tdwidth="20%"align="center"valign="bottom"><ahref="user.asp">首页</a></td><tdwidth="20%"align="center"valign="bottom"><ahref="user.asp">项目申报</a></td><tdwidth="20%"align="center"valign="bottom"><ahref="user1.asp">用户信息管理</a></td><tdwidth="20%"align="center"valign="bottom"><ahref="index.asp">退出登陆</a></td></tr></table><tablewidth="760"border="0"align="center"cellpadding="0"cellspacing="0"bgcolor="#FFFFFF"><tr><td><formname="form1"method="POST"action="<%=MM_editAction%>"><tablewidth="350"border="0"align="center"cellpadding="0"cellspacing="0"class="x"><trvalign="bottom"><tdheight="25"colspan="2"align="center"valign="middle">项目申报</td></tr><tr><tdwidth="40%"valign="bottom">项目名称:</td><td><inputname="mingcheng"type="text"id="mingcheng"></td></tr><tr><tdvalign="bottom">所属学科:</td>政府采购管理信息系统全文共51页，当前为第29页。<td><inputname="xueke"type="text"id="xueke"></td>政府采购管理信息系统全文共51页，当前为第29页。</tr><tr><tdvalign="bottom">申报单位/个人名称:</td><td><inputname="shengbaoren"type="text"id="shengbaoren"></td></tr><tr><tdvalign="bottom">申请金费:</td><td><inputname="jinfei"type="text"id="jinfei"></td></tr><tr><tdvalign="bottom">申报状态:</td><td><label><inputname="zhuangtai"type="text"id="zhuangtai"value="申报中"></label></td></tr><tr><tdvalign="bottom"> </td><tdheight="25"valign="bottom"><label><inputtype="submit"name="Submit"value="提交"></label></td></tr></table><inputtype="hidden"name="MM_insert"value="form1"></form></td></tr>政府采购管理信息系统全文共51页，当前为第30页。</table>政府采购管理信息系统全文共51页，当前为第30页。<!--#includefile="foot.htm"--></body></html>4.5、发布招标信息模块<%@LANGUAGE="VBSCRIPT"CODEPAGE="936"%><!--#includefile="Connections/conn.asp"--><%DimMM_editActionMM_editAction=CStr(Request.ServerVariables("SCRIPT_NAME"))If(Request.QueryString<>"")ThenMM_editAction=MM_editAction&"?"&Server.HTMLEncode(Request.QueryString)EndIf'booleantoabortrecordeditDimMM_abortEditMM_abortEdit=false%><%'IIfimplementationFunctionMM_IIf(condition,ifTrue,ifFalse)Ifcondition=""ThenMM_IIf=ifFalseElseMM_IIf=ifTrueEndIfEndFunction%><%政府采购管理信息系统全文共51页，当前为第31页。If(CStr(Request("MM_update"))="form1")Then政府采购管理信息系统全文共51页，当前为第31页。If(NotMM_abortEdit)Then'executetheupdateDimMM_editCmdSetMM_editCmd=Server.CreateObject("ADODB.Command")MM_editCmd.ActiveConnection=MM_conn_STRINGMM_editCmd.CommandText="UPDATE[user]SETusername=?,password=?,type=?,mingcheng=?,sfz=?,dizi=?,youbian=?,dianhua=?WHEREid=?"MM_editCmd.Prepared=trueMM_editCmd.Parameters.AppendMM_editCmd.CreateParameter("param1",201,1,50,Request.Form("username"))'adLongVarCharMM_editCmd.Parameters.AppendMM_editCmd.CreateParameter("param2",201,1,50,Request.Form("password"))'adLongVarCharMM_editCmd.Parameters.AppendMM_editCmd.CreateParameter("param3",201,1,50,Request.Form("type"))'adLongVarCharMM_editCmd.Parameters.AppendMM_editCmd.CreateParameter("param4",201,1,50,Request.Form("mingcheng"))'adLongVarCharMM_editCmd.Parameters.AppendMM_editCmd.CreateParameter("param5",201,1,50,Request.Form("sfz"))'adLongVarCharMM_editCmd.Parameters.AppendMM_editCmd.CreateParameter("param6",201,1,50,Request.Form("dizi"))'adLongVarChar政府采购管理信息系统全文共51页，当前为第32页。MM_editCmd.Parameters.AppendMM_editCmd.CreateParameter("param7",201,1,50,Request.Form("youbian"))'adLongVarChar政府采购管理信息系统全文共51页，当前为第32页。MM_editCmd.Parameters.AppendMM_editCmd.CreateParameter("param8",201,1,50,Request.Form("dianhua"))'adLongVarCharMM_editCmd.Parameters.AppendMM_editCmd.CreateParameter("param9",5,1,-1,MM_IIF(Request.Form("MM_recordId"),Request.Form("MM_recordId"),null))'adDoubleMM_editCmd.ExecuteMM_editCmd.ActiveConnection.Close'appendthequerystringtotheredirectURLDimMM_editRedirectUrlMM_editRedirectUrl="cg1.htm"If(Request.QueryString<>"")ThenIf(InStr(1,MM_editRedirectUrl,"?",vbTextCompare)=0)ThenMM_editRedirectUrl=MM_editRedirectUrl&"?"&Request.QueryStringElseMM_editRedirectUrl=MM_editRedirectUrl&"&"&Request.QueryStringEndIfEndIfResponse.Redirect(MM_editRedirectUrl)EndIfEndIf%><%政府采购管理信息系统全文共51页，当前为第33页。DimRecordset1__MMColParam政府采购管理信息系统全文共51页，当前为第33页。Recordset1__MMColParam="1"If(Session("username")<>"")ThenRecordset1__MMColParam=Session("username")EndIf%><%DimRecordset1DimRecordset1_cmdDimRecordset1_numRowsSetRecordset1_cmd=Server.CreateObject("ADODB.Command")Recordset1_cmd.ActiveConnection=MM_conn_STRINGRecordset1_cmd.CommandText="SELECT*FROM[user]WHEREusername=?"Recordset1_cmd.Prepared=trueRecordset1_cmd.Parameters.AppendRecordset1_cmd.CreateParameter("param1",200,1,50,Recordset1__MMColParam)'adVarCharSetRecordset1=Recordset1_cmd.ExecuteRecordset1_numRows=0%><html><head><metahttp-equiv="Content-Type"content="text/html;charset=gb2312"/><title>用户注册-政府采购管理信息系统</title><styletype="text/css"><!--政府采购管理信息系统全文共51页，当前为第34页。.x{政府采购管理信息系统全文共51页，当前为第34页。 font-size:12px; color:#000000; text-decoration:none;}body{ background-image:url(img/bg1.gif);}--></style></head><bodymarginheight="0"marginwidth="0"topmargin="0"bottommargin="0"><tablewidth="760"border="0"align="center"cellpadding="0"cellspacing="0"><tr><td><tablewidth="760"border="0"align="center"cellpadding="0"cellspacing="0"><tr><td><imgsrc="img/1.jpg"alt="1"width="760"height="160"></td></tr></table><tablewidth="760"border="0"align="center"ce