关于连接 SQL 数据，使用的时候数据同步更新的问题？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

我的流程是这样：

数据全部来源 SQL 包括库存表，生产价格表。生产价格表输入的时候产品来源于库存表。

库存数据是和管家婆公用的，库存表里面没有该产品的时候是从管家新增新产品的。

如图库存表（数据源是SQL的）

图片点击可在新窗口打开查看此主题相关图片如下：112.jpg

foxtable的生产价格表（数据源是SQL的）

图片点击可在新窗口打开查看此主题相关图片如下：111.jpg

管家婆新增产品界面（数据源是SQL的）已经确定“高压黑折边育苗袋”“13*15*0.03”“个” 该产品

已经添加到库存表中。

图片点击可在新窗口打开查看此主题相关图片如下：110.jpg

如图所示管家婆已经确定把产品名称 “高压黑折边育苗袋”“13*15*0.03”“个” 添加到仓库表中了。

可是如图 110.jpg 所示：该窗口的数据来源于 SQL 仓库表，但是搜索的时候却没有出来。

只有关闭掉foxtable ，让他重新加载数据库，才会显示出该产品。

应该是 sql中的数据已经从后台更新了，但是foxtable 的数据没有能够及时更新引起的。这样的问题如何解决？

[此贴子已经被作者于2011-8-14 18:10:08编辑过]

参考：

http://www.foxtable.com/help/topics/2276.htm

最好看看Foxtable开发指南中关于动态加载的这一章的全部内容。

不容易掌握呀。

比如 textchanged 的语句是这样的如何改成动态加载呢？

table 类型是Normal 副本是TRUE

Dim txt As String = e.Form.Controls("TextBox1").Text
Dim tbl As Table = Tables("窗口4_Table1")
If txt = "" Then
tbl.Filter =" leveal=2 and deleted=0 and isstop=0"
tbl.Sort = "pfullname desc,Standard desc,Unit1 desc"

Else
    txt = "'*" & txt & "*'"
    tbl.filter = "(pfullname Like " & txt & " Or Standard Like " & txt & " Or Unit1 Like " & txt & ") and (leveal=2 and deleted=0 and isstop=0)"
    tbl.Sort = "pfullname desc,Standard desc,Unit1 desc"
End If

[此贴子已经被作者于2011-8-15 8:54:33编辑过]

两种方法

用追载：

Dim txt As String = e.Form.Controls("TextBox1").Text
Dim tbl As Table = Tables("窗口4_Table1")
tbl.DataTable.AppendLoad("条件")
If txt = "" Then
tbl.Filter =" leveal=2 and deleted=0 and isstop=0"
tbl.Sort = "pfullname desc,Standard desc,Unit1 desc"

用加载：

Dim txt As String = e.Form.Controls("TextBox1").Text
Dim tbl As Table = Tables("窗口4_Table1")

Dim Filter As string

Dim Sort AS string
If txt = "" Then
Filter =" leveal=2 and deleted=0 and isstop=0"
Sort = "pfullname desc,Standard desc,Unit1 desc"

Else
       txt = "'%" & txt & "%'"   '这里用%，不是*
      filter = "(pfullname Like " & txt & " Or Standard Like " & txt & " Or Unit1 Like " & txt & ") and (leveal=2 and deleted=0 and isstop=0)"
      Sort = "pfullname desc,Standard desc,Unit1 desc"
End If

tbl.DataTable.LoadFilter = Filter

tbl.DataTable.Load

tbl.sort = sort

可以了不错不错！谢谢管理员！

主题：关于连接 SQL 数据，使用的时候 数据同步更新的问题？

主题：关于连接 SQL 数据，使用的时候数据同步更新的问题？