Dim vcon = connobj.makeConnection() Dim vTrans = vcon.BeginTransaction(Data.IsolationLevel.ReadCommitted) Dim qry1 = "Select * from testdemo" Dim ds As New DataSet Dim da = New OdbcDataAdapter(qry1, vcon) da.SelectCommand.Transaction = vTrans da.Fill(ds, "Table") vTrans.Commit()
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)