Visual Basic - No consigo hacer un recordset con ADO

Life is soft - evento anual de software empresarial
 
Vista:

No consigo hacer un recordset con ADO

Publicado por Zemi (7 intervenciones) el 10/06/2004 12:21:24
No consigo hacer un simple recordset con ADO, siempre e trabajado con DAO y me resulta mas facil. No dispongo de MSDN para consultarlo, podriais explicarme paso a paso alguno???? URGE!!!! Gracias de antemano...
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de RAUL
Val: 2
Ha aumentado su posición en 97 puestos en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

RE:No consigo hacer un recordset con ADO

Publicado por RAUL (443 intervenciones) el 10/06/2004 15:23:05
aqui encontraras ejemplos de lo que deseas hacer>
http://www.macroheavy.com/vb/menucurso.html
suerte
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:No consigo hacer un recordset con ADO

Publicado por Ariel (2 intervenciones) el 10/06/2004 19:40:47
Tenés primer que cargar las libreríaas de ADO, Para ello anda al menú proyecto y hace clic en referencias. Después, carga la librería Active Data Object vesión 2.0, qu es la que mejor anda.
1) Anda al formulario y en declaraciones escribís lo siguiente:
Private Withevens Con as ADODB.Connection
Private Wihevents Tabla as ADODB.Recordset.
2) podés ahora crear una function para que tee sirva de conexión y manipulación de tablas.
---------------------------------------------------------------------------------------------
Un código ejemplo sería:

Private Function OpenRegistry()

Set Con=New ADODB.Connection
Set Table = New ADODB.Recordset
With Con
.ConnectionString= Ruta
.Open
End With
With Table
.ActiveConnection= Con
.CursorType = "cliente"
.CursorLocation = "dinámico o no"
.LockType= "Tipo de bloqueo"
.Source= "nombre de la tabla o consulta SQL"
.Open
End With

De quí en más depende lo que deseas hacer.

End Function

Suerte varón, prová a ver que pasa.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar