Clipper/FiveWin - Proteger un .dbf HEEEELPPPP.

Hola CLIPPEROS,, yo se que ustedes todo lo pueden y lo que no lo inventan,
saben??? quiero pedirles su mas avanzado conocimiento
el problema o el detalle es el siguiente,,

¿ alquien sabe como proteger un archivo de base de datos .dbf ?
lo que quiero es que nadie lo pueda habrir ni siquiera con el excel , dbu etc.
que solo lo pueda yo manipularlo dentro de mi programa unicamente,,,,

alguien de ustedes me puede ayudar,
se los voy a agradecer,
es que alguien esta intentando perjudicar
mi sistema hecho en clipper5.1
para hecharme de enemigo a mi cliente
help please,,

ayudenme por favor,,, se los voy a agradecer
toda la vida...

saludos Cesar Cortes Cruz..

Te recomiendo que te inscribas en la lista de "miClipper" en http://miclipper.da.ru hay más de 80 personas inscritas y más de alguno te va a ayudar.

:-) Juan Reyes

Hola , te mando una función que creo te va a ayudar.

Funtion Chequea(Archivo)
local puntero,primero,caracter
local prot_dbf:=chr(255)
local prot_dbt:=chr(254)
local dprot_dbf:=chr(3)
local dprot_dbt:=chr(131)

puntero:=fopen(archivo,2)
if ferror()<>0
? "error abriendo archivo""
return(.f.)
endif
primero:=fread(puntero,1)
if ferror()<>0
? "error de lectura"
return(.f.)
endif
do case
case primero:=prot_dbf
caracter:=dprot_dbf
case primero:=prot_dbt
caracter:=dprot_dbt
case primero:=dprot_dbf
caracter:=prot_dbf
case primero:=dprot_dbt
caracter:=prot_dbt
otherwise
fclose(puntero)
return(.f.)
endcase
fseek(puntero,0,0)
fwrite(puntero,caracter,1)
if ferror()<>0
? "error escribiendo..."
fclose(puntero)
return(.f.)
endif
return(.t.)

Gracias por todo
se los agradecere siempre,,

Saludos Cesar Cortes ,

Guadalajara Jal. Mexico,,,.