FiveTech Software tech support forums

Lucho:

Todo Lo que mencionas lo puedes hacer con ADO + FW, nada extra.

ADO son 7 comandos SQL, FW?, pues ya lo conoces.

Date un vuelta por el siguiente LINK

http://www.recursosvisualbasic.com.ar/h ... es/ado.htm

O busca ADO en San Google y veras que hay mucha literatura.

Saludos

... numerodoc TO .\DATA\cabecera GO TOP DO WHILE NOT EOF() .... ....

¿Existe alguna función de FW similar a SQLEXEC ?.

Saludos.
Atte.
Lucho Montero.
Lima - Perú.
---------------------------------------------------------------------------------------------
FW + xHarbour 1.2.3 + ADO ...

... solucionó?.
Lo que hice fue compilar los fuentes actuales de xHarbour y he obtenido la versión de Junio 2016 y ahora las consultas son rápidas e incluso más que VB.

Saludos.
Atte.
Lucho Montero.
Lima - Perú.
-----------------------------------------------
FW + xHarbour 1.2.3 + ADO + Borland C 5.8.2

Hola Lucho,,,
ve esto..

oPdf:PdfSetFont( "COURIER NEW", 0, nFontPdf )opdf:Pdfnewpage("A4","P")oPdf:Pdfimage(".\BMP\svite.jpg", cm2dpi(2.5), 0, 580, 60)//PdfSay(oPdf, _DELEN3(oApp:cMaster), 2.5, 2.5, "TIMES", BOLD, 10)PdfSay(oPdf, "EMPRESA", 2.5, 2.5, "TIMES", BOLD ...

Jehová DIOS Todopoderoso Bendiga a todos amigos de este foro y también a nuestras familias.
Que nuestros hogares se llenen de amor, paz, felicidad y que DIOS sea propicio a nuestras necesidades.

Abrazo.

Lucho Montero.
Lima - Perú.

... Progress.
En cuanto a la conexion a la BD no tengo problemas pues es rápida, el tema viene por las consultas se tardan mucho.
Te paso este topic en donde estoy detallando el tema.
http://forums.fivetechsupport.com/viewtopic.php?f=6&t=30937

Agradecería mucho tu ayuda.


Saludos.
Atte.
Lucho Montero.

Lucho,

He buscado en google por: "adodb recordset" open performance

y aparecen varios resultados relacionados con el tipo de bloqueo y tambien con el CursorLocation

Has probado a cambiar esos valores y ver si hay alguna diferencia ?

... 40; oError ) RETURN NIL END IF !oRsLocal:EOF() oRsLocal:MoveFirst() ENDIF RETURN oRsLocal

Alguna sugerencia será bien recibida.

Saludos.
Atte.
Lucho Montero.
Lima - Perú.

------------------------------------------------------------
FW 12.04 + xHarbour 1.2.3 + Borland 5.8.2

Lucho,

No es algo de FWH sino de la implementación de OLE de Harbour

lo único que se me ocurre es que falte algo en la configuración que sea lo que causa la diferencia de tiempos.

Lucho,

Le pasas exactamente los mismos parámetros al código de FWH que al de VB6 ?

... Image1.Width, 0) End With With infoBox .Top = Image1.Height + ContourCubeX1.Height .Width = ContourCubeX1.Width .Left = 0 End WithEnd Sub

Saludos.
Atte.
Lucho Montero.
Lima - Perú.
------------------------------------------------------------------------
FW 12.04 + xHarbour 1.2.3 + Borland 5.8.2

Lucho,

Puedes publicar el resto del código en VB6 para compararlos ?

... al Recordset.***/ Dim rs As New ADODB.Recordset rs.CursorLocation = adUseClient rs.Open SQL, cCnx, adOpenStatic Set rs.ActiveConnection = Nothing

Atte.
Lucho Montero.
Lima - Perú.

-----------------------------------------------------------------------
FW 12.04 + xHarbour 123 + Borland 582

Es una noticia muy triste, DIOS le de consuelo y fortaleza a los familiares.
Descansa en paz querido colega.

Lucho Montero.
Lima - Perú.

... Estoy planificando para que a futuro pueda conectarse a cualquier base de datos para extraerlos y consolidarlos en su propia Base de SIC BI; así de esta forma se vuelve en un producto que trabaja con cualquier Software de Gestión. !! Eso sí dejando ya las Dbf/Ntx.!!!

Saludos.
Atte.
Lucho Montero.