La Web del Programador: Comunidad de Programadores
 
    Pregunta:  12 - ARCHIVOS BTRIEVE
Autor:  J.Carlos
Tengo unos programas de gestión hechos en THE BRAIN, es una utilidad de programación que utiliza ficheros BTRIEVE, el caso es que THE BRAIN ha desaparecido y no ha evolucionado desde MS-DOS, ahora estoy comenzando a programar en VISUAL BASIC y no sé si puedo tener acceso a dichos ficheros BTRIEVE sin tener el correspondiente soft BTRIEVE dado que solo tengo los runtime de dicha utilidad.
Mi pregunta es que si puedo acceder con VB a estos ficheros, y que si alguien conoce algún manual de funcionamiento de BTRIEVE.
Gracias. J.Carlos.

  Respuesta:  John Sánchez
En sencillo, simplemente en un .bas introduce la llamada a la siguiente librería siguiente:

Declare Function GetVolumeInformation Lib "kernel32" Alias "GetVolumeInformationA" (ByVal lpRootPathName As String, ByVal lpVolumeNameBuffer As String, ByVal nVolumeNameSize As Long, lpVolumeSerialNumber As Long, lpMaximumComponentLength As Long, lpFileSystemFlags As Long, ByVal lpFileSystemNameBuffer As String, ByVal nFileSystemNameSize As Long) As Long
En el form introduce el siguiente codigo:
NVolSize = 0: NVolNumber = 0: NMaxCompLength = 0
NFileSFlags = 0: NFileSBuffer = 0: NFileSNames = 0
Ruta = UCase(Left(Ruta, 1)) & ":\"
ChDrive Ruta
Nombre = Dir(Ruta, vbVolume)
ret = GetVolumeInformation(Ruta, Nombre, NVolSize, NVolNumber, NMaxCompLength, NFileSFlags, NFileSBuffer, NFileSNames)

If ret = 0 Then Label1.Caption = "Numero de Serie del Volumen : " & Left(Hex(NVolNumber), 4) & "-" & Right(Hex(NVolNumber), 4) & vbCrLf & "Nombre del Volumen : " & Nombre

Eso es todo buena suerte.

  Respuesta:  Angel
A mí me salieron los dientes, en la informática claro, usando Btrieve, los conozco muy bien. No se de cuando es tu mensaje, pero a los ficheros Btrieve puedes acceder a través de SQL. Entra en Pervasive, www.pervasive.com, bajate la demo del servidor de datos, ahí podras hacer todo lo que quieras y necesites con los ficheros. Pervasive es el propietario del antiguo motor Btrieve de Novell.

  Respuesta:  Txema Cancio
Yo trabajo para una casa de software de gestión que trabaja bajo MS-Dos y bajo windows con BTRIEVE 6.0 el driver que poseo es el de ODBC-32 PARA BTRIEVE y funciona perfectamente, lo que pasa es que vas a notar un cierto retraso en tus refresh de la base. Aún así yo te recomendaría trabajar con el ACCESS 2.0 que incorpora el driver de acceso directo a la base btrieve (file.ddf pre-generado) y luego que lo intentaras con el Visual Basic 5.0, a mi me va muy bien.

  Respuesta:  José Luis
Nunca he hecho conexión con las Btrieve, pero se que en "rambla informática", http://www.ramblainf.com tienen o tenían un producto para conectar VB con ficheros Btrieve. Se llama VBtrv.
Si te quieres poner en contacto con ellos, su teléfono es 93-5402982

  Respuesta:  Marco A. Huitron Q.
Si encontraste problemas para manejar bases de datos en Btrieve por que la version es muy antigua, puedes usar la Libreria que se llama "BTRCALL.DLL" yo puedo enviarte este archivo y un programa de ejemplo si aun te interesa

  Respuesta:  Alex
En la empresa donde laboro programamos en Magic Pc usanda ficheros de Btrieve y te dire que ya realize pruebas con btrieve pero solo pude leer los archivos con Visual Basic 4.0 16 bits, por otra parte he estado tratando de conseguir los ODBC para Windows 95 que distribuye INTERSOLV (www.intersolv.com)con los cuales supuestamente podre ver los ficheros de Btrieve con Visual Basic de 32 bits.

  Respuesta:  J. Castellanos
Actualmente yo trabajo con archivos de Btrieve y he encontrado dos opciones para accesar archivos de Btrieve desde vb50 (aunque tambien funcionan con vb40)

1. ODBC Drivers de INtersolv
2. ODBC Drivers de Pervasive

si aún te interesa te puedo enviar los drivers