Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
General fileds
Message
De
29/05/2002 10:35:53
Cetin Basoz
Engineerica Inc.
Izmir, Turquie
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Base de données, Tables, Vues, Index et syntaxe SQL
Titre:
Divers
Thread ID:
00662410
Message ID:
00662476
Vues:
26
>>>Can you send me a sample ??
>>>
>>>Silvio
>>
>>This is my modified version not using 579 but 0x204 querying file size from there :
>>
>>lcTemp = sys(2015)
>>lcOutFileName = 'blahblah.ext'
>>copy fields myGeneral to (lcTemp) next 1
>>
>>Hin = fopen(lcTemp+".fpt")
>>hout=fcreate(lcOutFileName)
>>lnSize=fseek(hin,0,2)
>>fseek(hin,0x204,0) && Move file pointer to offset 0x204 where file size is stored
>>lnSize = 0
>>for ix=4 to 1 step -1
>>	lnSize=lnSize+asc(fread(hin,1))*256^(ix-1)
>>endfor
>>fwrite(hout,fread(hin,lnSize),lnSize)
>>=fclose(hin) and fclose(hout)
>>erase (lcTemp+'.*')
>>
>
>Cetin,
>
>I think it's worth noting here that this works only with files embedded in the General field. With linked fields, there's a reference to simply the filename.

Oh yes :)
Cetin
Çetin Basöz

The way to Go
Flutter - For mobile, web and desktop.
World's most advanced open source relational database.
.Net for foxheads - Blog (main)
FoxSharp - Blog (mirror)
Welcome to FoxyClasses

LinqPad - C#,VB,F#,SQL,eSQL ... scratchpad
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform