2013-02-03 69 views
0

这是我的代码:该报告有没有表错误

Dim ds As New DataSet1 
    Dim cnn As SqlConnection 
    Dim con1 As String = "Data Source=;Initial Catalog=;Integrated Security=True" 
    Dim sql As String = "SELECT * FROM POBasket where POBNumber='" + txtorderno.Text + "'" 
    cnn = New SqlConnection(con1) 
    cnn.Open() 
    Dim dscmd As New SqlDataAdapter(sql, cnn) 
    Dim dscrystal As New DataSet1 
    dscmd.Fill(dscrystal, "POBasket") 
    cnn.Close() 

    Dim report As CrystalReport1 = New CrystalReport1 
    report.SetDataSource(dscrystal.Tables("POBasket")) 
    report.SetParameterValue("ProductName", "+") 
    poreport.pocrystalviewer.ReportSource = report 
    poreport.pocrystalviewer.Refresh() 
    poreport.Show() 

我总是得到错误:

该报告有没有表

请帮帮我!

+0

如果你真的发布了一些关于[这个问题]的反馈(http://stackoverflow.com/questions/14671504/create-crystal-report-programmatically),你会问,而不是问一个新的问题。至少我会知道我的回答有些不妥。 – AbZy

+0

抱歉。我试过了,但没有奏效。不管怎么说,还是要谢谢你 – tristan

回答

0

使用下面这段代码:的

report.database.table[0].setdatasource(dscrystal.Tables("POBasket")) 

代替

report.SetDataSource(dscrystal.Tables("POBasket")) 

它为我工作。

我认为它会帮助你。

相关问题