FiveTech Software tech support forums

... a directory. A PHP program writes a text file to this directory. In the text file the report request is stored. //write Report task $Report = fopen( $filename . "txt", "w"); if ($Report == false) { echo ("Error in opening new Report"); exit(); } fwrite($Report, ...

... my Arduino data into the file. How will FW capture the data from that file (this is updated) and show result in a FW dialog. Just Open if with a fOpen function ? FW will be fast enough ? My goal is to manage my Arduino RobotArm with FW design Dashboard. FW on Top )) !!

... := Space( nBufSize ) local nBytes local oFile if ! File( cSource ) MsgStop( "File not found: " + cSource ) Return .f. endif hSource = FOpen( cSource ) oFile = TFtpFile():New( cTarget, oFTP ) oFile:OpenWrite() FSeek( hSource, 0, 0 ) nFile := 0 while ( nBytes := FRead( hSource, @cBuffer, ...

... It browse me all variables but I cannot show the values I saw all the variables init form CFG_ Function test() local aVar:= {} nMemHandle := Fopen( 'config.mem', 2 ) nMemLength := Fseek( nMemHandle, 0, 2) Fseek(nMemHandle,0) nCount := 1 Do While Fseek(nMemHandle, 0, 1)+1 < nMemLength nMemWidth:= ...

> C:\harbour64\include\hbapifs.h(479): error C2732: la especificación de vinculación se contradice con la especificación anterior para 'hb_fopen'

En tu primer ejemplo lo estabas incluyendo

Incluyendo el fichero que dice Manuel ha funcionado. Muchas gracias.

Parece que te falte el include -> hbapifs.h que es donde esta declarado el prototipo de la función....
Está definido como
extern HB_EXPORT FILE * hb_fopen( const char *path, const char *mode );

http://forums.fivetechsupport.com/viewtopic.php?f=6&t=29861&hilit=20141218&start=75 http://fivetechsupport.com/forums/viewtopic.php?f=6&t=40540&start=0 https://github.com/harbour/core/blob/master/src/common/hbfopen.c https://cpp.ho...

Comentando esa línea arroja este error: [vcvarsall.bat] Environment initialized for: 'x86_x64'***** Compiling with Harbour 64 bytes...Harbour 3.2.0dev (r2011030937)Copyright (c) 1999-2020, https://harbour.github.io/Compiling 'wintpv.prg' and generating preprocessed output to ...

Comenta esta línea:

// FILE * hb_fopen( const char * path, const char * mode );

no te hace falta

En la actualización de FWH64 me acabo de encontrar con este otro problema al tratar de compilar código que incluye la función hb_fopen : Antes de la llamada a la función tengo esto: FILE * hb_fopen( const char * path, const char * mode );  En el prg, en una parte en C, tengo ...

Buenos dias

El comando FOpen() abre el archivo. Nada mas.

Fseek() posiciona el puntero de lectura.

Dentro de tu bucle no cambias el puntero con otro FSeek()
Como FRead() te devuelve el numero de bytes ledidos, yo comprobaría antes de escribir si cBuffer tiene contenido.

Saludos

Hola. usando harbour y Fwh la ultima. Me arroja estos errores: [1]:iLink32.Exe -Gn -q -aa -Tpe -x @testMaria.bcl Error: Unresolved external 'WinMain' referenced from X:\HARB\BCC7\LIB\C0W32.OBJ Error: Unresolved external '_hb_vmProcessSymbols' referenced from X:\PROYECTOS\TEST\MARIA\OBJ\MARIA.OBJ Err...

simply try to open in exclusive mode before
#include "FileIO.ch"

FUNCTION MAIN( cFile )
LOCAL nHandle

nHandle := FOPEN( cFile , FO_EXCLUSIVE )
IF nHandle = -1
? "Error" , FERROR()
ELSE
? "nHandle" , nHandle
FCLOSE( nHandle )
ENDIF

RETURN NIL

... cPdf this text must taken between two quotes of an italian electronic invoice <Attachment> </Attachment> cFile-> xml file hFile := FOpen( cFile ) nFileLines := FLineCount( cfile ) i := 1 DO WHILE i <= nFileLines HB_FReadLine( hFile, @Linea ) Linea := LTrim( Linea ) cField := ...