紧急求救！网上获取的一段程序，遇到不明错误。

[zjlang]

先贴代码：
Dim INIfile
INIfile="INIfile.txt"
Dim Data,SaveData,SaveDate
Dim addressArray
Dim orderArray
Dim SaveIng
Dim SendOrder,SaveFile,fileName
dim Telnet1
dim fso
Data = ""
SaveData=""
'On Error Resume Next

Set Telnet1 = WScript.CreateObject("Dart.Telnet.1")
Set fso = WScript.CreateObject("Scripting.FileSystemObject")

Telnet1.Timeout = 10000
Telnet1.TermType = "ansi"
SaveDate=replace(Cstr(now())," ","_")
SaveDate=replace(SaveDate,"-","_")
SaveDate=replace(SaveDate,":","_")
fso.CreateFolder("Temp_"&SaveDate)
Set OpenINI = fso.OpenTextFile(INIfile,1)

提示：无法找到名为“dart.telnet。1”的automation类！
请教各位达人，是不是还要安装什么控件啊？

[zjlang]

脚本执行到Set Telnet1 = WScript.CreateObject("Dart.Telnet.1")
这句提示错误，情况紧急，小弟在这里拜谢了，

[砸死牛顿的苹果]

Set Telnet1 = new WScript.CreateObject("Dart.Telnet.1")
Set fso = new WScript.CreateObject("Scripting.FileSystemObject")
试试

[zjlang]

ayalicer(小刀惋心)
Set Telnet1 = new WScript.CreateObject("Dart.Telnet.1")
Set fso = new WScript.CreateObject("Scripting.FileSystemObject")
试试

＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋
不行，提示：类没有被定义：“wscript”

我想错误可能出在“dart.telnet.1”这个对象上，wscript是windows脚本文件。

[嗷嗷叫的老马]

路过一下.....

[笨狗先飞]

关于"wscript" 可能需要引用 Windows Script Host Object Modle