醫(yī)院住院管理系統(tǒng)結(jié)構(gòu)設計與實現(xiàn)畢業(yè)設計論文doc(編輯修改稿)
2025-08-13 21:09 本頁面
【文章內(nèi)容簡介】 font color=CFD1E8驗證碼/font/td td input type=text name=yzm value= size=9 maxlength=4 class=input onbeforepaste=(39。text39。,(39。text39。).replace(/[^\d]/g,39。39。)) 16 onkeyup=value=(/[\W]/g,39。39。)%=code % /td /tr tr td height=5 colspan=3/td /tr tr td /td td align=center /td td input type=image border=0 name=imageField src=%=basePath %%=dir %/images/ width=70 height=16 /td /tr /form /table并且具有改變“登錄”菜單為“注銷”菜單的功能。Private Sub Command2_Click()Unload MeEnd Sub不同的用戶權(quán)限打開不同的菜單改變登錄菜單為注銷菜單17此程序段中，“IF”語句的作用是判斷用戶輸入的用戶名與密碼和數(shù)據(jù)庫的是否相同，如果相同，則打開菜單項并執(zhí)行 unload me，如果用戶名或密碼輸入錯誤，則提示：使用戶重新輸入用戶名或密碼。使 JSP 與 SQLServer2022 數(shù)據(jù)庫相連，然后判斷用戶輸入的用戶名與密碼是否與數(shù)據(jù)庫中的一致，如果一致，則允許用戶進入系統(tǒng)。此三個控件的創(chuàng)建方法如下：首先，將 JDBC、Text 控件拖放到窗體上，其次，設置它們的屬性：（1）JDBC 設置如下： try {()。 conn = (jdbc:microsoft://conn = (jdbc:microsoft:ql,sy8009sql)。stmt=()。//(打開數(shù)據(jù)庫連接)。} catch (Exception ex) {//(打開數(shù)據(jù)庫時出錯: + ())。}此兩個屬性的作用是保證 JDBC 控件與數(shù)據(jù)庫相連。數(shù)據(jù)庫的名稱數(shù)據(jù)庫中的表名18Visible 屬性是使此控件運行時在窗體上不顯示。（2）Text3 控件的屬性設置如下：Visible 屬性的設置同 JDBC1 控件。5．2 主界面的實現(xiàn)主界面是用菜單形式表現(xiàn)的，如圖：運行時是否隱藏此數(shù)據(jù)控件綁定到何數(shù)據(jù)庫此數(shù)據(jù)控件綁定到何字段19此過程中要注意各菜單的名稱唯一，還要注意菜單的級別，另外此設計過程中我們還可以給菜單加快捷鍵。最后設置如下的代碼（只要單擊菜單即可設置各菜單代碼），代碼如下：public class SmartUpload{ protected byte m_binArray[]。 protected HttpServletRequest m_request。 protected HttpServletResponse m_response。 protected ServletContext m_application。 private int m_totalBytes。 private int m_currentIndex。20 private int m_startData。 private int m_endData。 private String m_boundary。 private long m_totalMaxFileSize。 private long m_maxFileSize。 private Vector m_deniedFilesList。 private Vector m_allowedFilesList。 private boolean m_denyPhysicalPath。 //private boolean m_forcePhysicalPath。 private String m_contentDisposition。 public static final int SAVE_AUTO = 0。 public static final int SAVE_VIRTUAL = 1。 public static final int SAVE_PHYSICAL = 2。 private SmartFiles m_files。 private SmartRequest m_formRequest。 public SmartUpload() {21 m_totalBytes = 0。 m_currentIndex = 0。 m_startData = 0。 m_endData = 0。 m_boundary = 。 //new String()。 m_totalMaxFileSize = 0L。 m_maxFileSize = 0L。 m_deniedFilesList = new Vector()。 m_allowedFilesList = new Vector()。 m_denyPhysicalPath = false。 //m_forcePhysicalPath = false。 m_contentDisposition = 。 //new String()。 m_files = new SmartFiles()。 m_formRequest = new SmartRequest()。 }主要是通過 Show 方法調(diào)用相應的窗體。5． 3 住院管理模塊的實現(xiàn)5．3．1 住院/出院模塊的實現(xiàn)：流程圖：22運行界面：入院的運行界面：出院的運行界面：1．實現(xiàn)過程：（以入院為例）第一步將所需的控件放到窗體的相應位置；方法：首先在“工具箱”中選中所需的控件圖標，然后在表單的恰當位置上單擊鼠標并拖動鼠標，即可把由所選取的控件生成的對象添加到窗體上。第二步，選擇窗體或控件進行屬性設置，同上一小結(jié)。 其它屬性和控件的設置方法類似。第三步雙擊相應的控件，在控件的相應過程中編寫代碼：的代碼為：NY開始增加病人是否繼續(xù)退出23Private Sub Command1_Click()If = 新增 Then n = Trim(Str( + 1)) = 確定 Text1(0).Text = n Text1(3).Text = 30 Text1(11) = Date Text1(1).SetFocus = False = FalseElse MsgBox 入院成功！ = 新增 = True = TrueEnd IfEnd Sub的代碼為：Private Sub Command2_Click() Sub的代碼為：Private Sub Command3_Click() Sub24圖片框的代碼為：Private Sub Picture1_Click() = End Sub此窗體上用了 1 個 Adodc 控件，Adodc1 用來連接醫(yī)師情況表。使用方法是首先通過Adodc 控件與數(shù)據(jù)庫相連，然后將各數(shù)據(jù)項與數(shù)據(jù)字段相連。如科別的控件的主要屬性設置如下：其他控件的設置同。出院管理類型，主要以有無入院/出
醫(yī)療健康相關推薦
鄂ICP備17016276號-1