连接数据库

Question

 连接数据库出现这个错误:  TInvalid report file path.  Dim cmdsql As New SqlCommand
        Dim connsql As New SqlConnection
        Dim strcmd As String
        Dim adasql As New SqlDataAdapter
        Dim dssql As New DataSet
        connsql.ConnectionString = "server=.;Database=Stock;Integrated Security=SSPI"
        strcmd = "select  *  from product1"
        'cmdsql = New SqlCommand(strcmd, connsql)
        adasql = New SqlDataAdapter(strcmd, connsql)
        connsql.Open()
        dssql = New DataSet()
        adasql.Fill(dssql, "tblcaijianxixi")
        connsql.Close()
        ReportDoc.SetDataSource(dssql.Tables("tblcaijianxixi"))
        CrystalReportViewer1.ReportSource = ReportDoc

Answer 1

因为你用的是ReportDoc（非类型化的报表）而不是一个具体的.rpt(报表)文件，所以你不能使用数据集给报表推进数据，你要使用指定报表文件拉数据的方式来让报表得到数据；具体如下:   
  ReportDoc.ObjectType=CrystalDecisions.Shared.EnumServerFileType.REPORT  
  ReportDoc.ReportPath(你的报表文件.rpt文件的具体路径，相对或者绝对都可以)    this.CrystalReportViewer1.ReportSource=ReportDoc;