以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  Exporter导出的excel打不开  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=85569)

--  作者:kao_go
--  发布时间:2016/5/28 18:33:00
--  Exporter导出的excel打不开
Dim dlg As New SaveFileDialog \'定义一个新的SaveFileDialog
dlg.Filter= "Excel文件|*.xls" \'设置筛选器
If dlg.ShowDialog = DialogResult.Ok Then \'如果用户单击了确定按钮
    Dim ex As New Exporter
    ex.SourceTableName = "bhd1" \'指定导出表
    ex.filepath = dlg.FileName  \'指定目标文件
    ex.Export() \'开始导出
    MessageBox.Show("导出成功!", "提示", MessageBoxButtons.OK, MessageBoxIcon.Information)
End If

提示以下错误(在单独安装excel2003的电脑上也不行)

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



--  作者:大红袍
--  发布时间:2016/5/29 23:40:00
--  

加上代码

 

ex.Format = "Excel" \'导出格式为Excel