Question

我有一个VB6项目，它可以很好地连接到ftp远程服务器（即：ftp://ftp.microsoft.com），我想只使用Inet1.ocx将ftp服务器中的所有目录名称列入ListBox。我怎么能这样做？

Answer 1

摘自@ AhmedEbied对我在下面的回答的评论。

好的，我明白了。我们将使用（DIR）FTP命令来检索FTP服务器中的目录。使用（DIR）命令 Inet1.Execute，（“DIR”）

' CommandButton 
Private Sub Get_Dir_Click() 
  Dim Data as String, Data1 as String 

  ' Get List of all files 
  Do Data1 = Inet1.GetChunk(1024, icString) 
    Data = Data & Data1 
  Loop While Len(Data1) <> 0 

  Text4.Text = Data 
End Sub

当然我已经UsrName，PassWord和URL了。

Answer 2

您可以安装支持FTP的ActiveX组件，如下所示：Chilkat FTP。请注意，有一个名为FTP的免费版本和一个名为FTP2的付费版本。为了您的目的，免费的应该是足够的。

请参阅the documentation和the examples page开始使用。

如何使用Inet.OCX将FTP站点内的所有目录返回到VB6 Listbox？

2 个答案: