一个很急的问题(idftp)(200分)

  • 主题发起人 主题发起人 dshjj
  • 开始时间 开始时间
D

dshjj

Unregistered / Unconfirmed
GUEST, unregistred user!
我在使用IDFTP进行连接的时候老是出现这个异常,急死了啊!
unknown FTP listing format
我不知道问题出现在什么地方,请各位高手指导!
我的程序为:



function Tfrmjczl.GetFTPConnect : Boolean;
var
Getini: TIniFile;
AFileName: String;
begin
Result:= False;
try
try
if not ftp_jc.Connected then
begin
AFileName:= ExtractFilePath(GetModuleName(HInstance))
+ 'SYSCFG/SYS.ini';
Getini:= TIniFile.Create(AFileName);
ftp_jc.Username:= Getini.ReadString('FTP', 'UserName', '');
ftp_jc.Password:= Getini.ReadString('FTP', 'Password', '');
ftp_jc.Host:= Getini.ReadString('FTP', 'Host', '');
ftp_jc.Connect;
Result:= True;
end else Result:= True;
Except
On E: Exception Do
begin
Result:= False;
ShowMessage('出现异常' + e.Message);
end;
end;
Finally
Getini.Free;
end;
end;

SYS.ini文件中的内容为

[FTP]
Host=202.111.120.2
Username=anonymous
Password=anonymous



怎么解决啊?很急啊!
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
I
回复
0
查看
618
import
I
I
回复
0
查看
720
import
I
I
回复
0
查看
822
import
I
后退
顶部