以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  关于导出DBF文件  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=29293)
--  作者：raystar27
--  发布时间：2013/3/4 10:42:00
--  关于导出DBF文件
使用保存EXCEL的代码时可以保存成EXCEL文件格式。
使用自动保存成DBF文件的代码：
Dim ex As New Exporter
ex.SourceTableName = "表A"
ex.FilePath = "c:\\ceshi\\" 
ex.Format = "dbase" 
ex.NewTableName = "订单数据" 
ex.Export() 
这样也是好使的。
但是我想弹出一个对话框，自己选择导出DBF文件路径和文件名的时候就不好使了，我的代码是这样的：
Dim dlg As New SaveFileDialog
dlg.Filter= "DBF文件|*.DBF" 
If dlg.ShowDialog = DialogResult.Ok Then
    Dim ex As New Exporter
    ex.SourceTableName = "表A" 
    ex.filepath = dlg.FileName 
    ex.Export() 
End If
这个是可以导出DBF的，但是导出的文件打不开，然后我在ex.filepath的下面加了一句ex.Format = "dbase"，然后导出的时候都导出不了了。
请问下这是什么问题？谢谢啦！

[此贴子已经被作者于2013-3-4 10:42:32编辑过]
--  作者：raystar27
--  发布时间：2013/3/4 11:51:00
--  回复：（muhua）Dim dlg As New OpenFileDialog '定义...
我试了下，还是不行，需要有原文件存在，要是想新建一个文件的话呢？就是之前没有DBF文件，直接创建一个，用你的那个方法好像是必须有源文件才可以，而且最开始定义类型的时候应该定义的是SaveFileDialog？还是OpenFileDialog？
[此贴子已经被作者于2013-3-4 11:54:29编辑过]
--  作者：狐狸爸爸
--  发布时间：2013/3/4 11:58:00
--  

是SaveFileDialog，打不开就导出为别的格式，例如excel或access，再另存为dbf吧。

现在很少有人用dbf了。
--  作者：raystar27
--  发布时间：2013/3/4 12:25:00
--  回复：（狐狸爸爸）是SaveFileDialog，打不开就导出为...
好的，谢谢