Conexion con Acses ?

[fedefrankk]

Hola a todos, de antemanos gracias por la paciencia ... yo quiero conectarme con acces y vb.net2005.. desde visual basic 6. yo hago asi:

en un modulo pongo esto :

Código PHP:

  Public conectar As New ADODB.Connection
Public apertura As New ADODB.Recordset
Public tabla_asientos As New ADODB.Recordset
Public tabla_plancta As New ADODB.Recordset
Global datos As String
Sub abrir()
conectar.ConnectionString = App.Path + "\plancuenta.mdb"
conectar.Provider = "microsoft.jet.oledb.4.0"
conectar.Open
End Sub
Sub cerrar()
conectar.Close
End Sub  
   

y en cualquier form en un boton pongo asi por ejemplo:

Código PHP:

  Call abrir
X = "Select * from nnos where val  =" & Val(Text1) & " "
apertura.Open X, conectar
If apertura.EOF = True And apertura.BOF = True Then
MsgBox "EL CODIGO NO EXISTE", , "CODIGO"
Text2 = apertura!xxx
Text3 = apertura!xxx
call cerrar  
   

Eso mismo se puede hacer con VB.net 2005?..
si alguien conoce como por favor se lo agradeceria
saludos a todos