delphi4arab منتديات دلفي للعرب

نسخة كاملة : تحميل ملف بالدلفي من رابط مباشر للسرفر
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم
عندي سرفر خاص بي و قد وضعت عليه ملفاتي و عند محاولة التحميل  بالدلفي فشلت العملية
مع العلم أن الكود يعمل بشكل عادي مع الروابط المباشرة لدروبكس
 و هذا هو رابط برنامجي: https://www.salahhommadi.com/mostachar/mostachar.exe

وعليكم السلام

لم تذكر كيف تقوم بالتحميل بدلفي...
جرب تغيير الرابط الى: (إنتبه تغيير https الى http)

كود :
http://www.salahhommadi.com/mostachar/mostachar.exe
أهلين أستاذنا الغالي
لقد استخدمت التحميل بـــ  IdHTTP و هذا هو الكود
كود :
procedure Tfrm_update_web.SpeedButton1Click(Sender: TObject); var stream: TMemoryStream ; Path_File_update, str_last_pr : string; begin         stream :=TMemoryStream.Create ;         try           IdHTTP1.Get('https://www.salahhommadi.com/mostachar/mostachar.exe',stream );           stream.position:=0;           stream.SaveToFile('D:\mostachar.exe');           ShowMessage('تم تحميل التحديث بنجاح - سوف يتم إغلاق البرنامج و إعادة فتحه');         finally           stream.Free ;         end; end;
قمت بتجربة http تظهر هذه الرسالة
---------------------------
HTTP/1.1 301 Moved Permanently.
---------------------------
و عند استخدام https تظهر هذه الرسالة
---------------------------
HTTP/1.1 403 Forbidden.
---------------------------

غير الرابط الى هذا ولاحظ ما يحدث ...

كود :
http://delphi4arab.net/updater.txt
تم التحميل بنجاح
كود :
[UpdateInfo] AppName = Updater Version = 1.0.40.10