主题：[求助][灌水]excel导出报错“不能更新，数据库或对象为只读”

 想导出excel表，输入以下代码，出现报错“不能更新，数据库或对象为只读”

Dim dlg As New SaveFileDialog '定义一个新的SaveFileDialog

dlg.Filter= "Excel文件|*.xlsx" '设置筛选器

If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮
    Dim ex As New Exporter

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

    ex.SourceTableName = "report" '指定导出表

    ex.filepath = dlg.FileName  '指定目标文件

ex.Fields = "seller,orderid" '指定导出字段

ex.Filter = "[seller] = 'bingo'" '指定导出条件

    ex.Export() '开始导出

End If

请问这个是什么问题，请支支招。

还有就这个方法是保存成一个workbook,如果我想保存成一个workbook里的worksheet，代码应该如何改，或者看哪里的帮助，没有找到这部分的说明。

狐爸，我试了很多次了，不是你说的原因哦，能帮忙看看这个“导出为excel表“的按钮代码究竟出什么问题了？

还有就是我想导出成为一个worksheet的，因为我还要导出其他的worksheet到同一个workbook里的，代码怎么修改，哪里有帮助。

麻烦狐爸详细说说，这个步骤对我来说较为关键。

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:数据导入-数据库建模.table

好的，谢谢BIN！

我现在导出的筛选条件是多重的，譬如我在面板加了个按钮DateTimePicker1，想同时符合两个条件才输出：

ex.Filter = "[seller] = 'bingo'and [reportingdate]=e.Form.Controls(DateTimePicker1)"

帮忙看看这个代码应该如何修改，每次遇到时间的问题就容易犯糊涂，现在提示说参数未定义。

还有一个问题，除了上面2个筛选条件外，我还想用模糊筛选，即是用Like* 这个语法的，这个应该如何嵌套到ex.Filter这个语法里面。