以文本方式查看主题

-  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或者点击左上角的小问号,可以打开非常详细的图文帮助