以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 请教思路及写法 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=46006) |
-- 作者:cuicuibing -- 发布时间:2014/2/15 10:38:00 -- 请教思路及写法 外部数据源a,想写一个消息系统,数据表xiaoxi 在项目事件LoadUserSetting中,如何检测消息表中, 如果状态为空,收件人等于用户名,自动打开窗口“消息” 数据表xiaoxi 收件人 发件人 内容 发时间 接时间 状态(逻辑列) Dim cmd As New SQLCommand Dim dt As DataTable cmd.ConnectionName = "a" cmd.CommandText = "SELECT * From {xiaoxi}" if ********** Forms("窗口名").Open() end if 后边的如何写。 还有一个疑问,如果时间长了,消息肯定几十万条。这里有什么办法能提高打开软件对消息的搜索速度。
|
-- 作者:Bin -- 发布时间:2014/2/15 10:42:00 -- 价格判断,把状态为Flase的筛选出来.不要全部查询出来啊 cmd.CommandText = "SELECT * From {xiaoxi} 状态=false"
|
-- 作者:cuicuibing -- 发布时间:2014/2/15 11:12:00 -- 恩, if ********** Forms("窗口名").Open() end if 带***的地方不会写啊。应该怎么写。
|
-- 作者:Bin -- 发布时间:2014/2/15 11:14:00 -- Dim cmd As New SQLCommand Dim dt As DataTable cmd.ConnectionName = "a" cmd.CommandText = "SELECT * From {xiaoxi} 状态=false and 收件人=\'" & user.name & "\'" dt=cmd.e if dt.dataarows.count>0 then Forms("窗口名").Open() end if
|
-- 作者:cuicuibing -- 发布时间:2014/2/15 11:27:00 -- 谢谢,明白了。这个思路好。 比我想的在if 后边比较用户名跟收件人好。 |
-- 作者:cuicuibing -- 发布时间:2014/2/15 11:33:00 -- 出现个问题。 显示, e 不是 sqlcommand 的成员 |
-- 作者:cuicuibing -- 发布时间:2014/2/15 11:34:00 -- 另外 dataarows,也不是datatable的成员。 |
-- 作者:Bin -- 发布时间:2014/2/15 11:36:00 -- 笔误,这种小问题你看一下就知道了啊.不能满目的复制啊. datarows
|
-- 作者:cuicuibing -- 发布时间:2014/2/15 12:06:00 -- 出现个问题。 显示, e 不是 sqlcommand 的成员
|
-- 作者:Bin -- 发布时间:2014/2/15 14:01:00 -- 晕,dt = cmd.ExecuteReader() 新手建议先看一下我们的帮助
打开软件按F1或者点击左上角的小问号,可以打开非常详细的图文帮助 |