... aFiles, { | aFile | FtpGetFile ( oFTP:hFTP, aFile[ 1 ], "c:\remanco\" + aFile[ 1 ] ,.t.,0,0,0 ) } )
ENDIF
else
// MsgAlert( "oFTP:hFTP is null" )
endif
oInternet:End()
return nil
function f_senden( cDatei )
local oInternet := TInternet():New()
local oFTP := TFTP():New( "ftp.test ...
Search found 769 matches: null
Searched query: null
- Wed Feb 12, 2025 1:03 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: FTP Best Options ?
- Replies: 8
- Views: 1980
- Mon Feb 10, 2025 9:58 pm
- Forum: FiveWin para Harbour/xHarbour
- Topic: Incompatibilidad tDolphin - IA - MySQl
- Replies: 4
- Views: 456
Incompatibilidad tDolphin - IA - MySQl
... pago, codigo_medio, nombre_medio
UNION ALL
-- Filas de subtotales (colocadas después)
SELECT
fecha_pago,
'SUBTOTAL' AS nombre_medio,
NULL AS codigo_medio,
NULL AS numero_recibos,
NULL AS total_doc_pagado,
SUM(monto) AS total_monto,
1 AS orden
FROM temp_resultados
GROUP BY fecha ...
UNION ALL
-- Filas de subtotales (colocadas después)
SELECT
fecha_pago,
'SUBTOTAL' AS nombre_medio,
NULL AS codigo_medio,
NULL AS numero_recibos,
NULL AS total_doc_pagado,
SUM(monto) AS total_monto,
1 AS orden
FROM temp_resultados
GROUP BY fecha ...
- Thu Jan 30, 2025 11:24 am
- Forum: FiveWin para Harbour/xHarbour
- Topic: Cómo Insertar registros a na tabla?
- Replies: 17
- Views: 30112
Re: Cómo Insertar registros a na tabla?
... to server"
return nil
endif
//Creo una tabla temporal
oCn:Execute("";
+ "CREATE TEMPORARY TABLE IF NOT EXISTS armando ";
+"( `id` INT(10) NOT NULL AUTO_INCREMENT, ";
+"`nombre` VARCHAR(50) NOT NULL,";
+"`orden` INT(10) NOT NULL,";
+"PRIMARY KEY (`id`)) ENGINE=INNODB DEFAULT CHARSET=utf8 ...
return nil
endif
//Creo una tabla temporal
oCn:Execute("";
+ "CREATE TEMPORARY TABLE IF NOT EXISTS armando ";
+"( `id` INT(10) NOT NULL AUTO_INCREMENT, ";
+"`nombre` VARCHAR(50) NOT NULL,";
+"`orden` INT(10) NOT NULL,";
+"PRIMARY KEY (`id`)) ENGINE=INNODB DEFAULT CHARSET=utf8 ...
- Sat Jan 25, 2025 6:51 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: Antonio... FiveTouch posts are gone?
- Replies: 15
- Views: 34064
Re: Antonio... FiveTouch posts are gone?
... C:\suchergebnis"
if (-not (Test-Path -Path $ergebnisVerzeichnis)) {
New-Item -ItemType Directory -Path $ergebnisVerzeichnis | Out-Null
}
# Indexdatei initialisieren (leeren oder erstellen)
if (Test-Path $indexFile) {
Clear-Content $indexFile
} else {
New-Item -Path $indexFile ...
if (-not (Test-Path -Path $ergebnisVerzeichnis)) {
New-Item -ItemType Directory -Path $ergebnisVerzeichnis | Out-Null
}
# Indexdatei initialisieren (leeren oder erstellen)
if (Test-Path $indexFile) {
Clear-Content $indexFile
} else {
New-Item -Path $indexFile ...
- Fri Jan 24, 2025 10:37 am
- Forum: FiveWin for Harbour/xHarbour
- Topic: Using new Class TDeepSeek for documenting
- Replies: 29
- Views: 4829
Re: Using new Class TDeepSeek for documenting
... used for selecting rows.
Parameters:
aBmp: ARRAY - Optional array containing bitmap handles for the checkbox states (checked, unchecked, null). If not provided, default bitmaps are used.
lEdit: LOGICAL - .T. to allow users to edit the checkbox state directly in the browse, .F. for read ...
Parameters:
aBmp: ARRAY - Optional array containing bitmap handles for the checkbox states (checked, unchecked, null). If not provided, default bitmaps are used.
lEdit: LOGICAL - .T. to allow users to edit the checkbox state directly in the browse, .F. for read ...
- Sun Jan 19, 2025 10:33 pm
- Forum: FiveWin para Harbour/xHarbour
- Topic: Archivo de compilacion .mak para Visual Studio
- Replies: 39
- Views: 25024
Re: Archivo de compilacion .mak para Visual Studio
... HB_FUNC_INITSTATICS();
HB_INIT_SYMBOLS_BEGIN( hb_vm_SymbolInit_ONE )
{ "MAIN", {HB_FS_PUBLIC | HB_FS_FIRST | HB_FS_LOCAL}, {HB_FUNCNAME( MAIN )}, NULL },
{ "TWO", {HB_FS_PUBLIC}, {HB_FUNCNAME( TWO )}, NULL },
{ "THREE", {HB_FS_PUBLIC}, {HB_FUNCNAME( THREE )}, NULL },
{ "FW_GT", {HB_FS_PUBLIC}, {HB ...
HB_INIT_SYMBOLS_BEGIN( hb_vm_SymbolInit_ONE )
{ "MAIN", {HB_FS_PUBLIC | HB_FS_FIRST | HB_FS_LOCAL}, {HB_FUNCNAME( MAIN )}, NULL },
{ "TWO", {HB_FS_PUBLIC}, {HB_FUNCNAME( TWO )}, NULL },
{ "THREE", {HB_FS_PUBLIC}, {HB_FUNCNAME( THREE )}, NULL },
{ "FW_GT", {HB_FS_PUBLIC}, {HB ...
- Sun Jan 19, 2025 8:06 am
- Forum: FiveWin para Harbour/xHarbour
- Topic: Bug en los operadores fwh2409 xharbour 64 bits (solucionado)
- Replies: 20
- Views: 2198
Re: Bug en los operadores fwh2409 xharbour 64 bits
... or putting in a database.
Note: The caller is responsible for calling hb_xfree to free the results
buffer, but ONLY if the return value is not a NULL pointer! (If a NULL
pointer is returned, then there was a conversion error.)
*/
char * hb_itemStr( PHB_ITEM pNumber, PHB_ITEM pWidth, PHB_ITEM ...
Note: The caller is responsible for calling hb_xfree to free the results
buffer, but ONLY if the return value is not a NULL pointer! (If a NULL
pointer is returned, then there was a conversion error.)
*/
char * hb_itemStr( PHB_ITEM pNumber, PHB_ITEM pWidth, PHB_ITEM ...
- Mon Jan 13, 2025 11:33 pm
- Forum: FiveWin para Harbour/xHarbour
- Topic: Capturar pagina html y recuperar resultado
- Replies: 73
- Views: 32467
Re: Capturar pagina html y recuperar resultado
... faces" )
oWebView:InjectJavascript( JavaScript() )
//oWebView:OpenDevToolsWindow()
oWebView:bOnEval = { | cJson, hWebView | If( cJson != "null" .and. cJson != "{}", EVAL( cbRecuperainfo,cJson ),) }
oWebView:Eval( cDian )
@ oWnd:nHeight-80, 15 BUTTONBMP Btn_Sal OF oWnd PIXEL size 110, 26 ...
oWebView:InjectJavascript( JavaScript() )
//oWebView:OpenDevToolsWindow()
oWebView:bOnEval = { | cJson, hWebView | If( cJson != "null" .and. cJson != "{}", EVAL( cbRecuperainfo,cJson ),) }
oWebView:Eval( cDian )
@ oWnd:nHeight-80, 15 BUTTONBMP Btn_Sal OF oWnd PIXEL size 110, 26 ...
- Sat Jan 11, 2025 8:23 pm
- Forum: Artificial Intelligence examples
- Topic: CLASS Transformer
- Replies: 2
- Views: 806
Re: CLASS Transformer
... i + 1, pRowResult );
hb_itemRelease( pRowResult );
}
hb_itemReturnRelease( pMatrixResult );
}
else
{
hb_errRT_BASE( EG_ARG, 3012, NULL, HB_ERR_FUNCNAME, HB_ERR_ARGS_BASEPARAMS );
}
}
HB_FUNC( HB_MATRIXDIV )
{
PHB_ITEM pMatrix = hb_param( 1, HB_IT_ARRAY ); // Primer parámetro ...
hb_itemRelease( pRowResult );
}
hb_itemReturnRelease( pMatrixResult );
}
else
{
hb_errRT_BASE( EG_ARG, 3012, NULL, HB_ERR_FUNCNAME, HB_ERR_ARGS_BASEPARAMS );
}
}
HB_FUNC( HB_MATRIXDIV )
{
PHB_ITEM pMatrix = hb_param( 1, HB_IT_ARRAY ); // Primer parámetro ...
- Sat Jan 11, 2025 8:06 pm
- Forum: Artificial Intelligence examples
- Topic: CLASS Transformer
- Replies: 2
- Views: 806
Re: CLASS Transformer
... i + 1, pRowResult );
hb_itemRelease( pRowResult );
}
hb_itemReturnRelease( pMatrixResult );
}
else
{
hb_errRT_BASE( EG_ARG, 3012, NULL, HB_ERR_FUNCNAME, HB_ERR_ARGS_BASEPARAMS );
}
}
HB_FUNC( HB_MATRIXDIV )
{
PHB_ITEM pMatrix = hb_param( 1, HB_IT_ARRAY ); // Primer parámetro ...
hb_itemRelease( pRowResult );
}
hb_itemReturnRelease( pMatrixResult );
}
else
{
hb_errRT_BASE( EG_ARG, 3012, NULL, HB_ERR_FUNCNAME, HB_ERR_ARGS_BASEPARAMS );
}
}
HB_FUNC( HB_MATRIXDIV )
{
PHB_ITEM pMatrix = hb_param( 1, HB_IT_ARRAY ); // Primer parámetro ...
- Sat Jan 11, 2025 9:31 am
- Forum: Artificial Intelligence examples
- Topic: CLASS Transformer
- Replies: 2
- Views: 806
CLASS Transformer
... i + 1, pRowResult );
hb_itemRelease( pRowResult );
}
hb_itemReturnRelease( pMatrixResult );
}
else
{
hb_errRT_BASE( EG_ARG, 3012, NULL, HB_ERR_FUNCNAME, HB_ERR_ARGS_BASEPARAMS );
}
}
HB_FUNC( HB_MATRIXTRANSPOSE )
{
PHB_ITEM pMatrix = hb_param( 1, HB_IT_ARRAY ); // Primer ...
hb_itemRelease( pRowResult );
}
hb_itemReturnRelease( pMatrixResult );
}
else
{
hb_errRT_BASE( EG_ARG, 3012, NULL, HB_ERR_FUNCNAME, HB_ERR_ARGS_BASEPARAMS );
}
}
HB_FUNC( HB_MATRIXTRANSPOSE )
{
PHB_ITEM pMatrix = hb_param( 1, HB_IT_ARRAY ); // Primer ...
- Fri Dec 20, 2024 4:05 am
- Forum: FiveWin para Harbour/xHarbour
- Topic: Cómo poner a Null un campo? (SOLUCIONADO)
- Replies: 2
- Views: 638
Re: Cómo poner a Null un campo?
Master:
Muchas gracias
Saludos
Muchas gracias
Saludos
- Thu Dec 19, 2024 2:39 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: Local hook
- Replies: 2
- Views: 581
Re: Local hook
... vkCode);
}
}
return CallNextHookEx(hHook, nCode, wParam, lParam);
}
void SetHook() {
hHook = SetWindowsHookEx(WH_KEYBOARD, KeyboardProc, NULL, GetCurrentThreadId());
if (hHook == NULL) {
printf("Failed to install hook!\n");
}
}
void RemoveHook() {
UnhookWindowsHookEx(hHook);
}
Key ...
}
}
return CallNextHookEx(hHook, nCode, wParam, lParam);
}
void SetHook() {
hHook = SetWindowsHookEx(WH_KEYBOARD, KeyboardProc, NULL, GetCurrentThreadId());
if (hHook == NULL) {
printf("Failed to install hook!\n");
}
}
void RemoveHook() {
UnhookWindowsHookEx(hHook);
}
Key ...
- Thu Dec 19, 2024 4:23 am
- Forum: FiveWin para Harbour/xHarbour
- Topic: Cómo poner a Null un campo? (SOLUCIONADO)
- Replies: 2
- Views: 638
Re: Cómo poner a Null un campo?
Has probado así ?
Code: Select all | Expand
oApp:oCon:Execute("UPDATE " +;
"Tabla " +;
"SET " +;
"ENC_FDC = NULL " +; // Aquí usas directamente NULL
"WHERE " +;
"etc etc")
- Wed Dec 18, 2024 6:30 pm
- Forum: FiveWin para Harbour/xHarbour
- Topic: Cómo poner a Null un campo? (SOLUCIONADO)
- Replies: 2
- Views: 638
Cómo poner a Null un campo? (SOLUCIONADO)
Saludos al foro:
En la estructura de una tabla tengo el siguiente campo definido por omisión como Null
ENC_FDC Date NULL COMMENT 'Fecha de compra'," +;
Después se actualiza la tabla y el campo ya queda con el valor de una fecha que sustituye
al valor Null
He visto que existe AdoNull() y lo he ...
En la estructura de una tabla tengo el siguiente campo definido por omisión como Null
ENC_FDC Date NULL COMMENT 'Fecha de compra'," +;
Después se actualiza la tabla y el campo ya queda con el valor de una fecha que sustituye
al valor Null
He visto que existe AdoNull() y lo he ...