搜索局域网内已知的的ftp站点是否开着，用脚本能不能做

Question

创建Inet控件，用它访问FTP看看通不通

Answer 1

用winsock的TCP/IP协议连接对方FTP口。
State==7即可。
若想进一步验证，发送"USER Doe"进行口令验证。

Answer 2

我对winsock不熟，我是一个新手。我只想只某一台机有没有开着ftp就行了，能给个具体例子吗？

Answer 3

新手就没法教了。
你看看IE的浏览器控件或者Winsock控件的资料能看懂否

Answer 4

vb5里有关于winsock控件的
你可以到
http://activex.microsoft.com/controls/vb6/mswinsck.cab
下载到winsock。然后写个程序来连接FTP服务器的21端口。
不过我很怀疑脚本语言能否完成这种工作

Answer 5

//将以下代码存成test.js文件，然后双击执行。
//检测192.168.1.1到192.168.1.255的21端口是否开启。
//Westfly(原创2001-11-11)
var Winsock=new ActiveXObject('MSWinsock.Winsock.1');
function GetFTPState(strIP)
{
  try{
    Winsock.RemoteHost=strIP;
    Winsock.RemotePort=21;
    Winsock.Protocol=0;
    Winsock.Connect();
    WScript.Sleep(100);
    if(Winsock.State==7){
      Winsock.Close();
      return 'FTP is opened.';}
    else{
      Winsock.Close();
      return 'not detected FTP at port 21';}}
  catch(AnyException){
    return AnyException.description;
  }
}
    
//main()
//{
  var BaseIP='192.168.1.';
  WScript.Echo('Press OK to start search FTP');
  var Info='';
  for(var IP=1;IP<255;IP++){
    Info+=BaseIP+IP+':'+GetFTPState(BaseIP+IP)+'\n';
  }
  WScript.Echo('Done.Press OK to view result.');
  WScript.Echo(Info);
//}

Answer 6

如果sleep了100以后，State仍然不是7怎么办呢？不能据此就断定FTP关机吧？
还有，这代码需要从http://activex.microsoft.com/controls/vb6/mswinsck.cab下载安装

Answer 7

总不能无限等下去吧。
下载mswinsck.cab应该不是什么难事。
当然你也可以直接调用系统的ftp程序来完成。

Answer 8

这是我在别人网站看到的<script language=javascript>
function Record(i,times) {
if (times>200) {
document.forms[0]["text"+i].value="连接超时";
}
else {
document.forms[0]["text"+i].value="连接时间"+times/10+"秒";
}
}
</script><form name=TestSpeed>
<a href='abc.zip' target='_blank'>DOWN</a><script language=javascript>
tim=1;
setInterval("tim++",100);
document.write(" &nbsp;<input type=text name=text1 value=正在测试中... size=13 disabled>");
document.write("<img src=abc.zip/xxx.xxx width=1 height=1 onerror=Record(1,tim)>");
</script></form>