寫了個(gè)批量下載AS400 RPG源碼的程序，共享給大家玩玩！

幽靈400

花了幾天時(shí)間，用DELPHI寫了個(gè)通過(guò)AS400 FTP批量下載RPG源碼到PC上的程序，功能類似DownLoad400.exe。純屬好玩練手，沒(méi)有進(jìn)行過(guò)嚴(yán)格測(cè)試，希望大家?guī)兔φ艺褺UG，多提寶貴意見(jiàn)。該軟件目前沒(méi)有上傳功能，如果有時(shí)間我再加上。如果使用本軟件造成不良后果，本人不承擔(dān)一切后果！呵呵。

[ 本帖最后由 幽靈400 于 2006-10-1 15:48 編輯 ]

pbj968

很好用，申請(qǐng)給樓主加精

coolk

看界面的制做就知道樓主花了不少心思的！呵呵

qingzhou

尊重你的辛勤勞動(dòng)，以及做出的貢獻(xiàn)！

xjlh123

樓主辛苦了, 等我回公司試一下先

l.rover

下來(lái)試一下，看著還不錯(cuò)。

jance

支持原創(chuàng)，支持共享！

liling070900

試了一下，很方便啊，很不錯(cuò)

liling070900

下載DDS很成功，下載CL，RPG（LE）發(fā)生錯(cuò)誤

幽靈400

原帖由 liling070900 于 2006-10-10 14:37 發(fā)表
下載DDS很成功，下載CL，RPG（LE）發(fā)生錯(cuò)誤

下載錯(cuò)誤我也發(fā)現(xiàn)了，現(xiàn)象是下載到某個(gè)程序時(shí)，DOWNUP400報(bào)錯(cuò)并且連接斷開(kāi)，下載到本地的程序大小為0K。這種現(xiàn)象很有可能是在程序中有殘斷的中文字串。我們知道AS400上中文字串前后都有0E,0F作為開(kāi)始，結(jié)束符。如果中文殘斷，那么0E,0F不能成對(duì)。那么這時(shí)用DOWNUP400下載時(shí)不能認(rèn)識(shí)殘斷的0E或者0F,所以報(bào)錯(cuò)退出�？梢詸z查一下程序里有沒(méi)有殘斷的中文子串。去掉所有的殘斷中文字符串，應(yīng)該就可以下載了。希望使用本軟件的朋友把使用后的感受寫出來(lái)，有利于改進(jìn)，謝謝！