Try
Me.TSfinalprintDataSetTableAdapter1.Fill(Me.TSfinalprintDataSet.TSfinalprintDataSetTable)
Catch ex As System.Exception
'An error has occurred while filling the data set. Please check the exception for more information.
System.Diagnostics.Debug.WriteLine(ex.Message)
End Try
The TSfinalprintDataSet.xsd
shows the connection as TSfinalconnection(Mysettings) with the correct values (other features are using the same connection string and are working), It shows the adapter as TSfinalprintDataSetTableAdapter and the dataset table as TSFinalprintDataSetTable. Note that in the TSFinalPrint.vb InitializeComponent section it lists TSfinalprintDataSetTableAdapter1. Is this correct?
The Web application runs fine and displays the report in the viewer but the form is empty.
I have gone over many of the videos and documentation and am not able to resolve this problem.
If anyone can offer some assistance I would be thankful.
Cliff
Hi,
I am having heaps of trouble converting an old report to one based on the new Table control.
On the old report I could create 'column' that incremented a number based on criteria of a DataItem. This used to be run against the detail.ItemDataBinding event. See example below:
Private Sub detail_ItemDataBinding(ByVal sender As Object, ByVal e As System.EventArgs) Handles detail.ItemDataBinding |
Dim detail As Processing.DetailSection = CType(sender, Processing.DetailSection) |
Dim dataItem As DataRowView = CType(detail.DataItem, DataRowView) |
'new project id |
If m_CurrentProjectID <> dataItem("ProjectID") Then |
'reset project total |
If m_CurrentProjectID <> -1 Then IncrementInvoiceNo() |
m_CurrentProjectID = dataItem("ProjectID") |
m_CurrentClientID = dataItem("ClientID") |
' m_totalInvoiceCost += dataItem("TotalAmount") |
ElseIf m_CurrentClientID <> dataItem("ClientID") Then |
'reset client total |
If m_CurrentClientID <> "" Then IncrementInvoiceNo() |
m_CurrentClientID = dataItem("ClientID") |
' m_totalInvoiceCost += dataItem("TotalAmount") |
End If |
m_totalInvoiceCost += dataItem("TotalAmount") |
End Sub |
Now though, I am binding my data against a Prossessing.Table . i.e.
Me.Table1.DataSource = l_dt.DefaultView |