Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Excel to recognize FoxPro memo fields?
Message
De
20/07/2000 11:05:53
Cetin Basoz
Engineerica Inc.
Izmir, Turquie
 
 
À
20/07/2000 09:11:53
Jonathan Cochran
Alion Science and Technology
Maryland, États-Unis
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Divers
Thread ID:
00393509
Message ID:
00394914
Vues:
10
Wish it could. It drops memo fields and adds an extra tab at the end.
Cetin
>Cetin,
>
>Could the built-in _VFP.DataToClip() method be used instead of your UDF Table2ClipBoard?
>
>Jonathan
>
>
>>
>>Function Table2ClipBoard
>>lcTempFileName = "X"+sys(2015)+".tmp"
>>handle = fcreate(lcTempFileName)   && Create a temp file
>>#Define TABULATE chr(9)
>>#Define NL chr(13)
>>
>>For ix = 1 to fcount()
>>   =fwrite(handle, field(ix))
>>   If ix < fcount()
>>      =fwrite(handle, TABULATE)
>>   Endif
>>Endfor
>>=fwrite(handle, NL)
>>Scan      && Start scan..endscan
>>   For ix = 1 to fcount()   && Write field values
>>      =fwrite(handle, typeconvert(ix) )
>>      If ix < fcount()
>>         =fwrite(handle, TABULATE)
>>      Endif
>>   Endfor
>>   =fwrite(handle, NL)
>>Endscan
>>lnSize=fseek(handle,0,2)
>>=fseek(handle,0,0)
>>_Cliptext = fread(handle, lnSize)  && Read file to clipboard
>>=fclose(handle)
>>Erase (lcTempFileName)
>>
>
Ç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