SQL Server con OleDb

Buen día, estoy dando mis primeros pasos en .NET así que sepan disculparme
si les parece simple la pregunta. Estoy intentando conectarme a Sql Server
con OleDb unsando código y hasta ahora no lo he logrado. Les paso parte

código:

Dim adap As OleDb.OleDbDataAdapter
Dim ds As DataSet
Dim conn As OleDb.OleDbConnection
Dim strconn As String = "Provider=SQLOLEDB.1;" & _
"packet ;" & _
"integrated security=SSPI;" & _
"persist security info=False;" & _
"Data Source=MiBaseDeDatos;"

conn = New OleDb.OleDbConnection(strconn)
adap = New OleDb.OleDbDataAdapter("SELECT * FROM Login ORDER BY

conn)
adap.Fill(ds)

En esta última línea, cuando se supone que el DataAdapter tiene que

los datos en el DataSet me da el siguiente error:

El valor no puede ser nulo. Nombre del parámetro: dataSet
Descripción: Excepción no controlada al ejecutar la solicitud Web actual.
Revise el seguimiento de la pila para obtener más información acerca del
error y dónde se originó en el código.

Detalles de la excepción: System.ArgumentNullException: El valor no puede
ser nulo. Nombre del parámetro: dataSet

También prové con:

Dim strconn As String = "Provider=SQLOLEDB.1;Data
Source=MiBaseDeDatos;"

Puse un break point en adap.Fill(ds) y miré el estado del objeto conn y vi
lo siguiente:

conn {System.Data.OleDb.OleDbConnection}
ConnectionString "Provider=SQLOLEDB.1;Data Source=MiBaseDeDatos;"
ConnectionTimeout 15
Container Nothing System.ComponentModel.IContainer
Database ""
DataSource "MiBaseDeDatos"
Provider "SQLOLEDB.1"
ServerVersion <error: an exception of type:
{System.InvalidOperationException} occurred>
Site Nothing System.ComponentModel.ISite
State Closed System.Data.ConnectionState

Por favor, ¿podrían decirme qué es lo que estoy haciendo mal?. Desde ya
muchas gracias.

Buen día, estoy dando mis primeros pasos en .NET así que sepan disculparme
si les parece simple la pregunta. Estoy intentando conectarme a Sql Server
con OleDb unsando código y hasta ahora no lo he logrado. Les paso parte

código:

Dim adap As OleDb.OleDbDataAdapter
Dim ds As DataSet
Dim conn As OleDb.OleDbConnection
Dim strconn As String = "Provider=SQLOLEDB.1;" & _
"packet ;" & _
"integrated security=SSPI;" & _
"persist security info=False;" & _
"Data Source=MiBaseDeDatos;"

conn = New OleDb.OleDbConnection(strconn)
adap = New OleDb.OleDbDataAdapter("SELECT * FROM Login ORDER BY

conn)
adap.Fill(ds)

En esta última línea, cuando se supone que el DataAdapter tiene que

los datos en el DataSet me da el siguiente error:

El valor no puede ser nulo. Nombre del parámetro: dataSet
Descripción: Excepción no controlada al ejecutar la solicitud Web actual.
Revise el seguimiento de la pila para obtener más información acerca del
error y dónde se originó en el código.

Detalles de la excepción: System.ArgumentNullException: El valor no puede
ser nulo. Nombre del parámetro: dataSet

También prové con:

Dim strconn As String = "Provider=SQLOLEDB.1;Data
Source=MiBaseDeDatos;"

Puse un break point en adap.Fill(ds) y miré el estado del objeto conn y vi
lo siguiente:

conn {System.Data.OleDb.OleDbConnection}
ConnectionString "Provider=SQLOLEDB.1;Data Source=MiBaseDeDatos;"
ConnectionTimeout 15
Container Nothing System.ComponentModel.IContainer
Database ""
DataSource "MiBaseDeDatos"
Provider "SQLOLEDB.1"
ServerVersion <error: an exception of type:
{System.InvalidOperationException} occurred>
Site Nothing System.ComponentModel.ISite
State Closed System.Data.ConnectionState

Por favor, ¿podrían decirme qué es lo que estoy haciendo mal?. Desde ya
muchas gracias.