在线等待。Crystal Report9.0问题，急！

Question

1、打包后安装提示：
"The Microsoft Layer for unicode(unicows.dll) can not be found,This Program will now exit."
2、运行时提示：
  运行时错误429
  ActiveX 不能创建对象。请问如何解决，谢谢！，分不够再加。代码如下：
Private Sub Command1_Click()
Dim RptPath As String  '定义一个变量保存报表路径
  Dim CRY As CRAXDRT.Report
  Dim CRYAT As CRAXDRT.Application
  
  Set CRYAT = New CRAXDRT.Application  RptPath = App.Path & "\Report1.rpt"
  Set CRY = CRYAT.OpenReport(RptPath)
  
  CRViewer91.ReportSource = CRY
  CRViewer91.ViewReport
        
End Sub

Answer 1

把Crystal Report的相关文件添加到安装程序中

Answer 2

http://expert.csdn.net/Expert/topic/2047/2047655.xml?temp=.6340296

Answer 3

第一个问题，你缺少正确的unicows.dll文件，你可以去微软的网站下载这个文件然后安装
第二个问题，你开发环境下安装的水晶报表安装密码，没有api创建报表的权限，所以不能通过代码的newreport方法创建报表

Answer 4

soloon:那要怎么能找到正确的安装密码？告诉我，行了我就准备结帖了。

Answer 5

到下面的地址去看看,应该能帮上忙.
http://expert.csdn.net/Expert/topic/2047/2047655.xml?temp=.6340296

Answer 6

foxspringlight(foxhuzi) :我也是在CSDN本板里找的以前大家提供的下载地址，你可以找找。我记不太清了。