国产日韩欧美一区二区三区三州_亚洲少妇熟女av_久久久久亚洲av国产精品_波多野结衣网站一区二区_亚洲欧美色片在线91_国产亚洲精品精品国产优播av_日本一区二区三区波多野结衣 _久久国产av不卡

?

基于C/S和B/S混合模式的化學(xué)藥品管理系統(tǒng)開發(fā)

2012-04-10 14:38:12陸道明
鎮(zhèn)江高專學(xué)報 2012年3期
關(guān)鍵詞:化學(xué)藥品控件使用者

陸道明

(鎮(zhèn)江高等??茖W(xué)校 化工系,江蘇 鎮(zhèn)江 212003)

隨著經(jīng)濟(jì)的發(fā)展,國家對教育事業(yè)的投入也逐漸加強(qiáng),各高校的專業(yè)建設(shè)發(fā)展迅速,生物、食品、檢驗、化學(xué)、化工等專業(yè)的實驗室建設(shè)也上了新臺階,進(jìn)而對化學(xué)藥品的需求進(jìn)一步擴(kuò)大。但目前多數(shù)高校的化學(xué)藥品管理處于散亂狀態(tài),沒有一個合理、有效的管理系統(tǒng),化學(xué)藥品的安全存放、安全使用、購買申報等工作得不到保障,因此,開發(fā)一個方便、有效的化學(xué)藥品管理系統(tǒng)極為必要。通過化學(xué)藥品管理系統(tǒng),可以及時了解藥品的出入、使用、庫存情況。作為實驗教師,可以通過系統(tǒng)查詢庫存,以便有目的地申購和使用化學(xué)藥品;作為管理者,可以通過化學(xué)藥品的使用記錄了解藥品的使用量,做出相應(yīng)的規(guī)劃;作為安保部門,可以及時了解危險品的去向,保障校園安全[1]。

系統(tǒng)的開發(fā)不僅要有必備的功能模塊,還要考慮安全性、便捷性。C/S模式下,使用的是程序設(shè)計的客戶端,其功能設(shè)計較為方便,也容易實現(xiàn),安全性容易控制,但使用范圍往往只限于局域網(wǎng);而B/S模式下,使用者無須安裝客戶端,直接通過IE瀏覽器訪問,方便快捷,但對服務(wù)端要求較高,要有較強(qiáng)的安全性,網(wǎng)頁設(shè)計復(fù)雜且有一定的難度[2-4]。采用混合編程模式,利用VB.net的ActiveX控件插入技術(shù),通過嵌入的Microsoft Internet Controls控件便可兼容以上2個模式的優(yōu)點,且系統(tǒng)可設(shè)計成綠色版,無須安裝,能上網(wǎng)的地方都可使用,安全而便捷。

1 系統(tǒng)架構(gòu)設(shè)計

高校化學(xué)藥品管理系統(tǒng)的使用者一般有3類,依次為校內(nèi)安保人員、普通實驗教師、藥品管理人員,因此,系統(tǒng)架構(gòu)的設(shè)計主要依據(jù)3類使用者的不同身份進(jìn)行。不同身份進(jìn)入系統(tǒng),系統(tǒng)進(jìn)行相應(yīng)的功能限制,一類使用者只有危險品查詢功能,二類使用者擁有所有查詢功能,三類使用者可使用系統(tǒng)所有功能。為了安全使用,一類、二類使用者只需進(jìn)行密碼識別即可,而三類使用者則不僅需要身份識別,還應(yīng)進(jìn)行硬件身份識別(如網(wǎng)卡MAC地址識別)。系統(tǒng)設(shè)計的主要框架如圖1和圖2所示。

圖1 各類使用者連接示意圖

圖2 系統(tǒng)主要功能模塊框架圖

2 服務(wù)器及數(shù)據(jù)庫配置

為了能夠支持B/S模式,可利用高校內(nèi)部網(wǎng)絡(luò)中心的服務(wù)器開設(shè)一個專門的網(wǎng)絡(luò)空間,并安裝SQL Server數(shù)據(jù)庫和IIS動態(tài)網(wǎng)頁支持環(huán)境[5]??蛻舳瞬捎脤W(xué)校二級域名方式訪問。根據(jù)系統(tǒng)使用需要,在數(shù)據(jù)庫配置中,需要創(chuàng)建藥品信息、使用信息、用戶信息、操作記錄等4張表,各表的字段設(shè)置如表1所示。

表1 數(shù)據(jù)庫中各表的字段設(shè)置

3 通訊核心程序設(shè)計

系統(tǒng)采用C/S和B/S混合編程方式,使用VB.net開發(fā)客戶端或管理端。在開發(fā)程序時,嵌入Microsoft Internet Controls控件,將要上傳的數(shù)據(jù)進(jìn)行程序打包,仿制網(wǎng)頁中的表單submit功能,將數(shù)據(jù)包發(fā)送到服務(wù)器中對應(yīng)的 asp.net網(wǎng)頁,再由asp.net網(wǎng)頁將數(shù)據(jù)存入服務(wù)器的數(shù)據(jù)庫[6]。而下載數(shù)據(jù)則調(diào)用asp.net網(wǎng)頁,將數(shù)據(jù)直接顯示在Microsoft Internet Controls控件內(nèi),通過對顯示的網(wǎng)頁數(shù)據(jù)讀取得到相應(yīng)的查詢數(shù)據(jù)。

3.1 數(shù)據(jù)發(fā)送程序

ReDim a(0)As Byte PackSub a,"department=化工系&ID="&ID&"&PWD="&PWD WebBrowser1.Navigate ServerIP & "check.asp",14,,a,vHeaders

