Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Excel to recognize FoxPro memo fields?
Message
From
20/07/2000 11:05:53
Cetin Basoz
Engineerica Inc.
Izmir, Turkey
 
 
To
20/07/2000 09:11:53
Jonathan Cochran
Alion Science and Technology
Maryland, United States
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00393509
Message ID:
00394914
Views:
12
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
Previous
Reply
Map
View

Click here to load this message in the networking platform