• <tr id="yyy80"></tr>
  • <sup id="yyy80"></sup>
  • <tfoot id="yyy80"><noscript id="yyy80"></noscript></tfoot>
  • 99热精品在线国产_美女午夜性视频免费_国产精品国产高清国产av_av欧美777_自拍偷自拍亚洲精品老妇_亚洲熟女精品中文字幕_www日本黄色视频网_国产精品野战在线观看 ?

    基于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)濟的發(fā)展,國家對教育事業(yè)的投入也逐漸加強,各高校的專業(yè)建設(shè)發(fā)展迅速,生物、食品、檢驗、化學(xué)、化工等專業(yè)的實驗室建設(shè)也上了新臺階,進而對化學(xué)藥品的需求進一步擴大。但目前多數(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ù)端要求較高,要有較強的安全性,網(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è)計

    高?;瘜W(xué)藥品管理系統(tǒng)的使用者一般有3類,依次為校內(nèi)安保人員、普通實驗教師、藥品管理人員,因此,系統(tǒng)架構(gòu)的設(shè)計主要依據(jù)3類使用者的不同身份進行。不同身份進入系統(tǒng),系統(tǒng)進行相應(yīng)的功能限制,一類使用者只有危險品查詢功能,二類使用者擁有所有查詢功能,三類使用者可使用系統(tǒng)所有功能。為了安全使用,一類、二類使用者只需進行密碼識別即可,而三類使用者則不僅需要身份識別,還應(yīng)進行硬件身份識別(如網(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]。客戶端采用學(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ù)進行程序打包,仿制網(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)需要進行環(huán)境安裝設(shè)置,此時,可以使用Visual Basic 5.0或Visual Basic 6.0將源代碼重新編譯,生成的應(yīng)用程序可分別使用于XP和Windows7操作系統(tǒng),而無須安裝。系統(tǒng)采用集成模式開發(fā),3類用戶使用的是同一個程序,程序根據(jù)使用者的身份自動進行功能模塊調(diào)用,與身份不符的功能自動隱藏,這樣可以降低開發(fā)成本。

    4.1 藥品信息入庫

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

    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é)果進行Excel導(dǎo)出或直接打印出來。

    在系統(tǒng)投入使用后,安保部門的工作人員可以動態(tài)地看到危險品、有毒藥品的流向,有效地掌握校內(nèi)化學(xué)藥品信息,保障藥品的使用安全;實驗教師可以根據(jù)查詢的結(jié)果了解校內(nèi)化學(xué)藥品的庫存量及其流向,及時為實驗教學(xué)、科學(xué)研究制定藥品申購計劃,保障教學(xué)與科學(xué)研究按計劃進行;藥品管理人員可以根據(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)床
    江西省| 芦溪县| 志丹县| 凭祥市| 通河县| 安徽省| 连平县| 密云县| 沂南县| 广宗县| 镇江市| 佳木斯市| 九寨沟县| 通渭县| 霸州市| 涡阳县| 砀山县| 全南县| 丘北县| 遂溪县| 荥阳市| 新密市| 东山县| 九台市| 宜兰县| 蒙城县| 浦东新区| 屯门区| 蒙阴县| 保靖县| 蚌埠市| 济南市| 玉溪市| 普宁市| 苍南县| 寻乌县| 阳朔县| 三穗县| 海城市| 白城市| 鹿邑县|