main logo
Subject: RE: Low Level very large file copyI have the reuirement
Author: "Stephen Russell"
Posted: 2003/11/30 10:01:00
 
View Entire Thread
New Search


XML. You will have some bloat ading the tags, but just Zip it, then
pass it.

Stephen Russell
S.R. & Associates
Memphis TN 38115
901.246-0159

A lot of people have gone farther than they thought they could because
someone else thought they could.
--Zig Ziglar

-----Original Message-----
From: profox-bounces /AT/ leafe .D.OT com [mailto:profox-bounces@leafe.com] On
Behalf Of bryan wetton
Sent: Sunday, November 30, 2003 12:24 AM
To: ProFox Email List
Subject: Low Level very large file copyI have the reuirement


I have the requirement ( don't ask why ) to transfer a 20Gb file via
low-level code.

I had code that was working for smaller files but this size broke it.

I have so far got

[cMyTableNamea is the very large file name .dbf)

nBytes = 100000 ( or an appropriate size 'bite' to work with )

gnErrFile2 = FCREATE("TEMP_N")
gnFileHandle = FOPEN(cMyTableNamea)

IF FERROR() != 0
? "File open error:", FERROR()
ELSE

* Seek to end of file to determine the number of bytes in the
file
nSize = FSEEK(gnFileHandle, 0, 2) && Move pointer to EOF
IF nSize > 0


*!* DO WHILE !FEOF() < conceptual routine that needs correction

cString = FREAD(gnFileHandle, nBytes)
=FWRITE(gnErrFile2 , cString)
*!* ENDDO
FCLOSE(gnFileHandle)
FCLOSE(gnErrFile2)

ENDIF


Thank you in advance

Bryan


[excessive quoting removed by server]


 
©2003 Stephen Russell
<-- Prior Message New Search Next Message -->