Page 2 of 2
Re: FiveDBU con soporte de ADO
Posted:
Sun May 26, 2013 4:59 pmby cnavarro
Buenas tardes
Me da un error al intentar abrir bases de datos con nombre menor a 8 caracteres.
Un saludo
Re: FiveDBU con soporte de ADO
Posted:
Sun May 26, 2013 6:09 pmby Antonio Linares
Cristobal,
Usando ADO ó una DBF ? Las DBFs las abre bien (acabo de probar con samples/data.dbf)
Re: FiveDBU con soporte de ADO
Posted:
Sun May 26, 2013 7:21 pmby cnavarro
Antonio, una DBF con ADO
Saludos
Re: FiveDBU con soporte de ADO
Posted:
Sun May 26, 2013 7:43 pmby Antonio Linares
Que error te aparece ?
Re: FiveDBU con soporte de ADO
Posted:
Sun May 26, 2013 8:44 pmby cnavarro
Antonio
Uploaded with
ImageShack.usLa primera base de datos la abre sin problemas
En el resto me da el error que aparece
Comentarte que estoy empezando con este tema, por lo que es la conclusion que he sacado.
Saludos
Re: FiveDBU con soporte de ADO
Posted:
Sun May 26, 2013 9:02 pmby Antonio Linares
Cristobal,
Este cambio en la línea 393 de FiveDbu debe solucionarlo:
- Code: Select all Expand view
if ' ' $ cTable
cTable = '[' + AllTrim( cTable ) + ']'
endif
Te agradezco si lo pruebas y me comentas, gracias
Re: FiveDBU con soporte de ADO
Posted:
Sun May 26, 2013 9:59 pmby cnavarro
Antonio
He añadido en la linea 815 la variable oError, para evitar el WARNING
He puesto sólo RTRIM en lugar de ALLTRIM y funciona perfectamente, por si se pueden llegar a usar nombres largos con espacios en medio (no se si eso se puede en algun entorno).
Al linkar con tu buildh da error de que no encuentra _HB_FUN_EXECUTE, he creado una funcion Execute(); Return nil
pero me gustaría saber si esa funcion existe en alguna libreria o es codigo tuyo.
Gracias por todo y saludos
Re: FiveDBU con soporte de ADO
Posted:
Sun May 26, 2013 10:05 pmby Antonio Linares
Execute() es una función de FWH pero solo para Harbour, ya que xHarbour no la soporta.
Re: FiveDBU con soporte de ADO
Posted:
Sun May 26, 2013 10:06 pmby cnavarro
Yo uso Harbour, que libreria he de añadir, o a partir de que version está soportada en FWH?
Saludos
Re: FiveDBU con soporte de ADO
Posted:
Sun May 26, 2013 10:07 pmby Antonio Linares
hbcplr.lib
Re: FiveDBU con soporte de ADO
Posted:
Sun May 26, 2013 10:11 pmby cnavarro
La tengo incluida, uso tu buildh.bat de FWH, pero me sigue dando el mismo error de linkado
Re: FiveDBU con soporte de ADO
Posted:
Mon May 27, 2013 6:59 amby Antonio Linares
La función Execute() se incluyo en FWH a partir de la versión 12.07
- Code: Select all Expand view
function Execute( cCode, ... )
local oHrb, cResult, bOldError, uRet
local cFWheaders := If( lIsDir( ".\include" ), ".\include", "c:\FWH\include" )
local cHBheaders := If( lIsDir( ".\include" ), ".\include", "c:\harbour\include" )
FReOpen_Stderr ( "comp.log", "w" )
oHrb = HB_CompileFromBuf( cCode, "-n", "-I" + cFWheaders, "-I" + cHBheaders )
if ! Empty( oHrb )
BEGIN SEQUENCE
bOldError = ErrorBlock( { | o | DoBreak( o ) } )
uRet = hb_HrbDo( hb_HrbLoad( oHrb ), ... )
END SEQUENCE
ErrorBlock( bOldError )
endif
return uRet
//----------------------------------------------------------------//
#pragma BEGINDUMP
#include <stdio.h>
#include <hbapi.h>
HB_FUNC( FREOPEN_STDERR )
{
hb_retnl( ( HB_ULONG ) freopen( hb_parc( 1 ), hb_parc( 2 ), stderr ) );
}
Re: FiveDBU con soporte de ADO
Posted:
Mon May 27, 2013 8:11 amby cnavarro
Ha quedado OK, añadiendo la funcion DoBreak() que he encontrado en el foro
- Code: Select all Expand view
static function DoBreak()
BREAK
return nil
Gracias
Re: FiveDBU con soporte de ADO
Posted:
Sat Aug 03, 2013 1:28 pmby Antonio Linares
Hemos publicado una versión revisada de FiveDBU que corrige un error en la edición de campos memo. Ahora esta bien
https://code.google.com/p/fivewin-contributions/downloads/detail?name=fivedbu_20130803.zip
