>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
handle=fopen("mytable.dbf",12)
=fseek(handle,28)
lnPokeByte = bitor(asc(fread(handle,1)),1)
=fseek(handle,28)
=fwrite(handle,CHR(lnPokeByte),1)
=fclose(handle)
1 instead of 0xfe. But just creating an index would write it automatically. If you're doing this with intact indexes for some special purpose then OK.
Cetin