FiveTech Software tech support forums

Buena inciciativa, Me apunto!!.
Cual es la mejor combinación para llegar a Silliam, imagino que via Innsbruck.

Hace tiempo que no uso ODBC, pero en su dia usaba esta función para crear DSN #include "Fivewin.ch" FUNCTION CfgOdbc()    LOCAL nRet,cDriver,cAttribute    cDriver   :="Client Access ODBC Driver (32-bit)"    cAttribute:="DSN=BIEL"+Chr(0)+"DESCRIPTION=descipcion"...

Estos métodos de xBrowse utilizan la clase DataRow (DataRow.prg).

Espectacular Cristobal , enhorabuena gran trabajo.

karinha wrote:Biel, una duda: el resultado és en: Bytes, Mega Bytes? Ó Giga Bytes? gracias, saludos.

El resultado se expresa en KB, pero puedes ajustar el retorno a la unidad que desees, simplemente cambiando divisior.

karinha wrote:Biel, cual és el comando equivalente en xHarbour de hb_ProgName()? Gracias, saludos.

Puedes probar hb_ArgV() que creo que existe en xHarbour, o ExeName().
En cualquier caso puedes llamar la función pasandole como parametro el nombre de tu programa.

FUNCTION Main()     ?  WorkingSetPrivate() RETURN NIL //----------------------------------------------------------------------------- FUNCTION WorkingSetPrivate(cName)    /*Biel Maimo 2016*/    LOCAL oLocator,oWmi,oList, oProc    LOCAL aList:={}    IF cName==NIL       cName := SubStr(hb_ProgName(),...

Me disponia a usar la propiedad de fusión de celdas (combinación quizas mejor traducido), en definitiva Merge Vertical de xBrowse. Y la idea era en un browse visualizar diferentes albranes de ventas, y fusionar las filas número, fecha y total si correspondian aun mismo albarán, y visualizar el detal...

Como te comenta Armando, para lo primero SELECT last_insert_id() //último autoincremental creado, no le indicamos tabla, es el [b]último creado[/b] o SELECT auto_increment FROM information_schema.tables WHERE table_schema='BaseDeDatos' AND table_name='Tabla'   Paradojicamente el metodo que propone E...

HINTERNET InternetConnect(   _In_ HINTERNET     hInternet,   _In_ LPCTSTR       lpszServerName,   _In_ INTERNET_PORT nServerPort,   _In_ LPCTSTR       lpszUsername,   _In_ LPCTSTR       lpszPassword,   _In_ DWORD         dwService,   _In_ DWORD         dwFlags,   _In_ DWORD_PTR     dwContext ); dwF...

En Harbour solo admite dos parámetros para mantener su compatiblidad con Clipper, pero dispones de la función hb_At( <cSearch>, <cString>, [<nStart>], [<nEnd>] ) --> nPos

Gran trabajo, muchisimas gracias Rafa.

Cristobal, es una versión modificada, o es la misma que ha en fivewin-contributions, si es más nueva podrias subirla a fivewin-contributions, o en su defecto pasarmela por mail bmaimo at gmail.com

Gracias.

La solución que te aporta Carlos te funcionará correctamente.

También puedes hacerlo directamente con el uso de las funciones,

__objModMethod( <oObject>, <cMethodName>, <nFuncPtr> ) //<nFunCprt> se debe pasar por referencia
__objAddData( <oObject>, <cDataName> )

Puedes incluirlo en el fichero de recursos usando RCDATA.

http://bielsys.blogspot.com.es/2009/04/ ... ca-de.html

Aquí explico como incluir y recuperar un exe en el fichero .RC, en teoria con una DLL debiera funcionarte bien.