Conexion de visual basic 6.0 con access 2007

Cerrado
aleja - 27 feb 2010 a las 17:18
 Nardo - 28 nov 2011 a las 07:45
Hola,
ingenieros una preguntica
cuales son las diferentes formas de conexion de visual 6.0 y access2007

1 respuesta

Hay muchas formas de conexion desde mi punto de vista la mas eficiente y elegante y super practica esesta.
bamos a ir por parte: ejemplo:tenemos un formulario agenda y otro venta
1) creamos el nombre de la base de datos por ejemplo'PyMenvases y 2 tablas en access tabla 1(agenda) tabla 2(producto)
2) creamos un modulo de clase y declaramos lo sgte:
Public cn As New ADODB.Connection
Public rs1 As New ADODB.Recordset 'Creamos el objeto Recordset.
Public rs2 As New ADODB.Recordset
3) En Private Sub Form_Load() del formulario ponemos
rs1.Source = "agenda" 'Especificamos la fuente de datos. En este caso la tabla .
rs1.CursorType = adOpenKeyset 'Definimos el tipo de cursor.
rs1.LockType = adLockOptimistic 'Definimos el tipo de bloqueo.
rs2.Source = "producto" 'Especificamos la fuente de datos. En este caso la tabla .
rs2.CursorType = adOpenKeyset 'Definimos el tipo de cursor.
rs2.LockType = adLockOptimistic 'Definimos el tipo de bloqueo.

en cualquier objeto de ese formulario abris de la sigte forma:
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & "DataSource=c:\PyMenvases.mdb"
if rs1.state=0 then 'verifica si esta cerrado el recordest
rs1.open "select * from agenda",cn 'realiza la consulta sql
end if
rs1.close 'cierra el recordest
cn.close 'cierra la conexion
La gran ventaja de trabajar de esta forma es poder de forma abreviada y prolija trabajar con multiplrs tablas abriendo y cerrando lo recordest y a la ves abrindo una sola ves la conexion por objeto. espero que le sirva amigo cualquier pregunta mi e-mail es tierra_riojana@hotmail.com
13
recoda q access trabaja ahora con .accdb no con .mdb
0
2007 mop
0