>>This should be a little bit better:
>>
>>

>>                        ' Based on the SQL mode
>>                        Select Case nSQLMode
>>
>>                            ' OleDb
>>                            Case 1
>>
>>                                Using loOleDbConnection As New OleDbConnection(cConnectionString)
>>                                    loOleDbConnection.Open()
>>                                    oCommand.Connection = loOleDbConnection
>>                                    nResult = oDataAdapter.SelectCommand.ExecuteNonQuery()
>>                                End Using
>>
>>                                ' SQLClient
>>                            Case 2
>>
>>                                Using loSQLConnection As New SqlConnection(cConnectionString)
>>                                    loSQLConnection.Open()
>>                                    oCommand.Connection = loSQLConnection
>>                                    nResult = oDataAdapter.SelectCommand.ExecuteNonQuery()
>>                                End Using
>>
>>                                ' ODBC
>>                            Case 3
>>
>>                                Using loOdbcConnection As New OdbcConnection(cConnectionString)
>>                                    loOdbcConnection.Open()
>>                                    oCommand.Connection = loOdbcConnection
>>                                    nResult = oDataAdapter.SelectCommand.ExecuteNonQuery()
>>                                End Using
>>
>>                        End Select
>>

Could be shorter :-} :

        Using loOleDbConnection As New OleDbConnection(cConnectionString)
>            loOleDbConnection.Open()
>            oCommand.Connection = loOleDbConnection
>            Select Case nSQLMode
>                ' OleDb
>                Case 1
>                    nResult = oDataAdapter.SelectCommand.ExecuteNonQuery()
>                    ' SQLClient
>                Case 2
>                    nResult = oDataAdapter.SelectCommand.ExecuteNonQuery()
>                    ' ODBC
>                Case 3
>                    nResult = oDataAdapter.SelectCommand.ExecuteNonQuery()
>            End Select
>        End Using

Could still be shorter. I wonder what the case is for