inet控件多个execute执行报错问题

[zhangjiahuashibaichi]

以下多个execute执行报错，我要ftp获取多个文件到本地，报35764错误，still executing last request 这是为何？如何修改，谢谢？

'设置FTP的地址、协议类型、用户名、密码

Inet1.URL = "ftp://192.192.0.35"  'FTP的地址

Inet1.Protocol = icFTP

'协议类型

Inet1.UserName = "ftpID"   'FTP的用户名

Inet1.Password = "ftpPWD"  'FTP的密码

Inet1.Execute , "bin"
Inet1.Execute , "prompt"
Inet1.Execute , "lcd d:\pic"
Inet1.Execute , "mget *.gif"

Do While Inet1.StillExecuting
   DoEvents
Loop

[zhangjiahuashibaichi]

谢谢，虽不报错，但执行，bin，prompt，lcd等命令时一直不动了，也不下载东西，为何，难道execute不支持吗?

[赵4老师]

'设置FTP的地址、协议类型、用户名、密码

Inet1.URL = "ftp://192.192.0.35"  'FTP的地址

Inet1.Protocol = icFTP

'协议类型

Inet1.UserName = "ftpID"   'FTP的用户名

Inet1.Password = "ftpPWD"  'FTP的密码

Inet1.Execute , "bin"
Do While Inet1.StillExecuting
   DoEvents
Loop

Inet1.Execute , "prompt"
Do While Inet1.StillExecuting
   DoEvents
Loop

Inet1.Execute , "lcd d:\pic"
Do While Inet1.StillExecuting
   DoEvents
Loop

Inet1.Execute , "mget *.gif"
Do While Inet1.StillExecuting
   DoEvents
Loop

[zhangjiahuashibaichi]

看来的确不支持，那么我怎样mget多个文件呢

[赵4老师]

此内容可能已更新，有关最新信息，请参见 TechCenter 网站。Ftp 子命令详细信息，请单击命令： Ftp: ! Ftp: ? Ftp: append Ftp: ascii Ftp: bell Ftp: Binary Ftp: Bye Ftp: cd Ftp: close Ftp: debug Ftp: delete Ftp: dir Ftp: disconnect Ftp: get Ftp: glob Ftp: hash Ftp: help Ftp:lcd Ftp: literal Ftp: ls Ftp: mdelete Ftp: mdir Ftp: mget FTP: mkdir FTP: mls FTP: mput FTP: open FTP: prompt FTP: put FTP: pwd FTP: quit FTP: quote FTP: recv FTP: remotehelp FTP: rename FTP: rmdir FTP: send FTP: status FTP: trace FTP: type FTP: user FTP: verbose

[赵4老师]

此内容可能已更新，有关最新信息，请参见 TechCenter 网站。Ftp: ls显示远程目录上的文件和子目录的简短列表。 语法 ls [RemoteDirectory] [LocalFile] 参数 RemoteDirectory 指定要查看其列表的目录。如果没有指定目录，将使用远程计算机中的当前工作目录。 LocalFile 指定要存储列表的本地文件。如果没有指定本地文件，将在屏幕上显示结果。 ? ls 显示 ls 命令的帮助。 格式化图例 格式 含义 斜体 用户必须提供的信息 粗体 用户必须准确键入的要显示的元素 省略号 (...) 在命令行中可多次重复的参数 中括号 ([]) 可选项 大括号 ({})；选项用竖线 (|) 分隔。例如：{even|odd} 用户必须从选项集合中选择一个 Courier 字体 代码或程序输出 相关主题 先用ls命令获取所有*.gif，然后逐个get ？