以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]导出数据保存格式问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=26945)
--  作者：云淡风轻
--  发布时间：2012/12/18 8:44:00
--  [求助]导出数据保存格式问题

Dim tnames() as string = {"表D", "表C", "表A"}
Dim dlg As New SaveFileDialog 
dlg.Filter= "Excel文件|*.xls"
If dlg.ShowDialog = DialogResult.Ok Then
 for each tname as string in tnames
     Tables(tname).SaveExcel(dlg.FileName, tname)
 next
End If

 

我把这句dlg.Filter= "Excel文件|*.xls" 改为dlg.Filter= "Excel文件|*.xls|Access文件|*.mdb" ，

那这句Tables(tname).SaveExcel(dlg.FileName, tname)如何修改，则可以选择保存格式？

[此贴子已经被作者于2012-12-18 8:49:14编辑过]
--  作者：lin_hailun
--  发布时间：2012/12/18 8:51:00
--  
 抱歉，Table没有保存.mdb的方法。

http://www.foxtable.com/help/topics/0683.htm
--  作者：云淡风轻
--  发布时间：2012/12/18 9:00:00
--  
我想一次性把所有表的数据全部导出，可以选择保存格式，excel超过6万多条就会溢出，所以access很有必要，一张一张表导，对用户而言操作不方便。
[此贴子已经被作者于2012-12-18 9:00:32编辑过]
--  作者：狐狸爸爸
--  发布时间：2012/12/18 9:03:00
--  

用这个啊：

 

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