- 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=52283)
-- 发布时间：2014/6/12 16:08:00
-- 怎么把报表录入保存查询？
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:查询保存报表.table |
此主题相关图片如下：1.jpg
-- 发布时间：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")
-- 发布时间：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楼，命名自己改一下。
-- 发布时间：2014/6/12 16:34:00
--
那么怎么查询呢
[此贴子已经被作者于2014-6-12 16:33:42编辑过]
-- 发布时间：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