FiveTech Software tech support forums

#Include "WPRAMQTT.CH" #DEFINE MQTTLIB "paho-mqtt3c.dll" #DEFINE DLL_OSAPI 0x0020 // __stdcall #DEFINE NULL Nil Static nHandle Static ConnLost , MsgArrvd, Delivered Function WPRA101_MQTT() Local nResult if !file( MQTTLIB ) Vt_Aviso("Arquivo " + MQTTLIB ...

... Is there any way to connect MQTT because I already tried: * hbamqp * paho-mqtt3c.dll exempl: conn_opts := "{'M', 'Q', 'T', 'C'}, 8, 60, 1, 1, NULL, NULL, NULL, 30, 0, NULL," conn_opts += "0, NULL, 0, {NULL, 0, 0}, {0, NULL}, -1, 0, NULL, NULL, NULL" DllCall( hHandle, DLL_OSAPI, ...

... Is there any way to connect MQTT because I already tried: * hbamqp * paho-mqtt3c.dll exempl: conn_opts := "{'M', 'Q', 'T', 'C'}, 8, 60, 1, 1, NULL, NULL, NULL, 30, 0, NULL," conn_opts += "0, NULL, 0, {NULL, 0, 0}, {0, NULL}, -1, 0, NULL, NULL, NULL" DllCall( hHandle, DLL_OSAPI, ...

... imprime información de seguimiento en la consola. Se verifica si pItem es nulo. Si es así, se crea un nuevo objeto PHB_ITEM utilizando hb_itemNew(NULL). Si pItem ya existe y es un objeto complejo (verificado con HB_IS_COMPLEX(pItem)), se llama a hb_itemClear(pItem) para limpiar el objeto. Se establece ...

Carlos,

> hb_itemPutCLPtr(pItem, szResult, lLen);

Ese pItem que usas es NULL ó fué creado con hb_itemNew( NULL ); ?

Si es NULL, entonces se crea uno nuevo que tienes que liberar. Si pItem no es NULL, el que tendrás que liberar es pItem.

...  ( PHB_ITEM pItem, char * szText, HB_SIZE nLen ); ! hb_itemPutCPtr(), hb_itemPutCLPtr() fixed to put empty string to item if szText is NULL and length is non-zero, instead of trying to free NULL pointer causing internal error. * contrib/examples/rdddbt/dbfdbt1.c * I did a mistake in ...

... la impresora por defecto no pueder ser PDF24 O PDFCREATOR (VIRTUALES) HB_FUNC_STATIC( STARTDOC ) { HDC hDC = (HDC) hb_parnl(1) ; LPDOCINFO sDoc = NULL; BOOL Result = FALSE ; if (hDC ) { sDoc = (LPDOCINFO) hb_xgrab(sizeof(DOCINFO)); sDoc->cbSize= sizeof(DOCINFO) ; sDoc->lpszDocName= hb_parc(2) ...

Antonio
https://gitflic.ru/project/alkresin/llama_prg.git
is null!!

... Your request doesn't appear to be valid JSON: Parse error on line 1: tags: { name: tag1, ^ Expected one of: 'STRING', 'NUMBER', 'NULL', 'TRUE', 'FALSE', '{', '['

... Con navicat reviso la tabla cuando esta vacía y me muestra un registro con todo los campos a NULL. Esta es la estructura de la tabla, por si sirve de apoyo a su respuesta     cCmdSql := "CREATE TABLE IF NOT EXISTS HdrOdc (" +;      ...

... the CORS rules, generating the error: Access to XMLHttpRequest at 'http://192.168.1.110/cgi-bin/menu_jmg.hrb?qry=ASKING_SIMPLE_TEXT' from origin 'null' has been blocked by CORS policy: No 'Access-Control-Allow-Origin' header is present on the requested resource. Which means it doesn't find the ...

... las normas CORS, generando el error: Access to XMLHttpRequest at 'http://192.168.1.110/cgi-bin/menu_jmg.hrb?qry=ASKING_SIMPLE_TEXT' from origin 'null' has been blocked by CORS policy: No 'Access-Control-Allow-Origin' header is present on the requested resource. Lo que significa que no encuentra ...

... 11, /* DBSELECTAREA */ HB_P_PUSHNIL, HB_P_PUSHVARIABLE, 2, 0, /* CD */ HB_P_DOSHORT, 1, HB_P_ENDPROC /* 00121 */ }; hb_vmExecute( pcode, symbols, NULL ); } PROCEDURE APRIDBCONPASSWORD( PASSWORD, NOME )   IF PASSWORD == NIL      PASSWORD := "LORRY"  ...

... #include <mysql/mysql.h> int main() { MYSQL *conn; MYSQL_RES *res; MYSQL_ROW row; // Initialize the MySQL connection conn = mysql_init(NULL); // Replace these with your MySQL server details const char *host = "localhost"; const char *user = "your_username"; const ...

Antonio yo la dejaría como al principio pero usando hb_parptr:

Code: Select all  Expand view

HB_FUNC( LOCKWINDOWUPDATE )
{
   hb_retl( LockWindowUpdate( ( HWND ) hb_parptr( 1 ) ) );
}
 

hb_parptr() devuelve NULL si no se pasa nada que exactamente. lo que se quiere.