我在 批次檔(.BAT) 裡下FTP 的指令 ftp -i -s:\pos98\autoput.cmd 110.11.11.11
利用 ShellExecute(0, PChar('open'), PChar(FNAME, nil, nil, SW_SHOWNORMAL)
把檔案上傳到 FTP SERVER,
請問各位大德, 如何由程式偵測 檔案已順利上傳到 FTP SERVER ?
因為即使沒有上傳成功, 程式照樣執行, 也不會出現錯誤訊息

ftp list

===================引 用 joana 文 章===================

我在 批次檔(.BAT) 裡下FTP 的指令 ftp -i -s:\pos98\autoput.cmd 110.11.11.11
利用 ShellExecute(0, PChar('open'), PChar(FNAME, nil, nil, SW_SHOWNORMAL)
把檔案上傳到 FTP SERVER,
請問各位大德, 如何由程式偵測 檔案已順利上傳到 FTP SERVER ?
因為即使沒有上傳成功, 程式照樣執行, 也不會出現錯誤訊息

偷吃步的作法

1.上傳 myDATA.dat
2.再上傳 myDATA.ok



而程式就檢查是否有 *.ok，若有，再根據前面的檔名去下載 *.dat

所以當有 *.ok時，表示該dat是順利傳完，此時再去讀取 dat 應該就是完整的檔案。


以上僅供參考，謝謝



===================引 用 joana 文 章===================

我在 批次檔(.BAT) 裡下FTP 的指令 ftp -i -s:\pos98\autoput.cmd 110.11.11.11
利用 ShellExecute(0, PChar('open'), PChar(FNAME, nil, nil, SW_SHOWNORMAL)
把檔案上傳到 FTP SERVER,
請問各位大德, 如何由程式偵測 檔案已順利上傳到 FTP SERVER ?
因為即使沒有上傳成功, 程式照樣執行, 也不會出現錯誤訊息

joana 文 章===================

我在 批次檔(.BAT) 裡下FTP 的指令 ftp -i -s:\pos98\autoput.cmd 110.11.11.11
利用 ShellExecute(0, PChar('open'), PChar(FNAME, nil, nil, SW_SHOWNORMAL)
把檔案上傳到 FTP SERVER,
請問各位大德, 如何由程式偵測 檔案已順利上傳到 FTP SERVER ?
因為即使沒有上傳成功, 程式照樣執行, 也不會出現錯誤訊息

------
額有朝天骨,眼中有靈光

編輯記錄

謝謝各位大德熱心的回覆,只要下
ftp -i -s:\autoput.cmd 111.11.11.11 >d:\ftpUpload.log
就會自動產生.log檔,
但現在碰到一個嚴重的問題, 檔案傳一半就當掉, 上傳到FTP 之檔案byte 數不對, 一家店應該上傳10個 , 卻只上傳幾個檔案,因同一時間約有70家往 FTP SERVER丟檔案, 有些檔案還不小, 初步判斷可能是有些檔案太大(約900k左右), 我想把檔案壓縮後再上傳, 上傳到FTP後再解壓縮, 不曉得各位大德有無這樣的範例程式 ?
時間很敢, 祈求各位的協助 ...

zip/ unzip 的sample 很多,在ktop 上一搜尋跑一堆出來...可能要依你自己狀況自己挑一個合適的
http://delphi.ktop.com.tw/board.php?cid=168&fid=913&tid=67559
這篇是bcb的, 改一下就可以

===================引 用 joana 文 章===================
謝謝各位大德熱心的回覆,只要下
ftp -i -s:\autoput.cmd 111.11.11.11 >d:\ftpUpload.log
就會自動產生.log檔,
但現在碰到一個嚴重的問題, 檔案傳一半就當掉, 上傳到FTP 之檔案byte 數不對, 一家店應該上傳10個 , 卻只上傳幾個檔案,因同一時間約有70家往 FTP SERVER丟檔案, 有些檔案還不小, 初步判斷可能是有些檔案太大(約900k左右), 我想把檔案壓縮後再上傳, 上傳到FTP後再解壓縮, 不曉得各位大德有無這樣的範例程式 ?
時間很敢, 祈求各位的協助...

------
額有朝天骨,眼中有靈光

如果是單純的zip / unzip 
有個還不錯的 ZipForge
寫法單純用起來容易支援delphi4-delphi2010
http://www.componentace.com/download/download.php?editionid=12

同一個頁面中有個Code Samples 你看到那個sample 寫法應該簡單到會讓你笑出來

------
額有朝天骨,眼中有靈光

真的感謝小傑克及各位大德的熱心幫忙, 已DownLoad ZipForge, 有空我會Try ,
還是先把這個主題結案, 有其他問題我再另外提問.
感謝 !!!