资源描述：
《如何在asp程序中使用telnet协议--》由会员上传分享，免费在线阅读，更多相关内容在应用文档-天天文库。
1、如何在ASP程序中使用Telnet协议>> 1设计背景 越来越多的企业在建立自己的eout属性：当设定为0值时，控件使用非阻塞方式控制会话。当设定为大于0的值时，控件使用阻塞方式控制会话，Timeout表示超时设定，单位为毫秒。 State属性：返回TCP连接状态。 Connect方法：建立一个连接，格式为： Object.ConnectRemoteName[,RemotePort][,LocalName][,LocalPort]。其中RemoteName为要连接的UNIX主机的名字或IP地址。RemotePort为要连接的UNIX主机的端口号，缺
2、省为23，是标准的tel端口。LocalName和LocalPort为本地主机名和端口，一般可以省略。 Close方法：关闭一个连接，格式为Object.Close Send方法：在连接建立后，发送数据。格式为： Object.SendData。Data为要发送给UNIX主机的数据。 Serach方法：接受UNIX主机返回的数据，并在数据流中寻找指定的结束标志，结果包括到结束标志为止的所有返回数据。如果在Timeout规定的时间内未得到指定的结束标志，则产生超时错误。格式为：Object.SearchData,Token。Data中保存返回结果，To
3、ken指定了结束标志字符串。 4编程实例 下面是一个简单的TelToolActiveX控件的ASP编程实例。实验环境是：:Poo Author:Yin Date:07/16/2001 Purpose:TodemonstratehoeNext CreateaTelcontrol DimTel1 SetTel1=Server.CreateObject(Dart.Tel.1) Usea10secondtimeout Tel1.Timeout=10000 Specifiesterminaltype Tel1.TermType=ansi Ad
4、dResultConnectingto+txtHost+...+vbCrLf Connecttothehostonport23 Tel1.ConnecttxtHost,23 Dimastringtob123下一页>>>>这篇文章来自..，。eusedbythesearchmethod DimData Data= Searchforloginprompt Tel1.SearchData,txtLoginPrompt AddResultData Sendusername Tel1.SendtxtUser+vbCrLf Searchforpa
5、sspt Tel1.SearchData,txtPassPrompt AddResultData Sendpassandprompt Tel1.SearchData,txtmandPrompt AddResultData Sendmand Tel1.Sendps+vbCrLf Searchformandprompt Tel1.SearchData,txtmandPrompt AddResultData Sendmand Tel1.Sendstat-rn+vbCrLf Searchformandprompt Tel1.SearchD
6、ata,txtmandPrompt AddResultData Closetheconnection Tel1.Close IfErr.number=0then AddResultvbCrLf+Disconnecting...SUCCESS! Else Displayinfoabouttheerror AddResultvbcrlf+ERROR#+CStr(Err.number)+:+Err.Description Endif Response.Lreservedcharacters FunctionReadyForHtml(Data)
7、 OnErrorResumeNext ReadyForHtml=Data ReadyForHtml=Replace(ReadyForHtml,,gt;) ReadyForHtml=Replace(ReadyForHtml,,lt;) ReadyForHtml=Replace(ReadyForHtml,,nbsp;) ReadyForHtml=Replace(ReadyForHtml,vbCrLf,brnbsp;) ReadyForHtml=Replace(ReadyForHtml,vbCrLf,br) EndFunction DimtxtH
8、ost DimtxtLoginPrompt Di
