初涉winsock编程,想写一个简单的telnet程序,可是在连接上就碰到问题了
以下是连接的代码,可是返回的getdata在文本框里面显示是一个个问号,试了一台unix机器是5个问号,一台2000的机器是4个问号,请问是怎么回事呢?
Private Sub Command1_Click() ‘连接
telnet.Connect
End SubPrivate Sub Command2_Click()
telnet.SendData Text2.Text
End SubPrivate Sub telnet_DataArrival(ByVal bytesTotal As Long)
   Dim strData As String
   telnet.GetData strData
   Text1.Text = strDataEnd Sub

解决方案 »

  1.   

    telnet有协议和数据格式的。
    http://community.csdn.net/Expert/topic/3229/3229280.xml?temp=.5224573
      

  2.   

    现在我telnet 2000机器又反应了,输入用户名密码登陆也应该成功了(因为没有报错,如果用户名密码出错回报login failed信息)
    现在我想发送命令,比如dir之类好像不行
    我做了一个文本框text1用于输入命令(比如dir)
    然后调用方法 winsock1.SendData Chr(255) & Trim(Text1.Text) & Chr(13) & Chr(10)
    就没有反应了Winsock1_DataArrival方法好像没有接受到任何的信息,这是为什么呢?
    请大家帮忙
    谢谢