نمایش نتایج 1 تا 5 از 5

نام تاپیک: آپلود کردن فایل بر روی هاست وب سایت از طریق دلفی

  1. #1

    Question آپلود کردن فایل بر روی هاست وب سایت از طریق دلفی

    سلام دوستان
    لطفا کمکم کنید .....
    من میخوام از طریق برنامه ای که با دلفی نوشتم فایل روی هاست وب سایت آپلود کنم.
    آیا کامپوننتی برای این کار وجود داره؟

    با تشکر




  2. #2

    نقل قول: آپلود کردن فایل بر روی هاست وب سایت از طریق دلفی

    اگر باید از HTTP برای آپلود استفاده کنید، IdHTTP. اگر FTP داره، IdFTPClient. هر دو از مجموعه Indy هستند. برای نمونه سورس هم به Demoهای Indy مراجعه کنید که لینکش بارها در سایت گذاشته شده.


    وَ سَيَعْلَمُ الَّذِينَ ظَلَمُوا [آل محمد حقهم] أَيَّ مُنْقَلَبٍ يَنْقَلِبُونَ - الشعراء (227)
    و ظالمین [حق آل محمد (ص) ] به زودی خواهند دانست که به کدام بازگشتگاه بازخواهند گشت.

  3. #3

    Unhappy نقل قول: آپلود کردن فایل بر روی هاست وب سایت از طریق دلفی

    سلام دوستان
    لطفا یکی به من کمک کنه
    من یه چند روزه فقط دارم دنبال نحوه کار برای آپلود فایل روی هاست وب سایت میگردم.
    تو این سایت هم خیلی جستجو کردم ولی چیزی پیدا نکردم.
    لطفا یه مثال که کار کنه برام بذارید.
    لطفا برای کار با tidftp راهنماییم کنید.
    هر چی با این کامپوننت ور رفتم نتونستم کاری بکنم
    خیلی کارم گیره!!!!!


    ممنونم

  4. #4

    نقل قول: آپلود کردن فایل بر روی هاست وب سایت از طریق دلفی

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


    Function MH_FTP_Upload_File(FTP_Name:TIdFTP;label_Report:TL abel;Host_Name_Or_IP,FTP_UserName,FTP_Password,FTP _PathInServer,File_Name_Source,File_Name_Destinati on:String;FTP_Port:Integer=21):Boolean ;
    begin
    try
    If FTP_Name.Connected=False then
    begin
    label_Report.Caption :='Start To Connect To FTP Server'; Application.ProcessMessages;
    FTP_Name.Host := Host_Name_Or_IP;
    FTP_Name.Username := FTP_UserName;
    FTP_Name.Password := FTP_Password;
    FTP_Name.Port:=FTP_Port;
    FTP_Name.Connect;
    label_Report.Caption :='Connect To FTP Server Success'; Application.ProcessMessages;

    FTP_Name.ChangeDir(FTP_PathInServer);
    label_Report.Caption :=label_Report.Caption+chr(13)+'Change Ftp Path'; Application.ProcessMessages;

    FTP_Name.Put(File_Name_Source,File_Name_Destinatio n);
    label_Report.Caption :=label_Report.Caption+chr(13)+'Upload File Success'; Application.ProcessMessages;

    FTP_Name.Disconnect;

    Result:=True;
    end;

    except on e:Exception Do
    begin
    label_Report.Caption :='Error='+e.Message ;
    MessageDlg( 'Error' + chr(13)+e.Message , mtInformation,[mbOK],0);
    Result:=False;
    end;
    end;
    end;


    با تشکر

  5. #5

    Wink نقل قول: آپلود کردن فایل بر روی هاست وب سایت از طریق دلفی

    آقای حیدر نیا دستت درد نکنه!!!
    خیلی کمک بزرگی کردی!!
    واقعا لطف کردی.

    حالا اگر بخوام یه فایل رو از رو هاست پاک کنم چی؟ میشه؟

    بازم ممنون

قوانین ایجاد تاپیک در تالار

  • شما نمی توانید تاپیک جدید ایجاد کنید
  • شما نمی توانید به تاپیک ها پاسخ دهید
  • شما نمی توانید ضمیمه ارسال کنید
  • شما نمی توانید پاسخ هایتان را ویرایش کنید
  •