Hola..
Bueno estoy por aqui para hacer un planteamiento y una pregunta, a ver:
Antes en VB6 para trabajar con Base de datos access me parecia muy sencillo, lo hacia de la siguiente forma.
-Comenzaba declarando en el formulario esto:
Private Declare Function GetTempFileName
Lib "kernel32"
Alias "GetTempFileNameA" (
ByVal lpszPath
As String,
ByVal lpPrefixString
As String,
ByVal wUnique
As Long,
ByVal lpTempFileName
As String)
As LongPrivate Declare Function GetTempPath Lib "kernel32" Alias "GetTempPathA" (
ByVal nBufferLength As Long,
ByVal lpBuffer As String)
As LongPrivate WithEvents rs
As ADODB.Recordset
Private WithEvents conn
As ADODB.Connection
-----------------------------------------------------------------------------------------------
Luego en cuerpo del formulario hacia lo siguiente para abrir la base de datos:
Dim sql As
StringSet rs =
New ADODB.Recordset
Set conn =
New ADODB.Connection
sql = "SELECT * FROM Tabla"
Call Module1.OpenDataBase(rs, conn, sql) 'esto que llamo aqui lo tenia en un modulo
-------------------------------------------------------------------------------------------
En el modulo tenia el procedimiento que llamo para abrir.
Public Function OpenDataBase(rs As ADODB.Recordset, conn As ADODB.Connection, sql As String)
Dim strConnect
As String Dim strProvider
As String Dim strDataSource
As String Dim strDatabaseName
As String strProvider = "Provider=Microsoft.Jet.OLEDB.4.0;"
strDataSource = App.Path
strDatabaseName = "\BasedeDatos.mdb"
strDataSource = "Data Source=" & strDataSource & strDatabaseName
strConnect = strProvider & strDataSource
conn.CursorLocation = adUseClient
conn.Open strConnect
rs.CursorType = adOpenStatic
rs.LockType = adLockPessimistic
rs.Source = sql
rs.ActiveConnection = conn
rs.Open
End Function
Con esto era feliz..!
Ya con esto podia agregar nuevos registros con: rs.addnew ó podia leer datos de la base con textbox1.text = rs!Nombre y moverme con rs.movenext o
rs.move (12) etc. Para escribir en la base de datos lo hacia con rs!Nombre = textbox1.text rs.update y listo con estos comando me movia y hacia lo que necesitaba con la base datos.
Ahora mi pregunta, Cual es la forma mas sencilla para trabajar con bases de datos en VB2005. Y poder hacer de manera sencilla lo que expreso alli con ese codigo. Es abrir la base, agregar campos, eliminar, moverme a posiciones, leer los datos y eso lo basico que hace con una tabla de access...
Mil perdon, si esta muy largo o no me explico bien. De verdad he buscado guias por internet pero no encuentro nada en español de hecho encontre unos videos muy buenos que me han enseñado mucho estan en ingles. Gracias y ojalan me puedan dar una mano..
