vba isue ... 我需要在无线网络中找到ftp服务器，因此需要检查ftp端口2211上从192.168.1.1到192.168.1.50的IP地址。 如果我使用每个地址的循环并打开

 ' Open Internet Connecion
    hOpen = InternetOpen("FTP",1,"",vbNullString,0)

    ' Connect to FTP
    hConnection = InternetConnect(hOpen,hostName,FTP_PORT,username,password,INTERNET_SERVICE_FTP,IIf(PassiveConnection,INTERNET_flaG_PASSIVE,0),0)

需要很多时间。 有没有更快的方法来检测网络中的ftp服务器在哪里 其实我需要从android设备（例如智能手机或平板电脑）打开的ftp服务器（仅用于连接它们的方式）中获取文件，这些ftp服务器已连接到无线局域网。但是他们的IP地址总是不同的。我需要用户友好的表格来检测其ftp服务器。 这个问题类似于以下线程：Java - Find Server in network， 但我在VBA中需要它 谢谢