La Web del Programador: Comunidad de Programadores
 
    Pregunta:  9556 - PROBLEMAS CON MENEJO DE TABLAS DE FOXPRO 3.0
Autor:  sonia vallejo
¡¡¡por favor alguien ayudenme ya que soy novata!!!
necesito por favor me indiquen como puedo desde Visual Basic enlazarme a una base de datos de Visual fox Pro 3.0 desde un formulario donde pueda agregar, borrar, registros donde las tablas se encuentran en distintas base de datos.

lo he intentado con data control pero me manda un mensaje "Cannot access the FoxPro 3.0 bound dbf file" ya sea con control data o por medio "DAO"

si alguien me puede ayudar se lo agradeceria muchisimo

gracias a todos

  Respuesta:  Arturo Hernández Reyna

Mira sonia, yo trabajo con bd de Visual Fox, solo que las manejo en ASP
pero el acceso lo hago con VBScript.

Te envio un ejemplo para que hagas una prueba y si tienes alguna
duda, mandame un correo para ver que podemos hacer.

ConnString = "DRIVER={Microsoft Visual FoxPro Driver};DBQ=" & Ruta
& ";SourceType=DBC"

Con esto tienes un variable en la cual le dices que driver utilizar, el
nombre de la BD y el tipo de BD.

sSql = "SELECT * FROM TableName

Con esta otra variable Tienes un query para accesar a la tabla ( el query
te devuleve todos los campos y registros de la tabla, ya que tambien
puedes elegir que campos y que registros mostrar)

Set adoRS = Server.CreateObject("ADODB.Recordset")

Con esta Variable creas un Recorset ( En VBScrip, en VB Creo que
Dimensionas la variable de Tipo Recorset "Dim adoRS as Recorset ")

adoRS.Open sSql,ConnString,0,1

Con esto abres la tabla para poder accesar a los registros y ya puedes
manipularlos como tu quieras.

Espero que te sirva...

Nota: La ruta puede ser tu PC on servidor, para un servidor te envio este
ejemplo Server.MapPath("/Dir1/Dir2/DBName.dbc").
Si fuera en tu maquina lo haces de esta manera:
"c:\dir1\dir2\DBName.dbc"