这里我们先容医院治理系统HIS的应用设计,它包括医院门诊时间表线上查询系统、线上医院预约挂号系统等应用的点子、设计实例、以及具体解说,让您快速地设计出各种医院的网站应用。
医院网站资料库应用
医院使用网站资料库,可以透过Internet、或Intranet提供以下的应用∶
* 线上查询医院门诊时间表*
* 线上医院预约挂号*
右上角标示*的应用,本节将提供设计的范例,并详加解说。
执行本章资料库的范例,所用的资料库可为Microsoft Access、Microsoft SQL Server、或Text档案(读者可修改成其他支援ODBC的资料库,详见1-5节),须於NT安装IIS 3.0,并於「控制台」中的「ODBC」,新建一个名称为「BookSamp」的资料来源,驱动程式为「Microsoft Access Driver」、「SQL Server」、或「Microsoft Text 驱动程式」。详见附录 范例磁片。
1
医院门诊时间表线上查询系统
「医院门诊时间表线上查询系统」,可以透过Internet,查询医院门诊时间表。
一般的医院,每月会提供一张新的医院门诊时间表。看病的人可以透过Internet,连线上医院的「医院门诊时间表线上查询系统」,即可线上查询新的医院门诊时间表。
设计实例
让我们执行一个实例。
( 范例 data7.asp 医院门诊时间表线上查询
若要查询门诊时间表,於用户端使用浏览器,浏览本书所附安装於网站伺服器的data7.asp,即可显示查询的结果如下,包括科别、星期一~星期六的门诊医师姓名∶
设计实例具体解说
建立资料表
首先使用Microsoft Access、Microsoft SQL Server 、Text档案、或任何一种支援ODBC的资料库,建立一个资料表HospitalSchedule。
於栏名CLASS、A1~A6分别输进科别、星期一~星期六的门诊医师姓名。
使用Microsoft Access建立一个资料表HospitalSchedule,如下∶
或使用Microsoft SQL Server建立一个资料表HospitalSchedule,如下∶
或使用Text档案建立一个资料表HospitalSchedule,如下∶
查询资料库
接著,网站伺服器执行data7.asp档案,使用「Server.CreateObject」建立连线的物件,并使用「Open」开启待存取查询资料库BookSamp。
再使用SELECT的SQL指令查询资料库的资料,设定SQL指令,查询HospitalSchedule的资料,下个「Execute」指令,即可开始执行存取查询资料库的动作,并将查询结果储存到RecordSets物件RS。
程式码如下∶
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "BookSamp","sa",""
SQL = "SELECT * FROM HospitalSchedule"
Set RS = Conn.Execute(SQL)
接著,要显示查询的结果了。首先,由「 IF RS.EOF THEN ...」判定是否找到HospitalSchedule的资料,若RS.EOF为TRUE,则显示「本月无门诊」。
程式码,如下∶
查询结果:
<% IF RS.EOF THEN %>
本月无门诊
若找到HospitalSchedule的资料,则显示科别、星期一~星期六的门诊医师姓名,分别由RecordSets物件的RS(0)、RS(1) ~RS(6) 取得。
RS.Fields.Count表示RecordSets物件的栏位数,由「For i = 0 to RS.Fields.Count - 1」取得RS(i) 各栏位的资料。配合
| 科别 | 星期一 | 星期二 | 星期三 | 星期四 | 星期五 | 星期六 |
<%= RS(i) %> | <%= RS(i) %> |
查询结果:
<% IF RS.EOF THEN %>
本月无门诊
<% ELSE %>
本月份 门诊时间表如下:
| 科别 | 星期一 | 星期二 | 星期三 | 星期四 | 星期五 | 星期六 |
<%= RS(i) %> | <%= RS(i) %> |
公司地址:中国武汉光谷民院路尖东智能花园4栋3楼
联系电话:027-87467120 传真:027-87188212 邮箱:hr@twoarmy.com
Copyright (c) 2007-2010 武汉网站建设|武汉网站制作|武汉网站设计|武汉做网站 谷站目录
All Rights Reserved.