如題

請將需求與架構說清楚些, 這樣才好建議 我猜想你是想取得該 Server 的系統時間, 可別說是要透過 ftp 協定來取得系統時間, 其實方法有很多種, 端看這部 Server 有提供多少種服務,例如： 1. 建立 NTP (Network Time Protocol) 服務 2. 有 Web 服務的話, 用一個網頁程式(PHP,ASP...)取得系統時間顯示, Client 去讀取就可以了 我是雪龍

------
http://blog.bestlong.idv.tw/
http://www.bestlong.idv.tw/
http://delphi-ktop.bestlong.idv.tw/

感謝雪龍的回應, 我的系統架構就只有 FTP Server 沒有 NTP 也沒有 Web Server. 我想 Put 一個File 再讀取此檔之日期及時間, 不知是否可行, 又不知如何寫, 請各位大大協助.

整台伺服器只有 FTP Service, 是有安全的考量嗎? 真要透過 FTP 協定的讀取資料的話, Client side 就使用 Indy Client 的 TldFTP 元件(D6,D7 都內建;D5 不確定)來連接 FTP Server 讀取資料, 不過照你這樣的說法, Server 端也要寫一個程式來定時重建資料檔案. 我是雪龍

------
http://blog.bestlong.idv.tw/
http://www.bestlong.idv.tw/
http://delphi-ktop.bestlong.idv.tw/

lee_1892 你要的Code 如下 但是有蠻大的問題，所取得的檔案時間，有時候不會顯示出來，有時候顯示 這部份你可能還要自己再試試    bestlong 講的沒有錯，取得主機時間的方法不只一種 我以你的需求實作，可參考，若環境許可，你仍能試試bestlong 所提之方式    

procedure TForm1.FormCreate(Sender: TObject);
var
    i:Integer;
    s:string;
begin        IdFTP.Host:='abbcd.com.tw';
    IdFTP.Port:=21;
    IdFTP.User:='ddy';
    IdFTP.Password:='ddy';
    IdFTP.Connect();
    IdFTP.Put('D:\delphi\test.txt','test.txt',True);
    IdFTP.ChangeDir('\');
    IdFTP.List(memo1.lines);
    i:=Pos('test.txt',Memo1.Text);
     s:=Copy(memo1.Text,i-6,5);
     self.Caption:=s;    end;

發表人 - ddy 於 2003/04/15 01:31:14

提問者您好:


以上回應是否已得到滿意的答覆？


若已得到滿意的答覆，請在一週內結案，否則請在一週內回覆還有什麼未盡事宜，不然，
將由版主(尚無版主之區域將由副站長或站長)採自由心證,選擇較合適之解答予以結案處理，
被選上之答題者同樣會有加分獎勵，同時發問者將受到扣 1 分的處分。不便之處，請見諒。


有問有答有結案，才能有良性的互動，良好的討論環境需要大家共同維護，感謝您的配合。

------
我是機器人,我不接受簡訊.