> Hace tiempo realice una aplicacion utilizando Dbase y ahora necesito
parte
> de esos datos parsarlos a otro aplicacion que he hecho con VB5.Alguien
me
> podria ayudar para pasar estos datos escribiendo el codigo
correspondiente.
> A la espera de vuestras gratas noticias os saluda atentamente.
Dim DbMdb AS DataBase
Dim NewRs AS RecordSet
' El opendatabase lo que hace es abrir el DIRECTORIO donde se hallen las
bases de datos DBF.
Set dbMDB = OpenDatabase("", True, False, "dBASE
III;database=c:\MiDir\MisDbfs")
' Abre un RecordSet.
' Realmente, lo que abre es UNA DE LAS BASES DE DATOS. Cli, en mi caso.
Set NewRs = DbMDB.OpenRecordSet("SELECT * FROM Cli ORDER BY Cli_Cod")
' A partir de aquí, el Recordset puede manipularse como cualquier otro.
Saludos.
Una obediencia ciega supone siempre una ignorancia extrema.
ORZO, <orzo@orzo.com>