- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 老爹,今天试用了一下自己设计的住院管理HIS,有些疑问. (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=2219)
-- 发布时间：2009/3/27 16:44:00
-- 老爹,今天试用了一下自己设计的住院管理HIS,有些疑问.
服务器采用SQL数据库,与其它电脑组成局域网...
原设计思路:
收费子系统进行患者收费确认后,患者状态列变为3,并保存.
住院管理子系统出院清单窗口自动出现状态=3的所有患者信息..
如下图:
此主题相关图片如下：001.jpg
窗口AfterLoad代码如下:
dim dst as winform.datalist = e.form.Controls("datalist1")
dim cmd as new sqlcommand
cmd.connec tion name = "yahis"
cmd.commandtext = "select * from [H_ZYXX] where 状态 = 3 ORDER BY 出院日期 DESC"
dst.datatable = cmd.ExecuteReader()
dst.ColumnList = "住院号|姓名|入院日期|出院日期|住院ID"
dst.ColumnWidth = "50|50|90|90|0"
dst.Build()
今天在局域网里试操作一次,发现在收费子系统电脑对患者A收费确认后,回到住院管理电脑打开出院清单窗口,未能见到患者A信息.....(当时住院管理子系统是一直打开的...)
用e.form.Close()关闭清单窗口再次打开仍无法找到该患者....甚至点击查询按钮都没法找到.....查询代码类似AfterLoad代码..
最后关闭住院管理子系统重新登陆,方可在出院清单窗口见到该患者信息..
请问老爹,这是怎么回事?难道重新打开窗口代码不执行?要重新打开项目才行? 是否Catch的问题?
[此贴子已经被作者于2009-3-27 16:52:06编辑过]
-- 发布时间：2009/3/27 17:04:00
--
1、要对方保存.
2、要重新Load才行，不一定要打开项目，只需：
DataTables("某表").Load
-- 发布时间：2009/3/27 17:08:00
--
1.对方确认键包含保存代码..
2.本方窗口只是DataList,直接查询后台数据动态生成....不需要Load啊.....
[此贴子已经被作者于2009-3-27 17:10:18编辑过]
-- 发布时间：2009/3/27 17:09:00
--
以下是引用菜鸟foxtable在2009-3-27 16:44:00的发言：
服务器采用SQL数据库,与其它电脑组成局域网...
原设计思路:
收费子系统进行患者收费确认后,患者状态列变为3,并保存.
住院管理子系统出院清单窗口自动出现状态=3的所有患者信息..
如下图:
此主题相关图片如下：001.jpg
窗口AfterLoad代码如下:
dim dst as winform.datalist = e.form.Controls("datalist1")
dim cmd as new sqlcommand
cmd.connec tion name = "yahis"
cmd.commandtext = "select * from [H_ZYXX] where 状态 = 3 ORDER BY 出院日期 DESC"
dst.datatable = cmd.ExecuteReader()
dst.ColumnList = "住院号|姓名|入院日期|出院日期|住院ID"
dst.ColumnWidth = "50|50|90|90|0"
dst.Build()
今天在局域网里试操作一次,发现在收费子系统电脑对患者A收费确认后,回到住院管理电脑打开出院清单窗口,未能见到患者A信息.....(当时住院管理子系统是一直打开的...)
用e.form.Close()关闭清单窗口再次打开仍无法找到该患者....甚至点击查询按钮都没法找到.....查询代码类似AfterLoad代码..
最后关闭住院管理子系统重新登陆,方可在出院清单窗口见到该患者信息..
请问老爹,这是怎么回事?难道重新打开窗口代码不执行?要重新打开项目才行? 是否Catch的问题?
服务器采用SQL数据库,与其它电脑组成局域网...
原设计思路:
收费子系统进行患者收费确认后,患者状态列变为3,并保存.
住院管理子系统出院清单窗口自动出现状态=3的所有患者信息..
如下图:
此主题相关图片如下：001.jpg窗口AfterLoad代码如下:
dim dst as winform.datalist = e.form.Controls("datalist1")
dim cmd as new sqlcommand
cmd.connec tion name = "yahis"
cmd.commandtext = "select * from [H_ZYXX] where 状态 = 3 ORDER BY 出院日期 DESC"
dst.datatable = cmd.ExecuteReader()
dst.ColumnList = "住院号|姓名|入院日期|出院日期|住院ID"
dst.ColumnWidth = "50|50|90|90|0"
dst.Build()
今天在局域网里试操作一次,发现在收费子系统电脑对患者A收费确认后,回到住院管理电脑打开出院清单窗口,未能见到患者A信息.....(当时住院管理子系统是一直打开的...)
用e.form.Close()关闭清单窗口再次打开仍无法找到该患者....甚至点击查询按钮都没法找到.....查询代码类似AfterLoad代码..
最后关闭住院管理子系统重新登陆,方可在出院清单窗口见到该患者信息..
请问老爹,这是怎么回事?难道重新打开窗口代码不执行?要重新打开项目才行? 是否Catch的问题?
[此贴子已经被作者于2009-3-27 16:52:06编辑过]
我认为是更新的问题,我的16号更新一直有问题,莫名其妙的问题.CPU一直在100%.进不了系统,进去了后,打开系统菜单在项目属性设置一下,关闭项目属性时就一直就不动了.cpu一直在100%,回到7号的更新就没有问题.
-- 发布时间：2009/3/27 17:09:00
--
你回到7号的更新看一下有没有问题?
-- 发布时间：2009/3/27 17:11:00
--
以下是引用blackzhu在2009-3-27 17:09:00的发言：
你回到7号的更新看一下有没有问题?
哇,那要更新两台电脑...有些麻烦...
-- 发布时间：2009/3/27 17:20:00
--
如果是查询，绝对不应该有问题的，因为此时已经和Foxtable无关了。
如果发现得不到最新的数据，将你的SQL语句复制，粘贴到增加查询表窗口中，预览看看
-- 发布时间：2009/3/27 17:24:00
--
以下是引用blackzhu在2009-3-27 17:09:00的发言：
我认为是更新的问题,我的16号更新一直有问题,莫名其妙的问题.CPU一直在100%.进不了系统,进去了后,打开系统菜单在项目属性设置一下,关闭项目属性时就一直就不动了.cpu一直在100%,回到7号的更新就没有问题.
下周会再次更新，你先用回7号的吧。