Lo stesso codice funziona anche con l'SQLServer, è sufficiente modificare le chiamate alle funzione da OleDb a Sql:

OleDbCommand -> SqlCommand
OldDbConnection -> SqlConnection
OldDbDataReader ->SqlDataReader

Importando il giusto namespace:
Imports System.Data.SqlClient

Il resto non cambia nulla. :gren:
Ciao
'Alchimista'