不能加载控件 inet; 许可证未找到

b = inet.OpenURL(httpURL, icByteArray)
这一句出错
我是外行，不知道怎么弄，还需要提供什么，请高手指点一下

'在这里也随便说一下,你把你的代码照下面这样改正就OK了．
Private Sub downloadone_Click()
Dim strSite As String, strFile As String, strCommand As String

strSite = "ftp://cisco.njut.edu.cn"
strFile = "思科路由器常用配置命令大全.txt"
ftpone.Protocol = icFTP
ftpone.URL = strSite '这里改过,调整了代码顺序,这是必须的
ftpone.UserName = "upload"
ftpone.Password = "upload"
'下面是我改过的代码
strCommand = "Get " & "/upload_1/" & strFile & " D:\" & strFile
ftpone.Execute , strCommand
End Sub
===============================================
星期一给你答复.
===============================================
连接到FTP服务器有两个重要参数!
1.FTP的地址,也即是域名,或者IP地址.
2.端口.一般来说FTP使用21号端口,也有例外.
检查你这两个参数对没有.
你最好ping一个你的FTP地址.
===============================================
我晕啊,你自己好好检查你的用户名和密码吧.还要注意用户名的大小写.

哎,你可不可以把你的整个VB工程,打个包发给我看看啊.我帮你改改.
[email protected],顺便要说明你的错误现象.