以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]表中数据在另一表中显示(最后一步了,谁可以帮帮我!!)  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=102749)

--  作者:独行侠
--  发布时间:2017/6/25 9:47:00
--  [求助]表中数据在另一表中显示(最后一步了,谁可以帮帮我!!)


图片点击可在新窗口打开查看此主题相关图片如下:~dxq8i@gahhz}3ckog2c%pj.png
图片点击可在新窗口打开查看

 

我在窗口(物资)中设计了一个 调用按钮,点击调用, 物资表中调用列 打勾的行就可以在  调用结果窗口中显示出来

我的 调用按钮的 代码 

 
DataTables("调用结果_Table2").DeleteFor("")
Dim f As New Filler
f.SourceTable = DataTables("物资") \'指定数据来源

f.DataTable = DataTables("调用结果_Table2") \'指定数据接收表

f.Filter = "调用=true"
f.Fill() \'填充数据
但是显示
 


图片点击可在新窗口打开查看此主题相关图片如下:p1o43`9djl7`k$emkzryq0.png
图片点击可在新窗口打开查看

 

这该怎么解决??  调用结果窗口中的表


 


图片点击可在新窗口打开查看此主题相关图片如下:wl0n9i3r{3_5gvt$6da@j.png
图片点击可在新窗口打开查看

 

最后一步了  谁可以帮帮我!!!

[此贴子已经被作者于2017/6/25 9:48:06编辑过]

--  作者:有点色
--  发布时间:2017/6/25 9:56:00
--  
Tables("调用结果_Table2").DataTable.DeleteFor("")
Dim f As New Filler
f.SourceTable = DataTables("物资") \'指定数据来源
f.DataTable = Tables("调用结果_Table2").DataTable \'指定数据接收表
f.Filter = "调用=true"
f.Fill() \'填充数据

--  作者:独行侠
--  发布时间:2017/6/25 16:59:00
--  回复:(有点色)Tables("调用结果_Table2").DataTabl...

还是显示一样的错误,      把 调用 按钮的代码  写成

Dim t As Table = e.Form.controls("Table1").Table
t.Filter = "调用=true"

 

可以把 调用打勾的在原表筛选出来,但是这不是我想要的结果,我想要  点击调用按钮,  被打勾的行会在另一个窗口的表中显示出来(或者在另一张表中显示也行,我可以在另一个窗口中与这个表绑定,同样可以实现我想要的效果。)

 

(抱歉,不是有意要重复发帖子的,今天最后一天了,真没时间,我发了三次帖子问同一个问题, 都一直没解决。

我再反映一个问题,帖子中 加入这句话 


图片点击可在新窗口打开查看此主题相关图片如下:n51%s{2i)8mnx()}sx06c3.png
图片点击可在新窗口打开查看

帖子就发不出去,好几次了,一直显示错误,删掉这句话 帖子才能发出去)


--  作者:独行侠
--  发布时间:2017/6/25 17:35:00
--  回复:(独行侠)回复:(有点色)Tables("调用结果_T...

Forms("调用结果").Show
Tables("调用结果_Table1").DataTable.DeleteFor("")
Dim f As New Filler
f.SourceTable = DataTables("物资")
f.DataTable = Tables("调用结果_Table1").DataTable
f.Filter = "调用=true"
f.Fill()

 

我把调用按钮的 加了一句打开窗口,并把  调用结果中的表设为  SQLQuery  并写select代码 (这个代码打出来 发不了帖子)

这样,我选定的东西可以在 另一个窗口显示,但仅仅使显示,并不会保存下来,请问  如何才能让那些行保存下载?


--  作者:有点色
--  发布时间:2017/6/25 17:42:00
--  
 你需要再添加一个数据表,命名为【调用数据】,然后把数据填充到这个数据表,不就好了?
--  作者:独行侠
--  发布时间:2017/6/25 18:14:00
--  回复:(有点色) 你需要再添加一个数据表,命名...


图片点击可在新窗口打开查看此主题相关图片如下:(4`nmt))_zl61wjzplo(2d.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:xlws(y%qn~9gv0nlz6o8hol.png
图片点击可在新窗口打开查看

 

我把 调用结果的表设为数据表后就会显示错误 

我的 调用按钮的代码

Forms("调用结果").Show
Tables("调用结果_Table1").DataTable.DeleteFor("")
Dim f As New Filler
f.SourceTable = DataTables("物资") \'指定数据来源
f.DataTable = Tables("调用结果_Table1").DataTable \'指定数据接收表
f.Filter = "调用=true"
f.Fill() \'填充数据


--  作者:有点色
--  发布时间:2017/6/25 18:55:00
--  

Forms("调用结果").Show
DataTables("调用结果").DeleteFor("")
Dim f As New Filler
f.SourceTable = DataTables("物资") \'指定数据来源
f.DataTable = DataTables("调用结果") \'指定数据接收表
f.Filter = "调用=true"
f.Fill() \'填充数据


--  作者:独行侠
--  发布时间:2017/6/25 19:38:00
--  回复:(有点色)Forms("调用结果").ShowDataTables("...


图片点击可在新窗口打开查看此主题相关图片如下:a}vtuwq1j@25fwf)9jjv6y.png
图片点击可在新窗口打开查看

 

错误内容变了


--  作者:有点蓝
--  发布时间:2017/6/26 8:28:00
--  
7楼代码不会有这种错误

勾上“显示详细信息”看是在什么事件错误,查看代码



--  作者:独行侠
--  发布时间:2017/6/26 10:18:00
--  回复:(有点色)Forms("调用结果").ShowDataTables("...
用这个代码的话,  我的调用结果中的表要设置成什么类型的?