如题:

一样错误,我的是ms office 2010

 不知道是什么问题，其它形式的导出是否也有问题？

mark 用代码导出dbf格式文件

Dim dlg As new SaveFileDialog
dlg.FileName = CurrentTable.Name
If dlg.ShowDialog = DialogResult.OK Then
    Dim str_oleConn As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & FileSys.GetParentPath(dlg.FileName)  & ";Extended Properties=dBASE IV;"
    Dim ole_conn As New System.Data.OleDb.OleDbConnection(str_oleConn)
    Try
        ole_conn.Open()
        Dim str As String = ""
        For Each c As Col In CurrentTable.cols
            str &= c.name & " char(16),"
        Next
        output.show(str)
        Dim cmd1 As New System.Data.OleDb.OleDbCommand("Create Table " &  FileSys.GetName(dlg.FileName) & " (" & str.Trim(",") & ")", ole_conn)
        cmd1.ExecuteNonQuery()
       
        For Each r As Row In CurrentTable.rows
            str = ""
            For Each c As Col In CurrentTable.cols
                str &= "\'" & r(c.name) & "\',"
            next
            Dim cmd2 As New System.Data.OleDb.OleDbCommand("Insert Into " & FileSys.GetName(dlg.FileName) & " values (" & str.Trim(",")  & ")", ole_conn)
            output.show(str)
            cmd2.ExecuteNonQuery()
        next
        msgbox("保存成功")
    Catch ex As Exception
        MessageBox.Show(ex.Message)
    Finally
        ole_conn.Close()
    End Try
   
End If

还是错误 ！！

此主题相关图片如下：err.jpg

高速导出-->存档类型 只又excel2007文件及dBASE文件不行

 电脑问题。把你的Office卸载重装一次看看。