3.2 數(shù)據(jù)包生成程序

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 系統(tǒng)功能塊設(shè)計

VB.net設(shè)計的系統(tǒng)需要進(jìn)行環(huán)境安裝設(shè)置,此時,可以使用Visual Basic 5.0或Visual Basic 6.0將源代碼重新編譯,生成的應(yīng)用程序可分別使用于XP和Windows7操作系統(tǒng),而無須安裝。系統(tǒng)采用集成模式開發(fā),3類用戶使用的是同一個程序,程序根據(jù)使用者的身份自動進(jìn)行功能模塊調(diào)用,與身份不符的功能自動隱藏,這樣可以降低開發(fā)成本。

4.1 藥品信息入庫

在該功能模塊設(shè)計中,需要將新入庫的化學(xué)藥品逐一進(jìn)行ID編號(每個藥品有唯一ID)及稱重,以便日后檢索和出入庫登記使用。在藥品管理人員輸入過程中,可以根據(jù)系統(tǒng)自動生成的快捷詞語進(jìn)行快速輸入,同時還支持批輸入方式。

4.2 領(lǐng)用登記

領(lǐng)用登記功能設(shè)計較為簡單,藥品管理人員只需輸入領(lǐng)用化學(xué)藥品的ID號,系統(tǒng)自動調(diào)出該藥品的相應(yīng)信息,如果正確,填寫領(lǐng)用人和領(lǐng)取用途后點擊“保存”便可完成。

4.3 歸還登記

歸還登記功能與領(lǐng)用功能較為相似。輸入ID號后,系統(tǒng)顯示該化學(xué)藥品的領(lǐng)出記錄,藥品管理人員將歸還的藥品稱重后,點擊“歸還”即可完成。若化學(xué)藥品已使用完畢,則在藥品質(zhì)量輸入框輸入“0”即可。

4.4 查詢打印功能

查詢功能分為領(lǐng)用查詢、歸還查詢、庫存查詢及危險品查詢,使用同一個界面,只需在查詢模式中選擇相應(yīng)的查詢便可。系統(tǒng)根據(jù)所查詢的條件,將條件發(fā)送到服務(wù)器中,由服務(wù)器中相應(yīng)的asp.net網(wǎng)頁生成,生成后顯示在Microsoft Internet Controls控件中,用戶可將查詢的結(jié)果進(jìn)行Excel導(dǎo)出或直接打印出來。

在系統(tǒng)投入使用后,安保部門的工作人員可以動態(tài)地看到危險品、有毒藥品的流向,有效地掌握校內(nèi)化學(xué)藥品信息,保障藥品的使用安全;實驗教師可以根據(jù)查詢的結(jié)果了解校內(nèi)化學(xué)藥品的庫存量及其流向,及時為實驗教學(xué)、科學(xué)研究制定藥品申購計劃,保障教學(xué)與科學(xué)研究按計劃進(jìn)行;藥品管理人員可以根據(jù)化學(xué)藥品的使用情況,及時做好每年或每學(xué)期的藥品購買計劃;領(lǐng)導(dǎo)層可以通過每年化學(xué)藥品的使用經(jīng)費及藥品的使用量,做出更合理、更科學(xué)的決策。通過信息共享,可以科學(xué)管理化學(xué)藥品,更好地為高校建設(shè)服務(wù)。

[1]滕利榮.高校教學(xué)實驗室管理[M].北京:科學(xué)出版社,2008:140-159.

[2]李犁,鄧敏,劉洋.化學(xué)藥品管理信息系統(tǒng)設(shè)計[J].錦州師范學(xué)院學(xué)報,2002,23(4):21-23.

[3]程健君,蔡念光,劉雪睛,等.實驗室藥品管理系統(tǒng)的開發(fā)與應(yīng)用[J].河北北方學(xué)院學(xué)報,2010,27(6):60-61.

[4]趙豐,趙端正.基于B/S,C/S模式應(yīng)用軟件的開發(fā)研究[J].中國科技信息,2006(18):171-173.

[5]曹建.Dreamweaver與Asp實戰(zhàn)演練[M].北京:電子工業(yè)出版社,2001:132-477.

[6]蔣鐵海.用VB.NET設(shè)計ASP.NET程序的典型實例[J].信息技術(shù),2004:89-91.

猜你喜歡
化學(xué)藥品控件使用者
“法定許可”情況下使用者是否需要付費
關(guān)于.net控件數(shù)組的探討
軟件(2018年7期)2018-08-13 09:44:42
新型拼插休閑椅,讓人與人的距離更近
好日子(2018年5期)2018-05-30 16:24:04
化學(xué)藥品有妙用
抓拍神器
液-質(zhì)聯(lián)用法測定蒙藥制劑中非法添加降糖類化學(xué)藥品
壯陽類中成藥及保健食品中非法添加11種化學(xué)藥品的定性檢測
為什么化學(xué)藥品要裝在深色瓶里?
就這樣玩會VBA中常見的自定義控件
電腦迷(2012年24期)2012-04-29 00:44:03
夢鄉(xiāng)床
安庆市| 西和县| 炎陵县| 贵定县| 宣恩县| 沅江市| 龙泉市| 海原县| 株洲县| 西安市| 台山市| 曲麻莱县| 扶绥县| 奈曼旗| 偃师市| 台江县| 伊通| 陈巴尔虎旗| 东源县| 秦安县| 辽源市| 乌拉特前旗| 青州市| 阿荣旗| 阜新| 汨罗市| 衢州市| 庆元县| 丰镇市| 晋宁县| 工布江达县| 高唐县| 定远县| 江川县| 武义县| 新邵县| 榆林市| 上犹县| 含山县| 梨树县| 台湾省|