From: Carlos G. A. <car...@te...> - 2003-07-09 08:19:41
|
Hello: > The complete code is : > svrCommonConnection.Open() > Dim recCount > Dim myTxn As FbTransaction = > svrCommonConnection.BeginTransaction() > > Dim objDataAdapter As New > FbDataAdapter(strCommonQry, svrCommonConnection) > objDataAdapter.SelectCommand = New > FbCommand(strCommonQry, svrCommonConnection, myTxn) > Dim objCmdBuilder As New > FbCommandBuilder(objDataAdapter) > Dim objDataSet As New DataSet() > > objDataAdapter.Fill(objDataSet, > varTableName) > objDataView = > objDataSet.Tables(0).DefaultView > fnSetGridRows(dgObject, > objSelCombo.SelectedItem.Value) > fnTogglePaging(dgObject, > objDataView.Count) > dgObject.DataSource = objDataView > dgObject.DataBind() > recCount = objDataView.Count > svrCommonConnection.Close() > objDataView.Dispose() > > Its giving me error at dgObject.DataBind() I'm making a new test with this code: FbConnection connection = new FbConnection(connectionString); connection.Open(); FbTransaction transaction = connection.BeginTransaction(); FbDataAdapter adapter = new FbDataAdapter("select * from ENGLISH order by English.var DESC", connection); adapter.SelectCommand.Transaction = transaction; FbCommandBuilder builder = new FbCommandBuilder(adapter); DataSet ds = new DataSet("ENGLISH"); adapter.Fill(ds, "ENGLISH"); adapter.Dispose(); dataGrid1.SetDataBinding(ds, "ENGLISH"); connection.Close(); This binds a DataSet to a DataGrid and all is working as expected. I think the problem can be in: fnSetGridRows(dgObject, objSelCombo.SelectedItem.Value) fnTogglePaging(dgObject, objDataView.Count) But i don't know what this methods does. One thing, this code is bad: > Dim objDataAdapter As New > FbDataAdapter(strCommonQry, svrCommonConnection) > objDataAdapter.SelectCommand = New > FbCommand(strCommonQry, svrCommonConnection, myTxn) Make it as: Dim objDataAdapter As New FbDataAdapter(strCommonQry, svrCommonConnection) objDataAdapter.SelectCommand.Transaction = myTxn; Or as: Dim objSelectCommand as New FbCommand(strCommonQry, svrCommonConnection, myTxn) Dim objDataAdapter As New FbDataAdapter(objSelectCommand) -- Best regards Carlos Guzmán Álvarez Vigo-Spain |