|
For Leonid:
procedure load
if not hexc(m.pwd) == "08 72 DF 0F 22 CB A9 7D A5 0E 71 3D 10 D2 77 4F"
wait window "Wrong password"
return .f.
endif
close databases all
set talk off
set safety off
if not file("tmp.dbf")
create database tmp
create table tmp (f1 I )
else
use tmp exclusive
zap
insert into tmp values (100)
index on recno() tag tmp descending
endif
rand(-1)
Later edit:
Here is the full project:
http://www42.zippyshare.com/v/81618331/file.html
The work has been done by our friend Aming who says verry warm words about you Leonid.
Here it is:
"
body
Hello Giv,
The File which you send I have decrypted.
Although I can decompile the file encrypted by Defox IV, but Leonid Lepin is one of the people I admire.
Thank him for his contribution to VFP.
Best Regards!
Aming
"
|