بازکردن فایل اینکریپ شد در XP

[mostafair]

با سلام..من چند تا عکس را با ویندوز XP اینکریپت کردم..و ویندوز رو دوباره نصب کردم.اما فراموش کردم که فایلها رو از حالت اینکریپت خارج کنم..چطور میتونم این مشکل رو حل کنم و یا با کدوم نرم افزار..ممنون میشم اگه کمکم کنید...

[avini]

با XP Manager میتونی این کار رو بکنی

[Di Di]

چطوری؟؟؟ می شه بیشتر توضیح بدی؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟

[peymantrojan]

من که بعید میدونم به این راحتیا باشه که avini میگه

[veyskarami]

چجوری کریپت کردی؟
با چه برنامه ای؟

[شبنم خانم]

منم دقیقا مشکل تو رو دارم

من که 100 گیگ رو اینکیریپ کردم

به منم کمک کنید
من با خود ویندوز این کار رو انجام دادم

[lord_viper]

ویندوز xp برای انکریپت فایلها از توابع زیر استفاده میکنه
امیدوارم کمکتون کنه
function EncryptFile(lpFilename: PChar): BOOL; stdcall;
external advapi32 name 'EncryptFileA';

function DecryptFile(lpFilename: PChar; dwReserved: DWORD): BOOL; stdcall;
external advapi32 name 'DecryptFileA';


{....}


procedure TForm1.Button1Click(Sender: TObject);
begin
if not EncryptFile('c:\temp') then
ShowMessage('Can''t encrypt directory.');
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
if not DecryptFile('c:\temp', 0) then
ShowMessage('Can''t decrypt directory.');
end;

[Di Di]

خیلی ممنون ولی از قدیم گفتن سنگی رو به دیوونه می ندازه ته چاه ، صد تا عاقل نمی تونن درش بیارن!!
بیل گیتس هم با این کارش ثابت کرده از صدتا دیوونه هم دیوونه تره!!!
حالا هرچند ما بدونیم چطور اینکرپت شدن ولی تا کلید نباشه .....

[lord_viper]

فکر نمیکنم کلید بخواد چون من که باهاش مشکل ندارم

[Di Di]

می شه بیشتر توضیح بدید؟؟ منظورت اینه که فایلها رو بعد از اینکریپت شدن بدون کلید دوباره می تونی دکرپت کنی ؟؟؟
اگه ممکنه یکم بیشتر توضیح بدید و یه نمونه هم بگید تا بهتر بفهمیم .

[CRazYFULL]

تا اونجای که من ميدونم فايل هايی که در يک يوزر کريبت بشن رو در يوزر ديگه و يا ويندز ديگه نميشه انکريبت کرد و يا به اونها دست رسی داشت.
اين API که معرفی کرديد کار همون ويندز رو انجام ميده.

Private Declare Function EncryptFile Lib "ADVAPI32" Alias "EncryptFileA" (ByVal lpFileName As String) As Boolean
Private Declare Function DecryptFile Lib "ADVAPI32" Alias "DecryptFileA" (ByVal lpFileName As String, ByVal dwReserved As Long) As Boolean

Private Sub Command1_Click()
EncryptFile "C:\test"
End Sub

Private Sub Command2_Click()
DecryptFile "C:\test", 0
End Sub

البته با برنامه های ريکاور فايل ميشه به اونها دست رسی داشت ولی تمام فايل ها کد شده اند که با خود ويندز فکر نميکنم بشه دکد کرد.