Search found 91 matches: fread

Return to advanced search

Conexion FTP TSL

... .f. endif hSource = FOpen( cSource ) oFile = TFtpFile():New( cTarget, oFTP ) oFile:OpenWrite() FSeek( hSource, 0, 0 ) nFile := 0 while ( nBytes := FRead( hSource, @cBuffer, nBufSize ) ) > 0 oFile:Write( SubStr( cBuffer, 1, nBytes ) ) end FClose( hSource ) oFile:End() return .t. //----------------------------------------------------------------------------//
by servicomver
Wed Jan 25, 2023 10:45 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Conexion FTP TSL
Replies: 7
Views: 736

Re: Campos empaquetados en archivo de texto

encontre, esto, no tengo muy claro la parte de la lectura del archivo... m_str = fread( ifp, m_cnt ) http://www.verycomputer.com/165_a88f85a8a4ea61b7_1.htm FUNCTION comp_3( m_cnt )PRIVATE m_str, m_data, m_cnt, m_luku, m_ub, m_lb, m_uc, m_lcm_ub ...
by carlos vargas
Thu Oct 14, 2021 3:48 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Campos empaquetados en archivo de texto
Replies: 47
Views: 2857

Re: Mem Files

... ) nMemLength := Fseek( nMemHandle, 0, 2) Fseek(nMemHandle,0) nCount := 1 Do While Fseek(nMemHandle, 0, 1)+1 < nMemLength nMemWidth:= space(18) Fread( nMemHandle, @nMemWidth, 18 ) cVarName := Left( nMemWidth, At( Chr(0) , nMemWidth ) -1 ) cVartype := Substr( nMemWidth, 12, 1 ) cVarRec := Bin2w( ...
by Silvio.Falconi
Fri Oct 08, 2021 7:34 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: Mem Files
Replies: 11
Views: 714

Re: no envia el archivo, que hago mal???

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
by JESUS MARIN
Fri Apr 30, 2021 9:37 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: no envia el archivo, que hago mal???
Replies: 8
Views: 776

Re: Strange MariaDB save problem.

I only use Memoread to read txt files. To read any others type I use Fread.
I also think BLOB fields are better to save PDF files.
by vilian
Thu Jun 18, 2020 8:59 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: Strange MariaDB save problem.
Replies: 17
Views: 1772

Re: Bajar ficheros desde una conexión FTP.

... oFile :=TFtpFile():New(cFileFTP, oFTP) oFile:OpenWrite() FSeek(hSource, 0, 0) nBufSize:=2000000 cBuffer :=space(nBufSize) do while ( nBytes:=FRead( hSource, @cBuffer, nBufSize ) ) > 0 oFile:Write( SubStr( cBuffer, 1, nBytes ) ) endd FClose( hSource ) oFile:End()
by Joel Andujo
Tue Feb 27, 2018 3:56 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Bajar ficheros desde una conexión FTP.
Replies: 5
Views: 1283

Re: funciones de FWH y Harbour en un archivo .txt

... FParseEx(<cFileName>,[<cDelimiter>])->aTextArray FParseLine(<cTextLine>,[<cDelimiter>])->aTextFields FRead(<nHandle>,@<cBufferVar>,<nBytes>,[<nOffset>])->nBytes FReadStr(<nHandle>,<nBytes>)->cString FreeLibrary(<nDllHandle>)->lSuccess ...
by carlos vargas
Sat Oct 21, 2017 8:44 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: funciones de FWH y Harbour en un archivo .txt
Replies: 7
Views: 5627

Re: funciones de FWH y Harbour en un archivo .txt

... FileSize FileStats FileStr FileTime FileValid FileWriter FKLabel FKMax FLineCount FLock Floor FloppyType FOpen Found FParse FParseEx FParseLine FRead FReadStr FreeLibrary FRename FSeek FtoC Fv FWordCount FWrite GetActiveObject GetClearA GetClearB GetClrBack GetClrFore GetClrPair GetCurrentThread ...
by carlos vargas
Sat Oct 21, 2017 8:43 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: funciones de FWH y Harbour en un archivo .txt
Replies: 7
Views: 5627

Re: multiple defintions, forst defined here

... TELL NETWORK ADMINISTRATOR OF THIS!") END IF FILE("f:\SCO_LPT.DAT") HANDLE = FOPEN("f:\SCO_LPT.DAT",FO_READWRITE) FREAD(HANDLE,@PRINTPORT,1) FCLOSE(HANDLE) END SETCURSOR(HAROW) CHKSYSTIMR() SETCURSOR(HWAIT) IF !FILE(FILENAME) SETCURSOR(HAROW) * IF YNCONFIRM("A ...
by lmheimendinger
Mon Dec 05, 2016 3:52 pm
 
Forum: FiveWin for CA-Clipper
Topic: multiple defintions, forst defined here
Replies: 15
Views: 19756

Re: Facturacion Electronica Peru, Metodo sendBill

... nBytes, nFile := 0, nTotal := 0 local nTotSize := 0 local nBufsize:=4000 local xfile:="" hSource = FOpen( hsource) while ( nBytes := FRead( hSource, @cBuffer, nBufSize ) ) > 0 xfile:=xfile+left(cbuffer,nBytes) end FClose( hSource ) FClose( hTarget ) xfile:=StrToBase64(xfile) return ...
by Enrrique Vertiz
Mon Aug 01, 2016 4:34 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Facturacion Electronica Peru, Metodo sendBill
Replies: 22
Views: 8133

Mail de Rpreview

... sea en html, es decir algunas partes en negrita, enlace a su web y a mailto:... He creado un archivo .html con ese texto con formato, lo leo con fread(), pero al pasarlo a ctext me sale el texto tal y como figura en el archivo, es decir con las etiquetas html. osea no interpreta que es html. ...
by Sebastián Almirón
Tue Sep 01, 2015 5:51 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Mail de Rpreview
Replies: 0
Views: 387

Re: Harbour-32.dll

EXPORTS HB_FUN_AADD @1 HB_FUN_ABS @2 HB_FUN_ACCELERATO @3 HB_FUN_ACCELERATOR @4 HB_FUN_ACHOICE @5 HB_FUN_ACLONE @6 HB_FUN_ACOPY @7 HB_FUN_ADEL @8 HB_FUN_ADIR @9 HB_FUN_AEVAL @10 HB_FUN_AFIELDS @11 HB_FUN_AFILL @12 HB_FUN_AINS @13 HB_FUN_ALERT @14 HB_FUN_ALIAS @15 HB_FUN_ALLTRIM @16 HB_FUN_ALTD @17 H...
by pgfdz
Fri May 29, 2015 8:06 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Harbour-32.dll
Replies: 5
Views: 2340

Linker warning using 15.03

Using msvc 2013, on both 3.2 and 3.4 I started getting this warning when linking any/all programs using FWH 15.03. It's a warning, so my code still links, but this didn't happen prior to 15.03 and I would like to get this warning cleared. I expected to find a declaration declspec(dllimport) for each...
by rhlawek
Sun Apr 05, 2015 4:02 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: Linker warning using 15.03
Replies: 10
Views: 1255

Re: New FTDN March/Marzo 2015 (FWH 15.03)

C:\fwh\samples>buildh32 webcam ┌────────────────────────────────────────────────────────────────────────────┐ │ FiveWin for Harbour 15.03 (MSVC++) Mar. 2015 Harbour development power │▄ │ (c) FiveTech, 1993-2015 for Microsoft Windows 9X/NT/200X/ME/XP/Vista/7/8 │█ └────────────────────────────────...
by luisduque
Fri Apr 03, 2015 7:24 am
 
Forum: WhatsNew / Novedades
Topic: New FTDN March/Marzo 2015 (FWH 15.03)
Replies: 16
Views: 7069

Re: create an arra from txt file

... FO_DENYREAD 48 Prevent other applications from reading FO_DENYNONE 64 Allow others to read or write FO_SHARED 64 Same as FO_DENYNONE *) default FRead() Reads characters from a binary file into a memory variable. Syntax FRead( <nFileHandle>, ; @<cBuffer> , ; <nBytes> , ; [<nOffset>] ...
by sambomb
Tue Jan 27, 2015 1:58 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: create an arra from txt file
Replies: 7
Views: 2428
Next

Return to advanced search