请教水晶报表导出成word的问题

[szwendy]

已经生成了水晶报表，但用vb导出成word的时候，出现以下错误，请各位帮我看看，已经问了几次，可问题还是没解决。
出错信息：
异常详细信息: CrystalDecisions.CrystalReports.Engine.LogOnException: 登录失败。
我的导出word的代码：
Public Function Export() As Boolean
Try

Dim rptDoc As myrpt = New myrpt 'myrpt 为已定义的水晶报表
Dim diskoptions As CrystalDecisions.Shared.DiskFileDestinationOptions = New CrystalDecisions.Shared.DiskFileDestinationOptions
rptDoc.ExportOptions.ExportDestinationType = CrystalDecisions.Shared.ExportDestinationType.DiskFile

rptDoc.ExportOptions.ExportFormatType = CrystalDecisions.Shared.ExportFormatType.WordForWindows
diskoptions.DiskFileName = "d:\\aaaa.doc"
rptDoc.ExportOptions.DestinationOptions = diskoptions
rptDoc.Export()
Return True
Catch
' _ErrorMessage = Err.Description
Return False
End Try
End Function

[rosy11]

Dim DiskOpts As CrystalDecisions.Shared.DiskFileDestinationOptions = New CrystalDecisions.Shared.DiskFileDestinationOptions()

' myReport.ExportOptions.ExportDestinationType = CrystalDecisions.[Shared].ExportDestinationType.DiskFile

' 'myReport.ExportOptions.ExportFormatType = CrystalDecisions.[Shared].ExportFormatType.WordForWindows

' 'myReport.ExportOptions.ExportFormatType = CrystalDecisions.[Shared].ExportFormatType.Excel

' myReport.ExportOptions.ExportFormatType = CrystalDecisions.[Shared].ExportFormatType.PortableDocFormat

' Dim path As String = Server.MapPath("~\images")


' DiskOpts.DiskFileName = path & "\Output.pdf"

[haibodotnet]

确保 ASPNET 账号有导出目录的完全控制权限

海波.NET
问题：
如何将水晶报表导出到文件……
------------------------------------------------
解决方案：
1、ExportFormatType 枚举
CrystalDecisions.Shared 命名空间 | ExportOptions
成员
成员名称 说明
Excel 报表的导出格式是 Microsoft Excel 文件。
HTML32 报表的导出格式是 HTML 3.2 文件。
HTML40 报表的导出格式是 HTML 4.0 文件。
NoFormat 未指定导出格式。
PortableDocFormat 报表的导出格式是 PDF 文件。
RichText 报表的导出格式是 Rich Text 文件。
WordForWindows 报表的导出格式是 Microsoft Word 文件。

2、
using CrystalDecisions.CrystalReports.Engine;
using CrystalDecisions.Shared;

Private Sub ExportToDisk(ByVal fileName As String)
' 声明变量并获取导出选项。
Dim exportOpts As New ExportOptions()
Dim diskOpts As New DiskFileDestinationOptions()
exportOpts = Report.ExportOptions

' 设置导出格式。
exportOpts.ExportFormatType = _
ExportFormatType.RichText
exportOpts.ExportDestinationType = _
ExportDestinationType.DiskFile

' 设置磁盘文件选项。
diskOpts.DiskFileName = fileName
exportOpts.DestinationOptions = diskOpts

' 导出报表。
Report.Export()
End Sub
[C#]
private void ExportToDisk (string fileName)
{
// 声明变量并获取导出选项。
ExportOptions exportOpts = new ExportOptions();
DiskFileDestinationOptions diskOpts =
new DiskFileDestinationOptions();
exportOpts = Report.ExportOptions;

// 设置导出格式。
exportOpts.ExportFormatType = ExportFormatType.RichText;
exportOpts.ExportDestinationType =
ExportDestinationType.DiskFile;

// 设置磁盘文件选项。
diskOpts.DiskFileName = fileName;
exportOpts.DestinationOptions = diskOpts;

// 导出报表。
Report.Export ();
}

[szwendy]

上面的两个方法我都用了，还是不行，请问“CrystalDecisions.CrystalReports.Engine.LogOnException: 登录失败”这个错误究竟是什么错误？要怎么改，还是少引用了什么东东？