基于C/S和B/S混合模式的化学药品管理系统开发

陆道明

（镇江高等专科学校 化工系，江苏 镇江 212003）

随着经济的发展，国家对教育事业的投入也逐渐加强，各高校的专业建设发展迅速，生物、食品、检验、化学、化工等专业的实验室建设也上了新台阶，进而对化学药品的需求进一步扩大。但目前多数高校的化学药品管理处于散乱状态，没有一个合理、有效的管理系统，化学药品的安全存放、安全使用、购买申报等工作得不到保障，因此，开发一个方便、有效的化学药品管理系统极为必要。通过化学药品管理系统，可以及时了解药品的出入、使用、库存情况。作为实验教师，可以通过系统查询库存，以便有目的地申购和使用化学药品；作为管理者，可以通过化学药品的使用记录了解药品的使用量，做出相应的规划；作为安保部门，可以及时了解危险品的去向，保障校园安全［1］。

系统的开发不仅要有必备的功能模块，还要考虑安全性、便捷性。C/S模式下，使用的是程序设计的客户端，其功能设计较为方便，也容易实现，安全性容易控制，但使用范围往往只限于局域网；而B/S模式下，使用者无须安装客户端，直接通过IE浏览器访问，方便快捷，但对服务端要求较高，要有较强的安全性，网页设计复杂且有一定的难度［2-4］。采用混合编程模式，利用VB.net的ActiveX控件插入技术，通过嵌入的Microsoft Internet Controls控件便可兼容以上2个模式的优点，且系统可设计成绿色版，无须安装，能上网的地方都可使用，安全而便捷。

1 系统架构设计

高校化学药品管理系统的使用者一般有3类，依次为校内安保人员、普通实验教师、药品管理人员，因此，系统架构的设计主要依据3类使用者的不同身份进行。不同身份进入系统，系统进行相应的功能限制，一类使用者只有危险品查询功能，二类使用者拥有所有查询功能，三类使用者可使用系统所有功能。为了安全使用，一类、二类使用者只需进行密码识别即可，而三类使用者则不仅需要身份识别，还应进行硬件身份识别（如网卡MAC地址识别）。系统设计的主要框架如图1和图2所示。

图1 各类使用者连接示意图

图2 系统主要功能模块框架图

2 服务器及数据库配置

为了能够支持B/S模式，可利用高校内部网络中心的服务器开设一个专门的网络空间，并安装SQL Server数据库和IIS动态网页支持环境［5］。客户端采用学校二级域名方式访问。根据系统使用需要，在数据库配置中，需要创建药品信息、使用信息、用户信息、操作记录等4张表，各表的字段设置如表1所示。

表1 数据库中各表的字段设置

3 通讯核心程序设计

系统采用C/S和B/S混合编程方式，使用VB.net开发客户端或管理端。在开发程序时，嵌入Microsoft Internet Controls控件，将要上传的数据进行程序打包，仿制网页中的表单submit功能，将数据包发送到服务器中对应的 asp.net网页，再由asp.net网页将数据存入服务器的数据库［6］。而下载数据则调用asp.net网页，将数据直接显示在Microsoft Internet Controls控件内，通过对显示的网页数据读取得到相应的查询数据。

3.1 数据发送程序

ReDim a（0）As Byte PackSub a，"department=化工系＆ID="＆ID＆"＆PWD="＆PWD WebBrowser1.Navigate ServerIP ＆ "check.asp"，14，，a，vHeaders

3.2 数据包生成程序

Public Sub PackSub（BArray（）As Byte，Pack-String As String） Dim OutString As String Dim AscValue As Integer Dim i As Integer Fori=1 To Len（PackString） AscValue=Asc（Mid（PackString，i，1）） Select Case AscValue Case 36，38，39，40，41，42，44 To 125 OutString=OutString＆Chr$（AscValue） Case 32 OutString=OutString＆"+" Case Else If Len（Hex$（AscValue））=4 Then OutString=OutString＆ "％"＆ Left $（Hex$（AscValue），2）＆"％"＆Right（Hex $（AscValue），2） Else OutString=OutString＆"％"＆Hex $（AscValue） End If End Select Next L=Len（OutString）-1 If L＜0 Then Exit Sub ReDim BArray（L） Fori=0 To L ch=Mid（OutString，i+1，1） BArray（i）=Asc（ch） Next End Sub

4 系统功能块设计

VB.net设计的系统需要进行环境安装设置，此时，可以使用Visual Basic 5.0或Visual Basic 6.0将源代码重新编译，生成的应用程序可分别使用于XP和Windows7操作系统，而无须安装。系统采用集成模式开发，3类用户使用的是同一个程序，程序根据使用者的身份自动进行功能模块调用，与身份不符的功能自动隐藏，这样可以降低开发成本。

4.1 药品信息入库

在该功能模块设计中，需要将新入库的化学药品逐一进行ID编号（每个药品有唯一ID）及称重，以便日后检索和出入库登记使用。在药品管理人员输入过程中，可以根据系统自动生成的快捷词语进行快速输入，同时还支持批输入方式。

4.2 领用登记

领用登记功能设计较为简单，药品管理人员只需输入领用化学药品的ID号，系统自动调出该药品的相应信息，如果正确，填写领用人和领取用途后点击“保存”便可完成。

4.3 归还登记

归还登记功能与领用功能较为相似。输入ID号后，系统显示该化学药品的领出记录，药品管理人员将归还的药品称重后，点击“归还”即可完成。若化学药品已使用完毕，则在药品质量输入框输入“0”即可。

4.4 查询打印功能

查询功能分为领用查询、归还查询、库存查询及危险品查询，使用同一个界面，只需在查询模式中选择相应的查询便可。系统根据所查询的条件，将条件发送到服务器中，由服务器中相应的asp.net网页生成，生成后显示在Microsoft Internet Controls控件中，用户可将查询的结果进行Excel导出或直接打印出来。

在系统投入使用后，安保部门的工作人员可以动态地看到危险品、有毒药品的流向，有效地掌握校内化学药品信息，保障药品的使用安全；实验教师可以根据查询的结果了解校内化学药品的库存量及其流向，及时为实验教学、科学研究制定药品申购计划，保障教学与科学研究按计划进行；药品管理人员可以根据化学药品的使用情况，及时做好每年或每学期的药品购买计划；领导层可以通过每年化学药品的使用经费及药品的使用量，做出更合理、更科学的决策。通过信息共享，可以科学管理化学药品，更好地为高校建设服务。

［1］滕利荣.高校教学实验室管理［M］.北京：科学出版社，2008：140-159.

［2］李犁，邓敏，刘洋.化学药品管理信息系统设计［J］.锦州师范学院学报，2002，23（4）：21-23.

［3］程健君，蔡念光，刘雪睛，等.实验室药品管理系统的开发与应用［J］.河北北方学院学报，2010，27（6）：60-61.

［4］赵丰，赵端正.基于B/S，C/S模式应用软件的开发研究［J］.中国科技信息，2006（18）：171-173.

［5］曹建.Dreamweaver与Asp实战演练［M］.北京：电子工业出版社，2001：132-477.

［6］蒋铁海.用VB.NET设计ASP.NET程序的典型实例［J］.信息技术，2004：89-91.