فكرة برامج ايجاد المفاتيح [برمجة]

[UserDZ]

السلام عليكم
الموضع يتناول طريقة برمجة برنامج ايجاد المفاتيح
الفكرة بسيطة نرفع هذا الملف GET.PHP على اي استضافة ( تعمل حتى على المجانية )
ونضع هذا الكود وهدفه استقبال النص وحفظه في ملف data.txt
ملاحظة عليكم بوضع التصريح 777 للملفات

<?php
$_pass = $_POST["password"] ; //0
if ($_pass == '123456') {
      $_var = $_POST["varf"] ; //1 
      $_hand= fopen("data.txt","w") ; //2
    fwrite($_hand,$_var) ;//3
    Fclose ($_hand) ; //4
    }
?>

ونضع هذا الكود في البرنامج المبرمج بالدلفي

زر أضف

procedure TForm1.btn1Click(Sender: TObject);
var ASourceFile:TStringList;
begin
ASourceFile:=TStringList.Create;
  try
  ASourceFile.Add('varf='+mmo1.Text) ;
  ASourceFile.Add('password=123456') ;
    IdHTTP1.Post('http://127.0.0.1/zyzoom/get.php',ASourceFile);
  finally
    ASourceFile.Free;
  end;
end;

زر مشاهدة

procedure TForm1.btn2Click(Sender: TObject);
begin
mmo1.Text:= IdHTTP1.Get('http://127.0.0.1/zyzoom/data.txt') ;
end;

اي استفسارات ضعوها في الموضوع

 

[MR.BRAIN]

السلام عليكم و رحمة الله و بركاته​

​

فكرة اكثر من رائعة​

​

لكن ليست لدي ادنى خبرة في البرمجة​

​

على العموم الله يوفقك و يأجرك على نيتك​

​

و دمتم بود​

 

[xx0xx]

بارك الله فيك اخي الحبيب​

ولكن عندي استفسار صغير​

ملاحظة عليكم بوضع التصريح 777 للملفات

ما هو 777​

موفق اخي علي المجهود الرائع​

​

 

[nizarawi]

777 لكي يصبح كل المستخدمين قادرين على اضافة وتعديل وفتح الملفات

 

[سهران يا ليل]

موضوع رائع

 

[أبو رمش]

مشكور يا الغلا على هذا الطرح و وفق الله الجميع لكل خير ...

 

[MagicianMiDo32]

سمعت ان هذة الطريقة لاتعمل ألاعلى سيرفرات أباتشي

 

[MagicianMiDo32]

واااااااااااااااااااااشكوووووووووووكراااااااااااااااااااااااااان