您的应用程序正在引用文件craxDDrt.dll。 为了使用此dll，您需要获得额外的许可。 由于CR 10的支持期已超过5（？）年，因此我不确定您是否仍然可以获得许可。 请致电866-681-3435与销售人员联系以查明问题。

或者，引用craxDrt.dll。 该dll不需要任何其他许可。 但是，您收到的错误表明您正在使用craxDDrt.dll中的报表创建API（RCAPI）。 以我的经验，经常有其他方法可以使用craxdrt.dll进行相同的编码。 让我知道您正在使用什么RCAPI，我也许可以为您提供帮助。

Ludek

在Twitter上关注我们 http://twitter.com/SAPCRNetSup

有什么增强想法？ 尝试[SAP Idea Place | https://ideas.sap.com/community/products_and_solutions/crystalreports ]

此应用程序使用的是哪个SDK？ 并且您是否正在创建修改RPT？ 您拥有Crystal Reports 10的哪种许可证？ 另外，Crystal Reports 10和11都已经不支持几年了，建议您升级到Crystal Reports 2008或2011。

嗨，

使用VB6和Crystal Reports v.9

我想循环访问子报表对象链接以检索Subreport.Links（1）.MainReportField.Name。 但是，当我执行" Subreport.Links"这一行时，我遇到了这个错误。

您正在尝试使用Crystal Decisions Report Creation API许可下的功能。 该系统没有有效的许可证，或者许可证的评估副本已过期。 请联系Crystal Decisions以获取报告创建API许可证。

我的源代码

将iSectionCounter设置为整数

将iObjectCounter设置为整数

暗sUsedFields作为字符串

暗水晶作为CRAXDRT.Application

设置oCrystal = New CRAXDRT.Application

Dim oReport as CRAXDRT.Report

设置oReport = oCrystal.OpenReport（" C：\ myreport.rpt"）

对于iSectionCounter = 1到oReport.Sections.Count

带有oReport.Sections（iSectionCounter）

对于iObjectCounter = 1到.ReportObjects.Count

使用.ReportObjects如果.Item（iObjectCounter）.Kind = crSubreportObject然后

设置oSubReportObject = .Item（iObjectCounter）

将oSubreportLinks设置为CRAXDRT.SubreportLinks

将oSubReportObject设置为CRAXDRT.SubreportObject

设置oSubreportLinks = oSubReportObject.Links（错误发生）

对于iLinks = 1到oSubreportLinks.Count

sUsedFields = sUsedFields＆oSubreportLinks.Item（iLinks）.MainReportField.Name＆"，"

下一个iLinks

如果

结束

以

结尾

下一个iObjectCounter

以

结尾

下一个iSectionCounter

我找到了解决方案。 要获得没有许可证错误的子报表链接是..

将oReport视作CRAXDRT.Report

设置oReport = oSubReportObject.OpenSubreport

oReport.RecordSelectionFormula