以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助] 刷新当前表  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=50248)

--  作者:home8225
--  发布时间:2014/5/3 9:26:00
--  [求助] 刷新当前表
大神们好,我想做一个刷新的按钮,用的追载的命令,想刷新当前表,帮忙看下是什么问题,Dim n As CurrentTable.Name 有问题,谢谢!

Dim n As CurrentTable.Name
Dim id As Integer = DataTables("n").Compute("Max(_Identify)")
Dim Filter As String = "[_Identify] > " & id
DataTables("n").AppendLoad(Filter, False)
[此贴子已经被作者于2014-5-3 9:26:33编辑过]

--  作者:lsy
--  发布时间:2014/5/3 9:29:00
--  
Dim n As String = CurrentTable.Name
Dim id As Integer = DataTables("n").Compute("Max(_Identify)")
Dim Filter As String = "[_Identify] > " & id
DataTables("n").AppendLoad(Filter, False)

--  作者:home8225
--  发布时间:2014/5/3 9:39:00
--  
谢谢~!
--  作者:home8225
--  发布时间:2014/5/3 9:42:00
--  
出错了。。。
图片点击可在新窗口打开查看此主题相关图片如下:qq截圖20140503094135.png
图片点击可在新窗口打开查看

--  作者:lsy
--  发布时间:2014/5/3 9:51:00
--  
Dim n As String = CurrentTable.Name
Dim id As Integer = DataTables(n).Compute("Max(_Identify)")
Dim Filter As String = "[_Identify] > " & id
DataTables(n).AppendLoad(Filter, False)
[此贴子已经被作者于2014-5-3 9:51:57编辑过]

--  作者:home8225
--  发布时间:2014/5/3 10:09:00
--  
st wrong..i cant type chinese. it works ,thank u very much!