22/10/2005, 22:11
|
 | | | Fecha de Ingreso: septiembre-2005 Ubicación: Usulután, El Salvador
Mensajes: 477
Antigüedad: 19 años, 6 meses Puntos: 1 | |
| Bueno, yo tengo una cadena de conexion diferente, pero es para una BD de VFP6, la cadena es: "Provider=MSDASQL.1;Persist Security Info=False;Extended Properties="DSN=Visual FoxPro Database;UID=;SourceDB=RutaBD\bd.dbc;SourceType=DB C;Exclusive=No;BackgroundFetch=Sí;Collate=Machine; ""
Y la tienes que usar con ADO...
En tu proyecto añade la referencia ActiveX Data Objects 2.7 Library.
Luego debes declarar una conexion y los recordsets que necesites asi:
Dim cnx as Connection
Dim rsTabla as Recordset
Set cnx.ConnectionString = "Provider=MSDASQL.1;Persist Security Info=False;Extended Properties="DSN=Visual FoxPro Database;UID=;SourceDB="&Ruta\bd.dbc&";SourceType= DBC;Exclusive=No;BackgroundFetch=Sí;Collate=Machin e;""
cnx.Open
' La siguiente linea es para seleccion de datos
Set rsTabla = cnx.Execute("SQL")
' Si quieres manipular registros con INSERT INTO, DELETE, O UPDATE hazlo asi
cnx.Execute "sentencia SQL"
Ojo: Para añadir referencias haz la siguiente seleccion..
Menu Proyecto->Referencias...
En el cuadro de dialogo selecciona la que necesitas.
Espero te sirva de algo
Saludos!!! |