以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  代码执行问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=8348)
--  作者：lpxjw_zyl
--  发布时间：2010/10/10 20:40:00
--  代码执行问题

Dim cmd As New SQLCommand
Dim dt As datatable
cmd.C
cmd.CommandText = "SELECT * From {通知表}"
dt = cmd.ExecuteReader()
For Each dt1 As datatable In DataTables
    If CurrentTable.datatable.Name = dt1.name Then
        StatusBar.Message3= dt.DataRows(0)("通知")
    End If
Next

上述代码在切换事件中不执行
--  作者：czy
--  发布时间：2010/10/11 8:42:00
--  
改成Message1或2吧。