conectar base de datos?

[Maxi.Net]

hola:
¿Cómo puedo conectar una base de datos access a "mano" (sólo con código) en vb.net ? es decir, sin utilizar el control OleDbDataAdapter, y a la vez generar el DataSet(sólo con código).

la idea es:
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(directorio & "/vendedores.mdb") & ";User Id=admin;Password=;"

pero no se como declarar las variables, ni de que tipo, ni como asignarle el parametro.

Graciassssss......

[alehawk]

Pone la referencia a adodb y despues en un modulo:
Public MasterConn As New ADODB.Connection
Public MasterAccessConnect = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Application.StartupPath & "\Master.mdb"
Public MasterRs As New ADODB.Recordset

En la app.:
MasterConn.ConnectionString = MasterAccessConnect
MasterConn.Open(MasterAccessConnect)
MasterRs = New ADODB.Recordset
MasterRs.Open("SELECT * FROM config", MasterConn, ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockOptimistic)

[FNX_NET]

aqui te va esto

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim conexion As System.Data.OleDb.OleDbConnection
Dim StrConexion As String
Dim DS As System.Data.DataSet
Dim adaptador As System.Data.OleDb.OleDbDataAdapter
Dim StrComando As String

' conecta el origen con la base de dato de microsoft access
StrConexion = "provider=Microsoft.Jet.OLEDB.4.0;Password ='miclave';UserID=Admin;Data Soucer=C:\basedatos.mdb;"

' se asigna a la conecion el string de conecion (valga de rabundancia de conexion :P)
conexion = New OleDb.OleDbConnection(StrConexion)

' asigna la tabla que tomara el adaptador
StrComando = "SELECT * FROM tabla"

'se crea el adaptador
adaptador = New OleDb.OleDbDataAdapter(StrComando, StrConexion)

'se conecta y obtiene las filas, las cules seran almacenadas en ds (un data adapter)
adaptador.Fill(DS, "tabla")

'' si se requiera cargar el dataset con otras tablas solo se deben crear
'' nuevas variables
''obvio abre la conexion
conexion.Open()
''lo que se quiera hacer con las tablas y base de datos ,
''pero se tiene que recordar que esta forma extrae la las tablas
'' y se requiere del update para que los combio que se haga a la base
'' ocurran eso :P

'' y mas obvio cierra la conexion
conexion.Close()


End Sub
End Class

[CALO3004]

hOLAS :

PUCHA USE TU CODIGO PERO CUANDO LO PONGO ME SALE Q EL "DS" ya ta siendo usada :S no se porq me podrias explicar eso