以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  怎么把报表录入保存查询?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=52283)

--  作者:lrh9537
--  发布时间:2014/6/12 16:08:00
--  怎么把报表录入保存查询?
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:查询保存报表.table


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

--  作者:Bin
--  发布时间:2014/6/12 16:12:00
--  
不是很懂你的意思.
--  作者:有点甜
--  发布时间:2014/6/12 16:12:00
--  
 看不懂你的意思,是说把 表B 另存为一张新的表吗?
--  作者:有点甜
--  发布时间:2014/6/12 16:17:00
--  

保存报表代码

 

Dim ex As New Exporter
ex.SourceTableName = "表B" \'指定导出表
ex.filepath = "d:\\temp.mdb"  \'指定目标文件
ex.Export() \'开始导出

 

 Dim ip As New Importer
ip.SourcePath = "d:\\temp.mdb" \'指定数据文件
ip.SourceTableName = "表B" \'指定要导入的表
ip.NewTableName = "随机名字" & Rand.Next(10000) \'导入后的表名
ip.Import()

 

FileSys.DeleteFile("d:\\temp.mdb")


--  作者:lrh9537
--  发布时间:2014/6/12 16:19:00
--  

就是说这个表有数据了,现在把它保存下来,最好保存在外部数据库中,还得能进行查询,比如我填个2014,05月,后河居委会,然后查询这个村201405月的报表数据,保存时如果能自动保存到数据库中更好,或者根据单位年月进行命名,如后河居委会201405也行

Dim village As WinForm.ComboBox = e.Form.Controls("单位")
village.Combolist = DataTables("表A").GetCombolistString("单位名称")

Dim year As WinForm.ComboBox = e.Form.Controls("年")
Dim month As WinForm.ComboBox = e.Form.Controls("月")

[此贴子已经被作者于2014-6-12 16:22:29编辑过]

--  作者:有点甜
--  发布时间:2014/6/12 16:25:00
--  
 看4楼,命名自己改一下。
--  作者:lrh9537
--  发布时间:2014/6/12 16:34:00
--  
那么怎么查询呢
[此贴子已经被作者于2014-6-12 16:33:42编辑过]

--  作者:Bin
--  发布时间:2014/6/12 16:35:00
--  
利用 Merger  合并进来


--  作者:有点甜
--  发布时间:2014/6/12 16:36:00
--  
以下是引用lrh9537在2014-6-12 16:34:00的发言:
那么怎么查询呢
[此贴子已经被作者于2014-6-12 16:33:42编辑过]

 

查询?参考 http://www.foxtable.com/help/topics/1058.htm