請問一下， 我用nmftp做了一個圖片上傳的功能， 不過有時因為網路傳輸太慢使得使用者要等待很久， 是否請教一下，若我想再多設一個button能讓使用中斷正在執行的上傳動作 也同時讓 ftp中斷其連結，並且告知使用者己經中斷其連結了。 不知這樣的中斷程式要如何撰寫呢？之前有試過break 或 abort...等等的動作 但是還是行不通。 謝謝...

引言: 請問一下， 我用nmftp做了一個圖片上傳的功能， 不過有時因為網路傳輸太慢使得使用者要等待很久， 是否請教一下，若我想再多設一個button能讓使用中斷正在執行的上傳動作 也同時讓 ftp中斷其連結，並且告知使用者己經中斷其連結了。 不知這樣的中斷程式要如何撰寫呢？之前有試過break 或 abort...等等的動作 但是還是行不通。

Nicole 你好: 請參考以下的做法 (

在NMFTP裏....Disconnect();是中斷連線的方法 而Abort在RFC裏定義的是，中斷指令，也就是結束未完成的指令 會讓你的上傳指令停止，但不會中斷連線 不過很神奇的一點是，我以前在寫ftp program時 Disconnect 也是使用Abort 而不是Disconnect 而且正常的執行 以下這是我以前寫的code讓你參考一下，但那時我是用BCB4 void __fastcall TChild::Disconnect_ButtonClick(TObject *Sender) { ftp->Abort(); FileFlag=false; ftp->LocalFileName = ""; ftp->HostFileName = ""; ftp->HostDirName = ""; StatusBar1->Panels->Items[1]->Text = ""; StatusBar1->Panels->Items[2]->Text = ""; StatusBar1->Panels->Items[4]->Text = ""; ProgressBar1->Position=0; StatusBar1->Panels->Items[5]->Text =""; IsConnect=false; Connect_Button->Enabled =true; DisConnect_Button->Enabled =false; UPDirectory_Button->Enabled =false; Remote_Refresh->Enabled=false; Append_File_Box->Append_File_Resume_Button_Flag=false; Append_File_Box->Append_File_Overwrite_Button_Flag=false; Append_File_Box->Append_File_Skip_Button_Flag=false; Append_File_Box->Append_File_Rename_Button_Flag=false; RemoteView->Items->Clear(); } 再下面的這個是NMFTP關於Disconnect的Example希望對您有幫助 To recreate this example, you will need to create a new blank C Builder application. Drop 2 TButtons, a TNMSMTP, 3 TEdits, and a TMemo on a form. Insert this code into the Button1's OnClick event: void __fastcall TForm1::Button1Click(TObject *Sender) { NMSMTP1->Host = Edit1->Text; NMSMTP1->UserID = Edit2->Text; NMSMTP1->PostMessage->ToAddress->Text = Edit3->Text; NMSMTP1->PostMessage->FromAddress = Edit3->Text; NMSMTP1->PostMessage->Subject = "Test message"; NMSMTP1->PostMessage->Body->Add("This is a test message"); NMSMTP1->PostMessage->Body->Add("If this message is delivered, the Cancel button (Button2) wasn't pressed fast enough"); NMSMTP1->Connect(); } Insert this code into NMSMTP1's OnConnect event: void __fastcall TForm1::NMSMTP1Connect(TObject *Sender) { Memo1->Lines->Add("Connected, sending message"); NMSMTP1->SendMail(); } Insert this code into NMSMTP1's OnSuccess event: void __fastcall TForm1::NMSMTP1Success(TObject *Sender) { Memo1->Lines->Add("Success, you didn't press Button2 fast enough"); if (NMSMTP1->Connected) NMSMTP1->Disconnect(); } Insert this code into Button2's OnClick event: void __fastcall TForm1::Button2Click(TObject *Sender) { Powersock1->Cancel(); } Insert this code into NMSMTP1's OnDisconnect event: void __fastcall TForm1::NMSMTP1Disconnect(TObject *Sender) { Memo1->Lines->Add("Disconnected"); } Example Description: Run the application. Type your E-Mail address into Edit3. Type the Host name or IP Address of your SMTP server into Edit1. If you do not know what this is, ask your network administrator. If you require a user ID when you connect to your SMTP server, type that into Edit2, or else leave it blank. When you have done this, click Button1. When the words Connected, sending message appear in Memo1, click Button2. When you click button 2, an exception is raised, and the OnDisconnect event is called, which notifies the user of a disconnect. If Button2 is not pressed before the message is successfully sent, the OnSuccess event adds a line to Memo1 notifying the user that the button was not pressed enough, and calls the Disconnect method to disconnect from the remote host if the client is still connected, as reported by the Connected property.