> Using loSQLConnection As New SqlConnection(oApp.aConnection(nConnectionString, 1)) > oCommand.Connection = loSQLConnection > oDataAdapter.Fill(oDataSet) > End Using > > ' Adjust to our default name > oDataSet.Tables("Table").TableName = "Temp" > > ' Record count > nCount = oDataSet.Tables("Temp").Rows.Count > > oDataView = New DataView > > ' If we have no record > If nCount = 0 Then > oRows = Nothing > Else > oDataView = oDataSet.Tables("Temp").DefaultView > oRows = oDataSet.Tables("Temp").Rows() > End If >>
> ' Sort the dataset into the primary key > oData.oDataView.Sort = "AI" > > ' For each record > For lnCounter = 0 To oData.nCount - 1 > loRow = oData.oRows(lnCounter) > > Next >So, as mentioned, you are NOT looping thru the sorted DataView (oDataView) but thru oData