关于水晶报表CrystalReports 登录失败的问题，跪求各位高手帮小弟解决一下！

Question

我在做水晶报表的时候，采用push模式，在采用ACCESS数据库是报表都能正常出现，但是采用sql server 或者orcle数据库时，就不能正常显示，老是报以下错误信息：
异常详细信息: CrystalDecisions.CrystalReports.Engine.LogOnException: 登录失败。
我的代码如下：
  Dim rpt As New CrystalReport1
        Dim str As String
        Dim ds As New DataSet
        Dim adapter As OleDbDataAdapter
        str = "select * from V_EMS_REPORTS where to_number(fid)>180 order by to_number(fid)"
        adapter = New OleDbDataAdapter(str, myconn)
        adapter.Fill(ds, "tabel1")
        rpt.SetDataSource(ds)
         Me.CrystalReportViewer1.ReportSource = rpt
        Me.CrystalReportViewer1.DataBind()
我开始以为是水晶报表所在的文件夹权限有问题，但是我把它设成完全共享后还是不能解决，但是在pull模式下报表能正常显示。 
请各位高手帮帮我吧，小弟刚学，不知道问题出在哪里了，谢谢！

Answer 1

rpt 没有定义！
dim rpt=new reportdocument