我無法在水晶報表中顯示任何結果

Question

我正在開發一個網絡應用程序，我無法顯示任何結果到我的水晶報表。我不知道我的代碼有什麼問題。請幫忙。

Dim cnn As SqlConnection 
    Dim connectionString As String 
    Dim sql As String 
    connectionString = "data source=SERVERNAME; _ 
    initial catalog=crystaldb;user id=sa;password=PASSWORD;" 
    cnn = New SqlConnection(connectionString) 
    cnn.Open() 
    sql = "SELECT * FROM Grades 
    Dim dscmd As New SqlDataAdapter(sql, cnn) 
    Dim ds As New DataSet1 
    dscmd.Fill(ds, "Grades") 
    objRpt.SetDataSource(ds.Tables(1)) 
    CrystalReportViewer1.ReportSource = objRpt 
    CrystalReportViewer1.RefreshReport() 

Answer 1

我在加載時也遇到了很多問題嘗試這些鏈接。 Try this

Or try this