VBcoders Guest



Don't have an account yet? Register
 


Forgot Password?



Simple Telnet application

by Dalal Noueihed (1 Submission)
Category: Miscellaneous
Compatability: Visual Basic 5.0
Difficulty: Unknown Difficulty
Originally Published: Sat 14th August 2004
Date Added: Mon 8th February 2021
Rating: (1 Votes)

Simple Telnet application

Rate Simple Telnet application



Winsock1.SendData Text1.Text & vbNewLine
Text2.SelStart = Len(Text2.Text)
Text1.Text = ""
End Sub
Private Sub Form_Load()
Winsock1.RemotePort = 23
Winsock1.RemoteHost = "xxx.xxx.xxx.xxx"
Winsock1.Connect
End Sub

Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
Dim k As String
Winsock1.GetData k
Text2.Text = Text2.Text & k
End Sub



Download this snippet    Add to My Saved Code

Simple Telnet application Comments

No comments have been posted about Simple Telnet application. Why not be the first to post a comment about Simple Telnet application.

Post your comment

Subject:
Message:
0/1000 characters