Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Stuctural cdx or idx not found
Message
From
05/10/1998 02:33:30
 
 
To
29/09/1998 05:49:41
Cetin Basoz
Engineerica Inc.
Izmir, Turkey
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00141779
Message ID:
00143784
Views:
25
thanks
*code to remove cdx
handle=fopen("mytable.dbf",12)
=fseek(handle,28)
lnPokeByte = bitand(asc(fread(handle,1)),0xFE)
=fseek(handle,28)
=fwrite(handle,lnPokeByte,1)
=fwrite(handle,CHR(lnPokeByte),1)
=fclose(handle)

similarly i can use the code to put the cdx byte again by


handle=fopen("mytable.dbf",12)
=fseek(handle,28)
&& changed here
lnPokeByte = bitor(asc(fread(handle,1)),0xFE)

=fseek(handle,28)
=fwrite(handle,CHR(lnPokeByte),1)
=fclose(handle)


is that so
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform