Improve and reinforce salesforce training & adoption using WalkMe's digital adoption platform. Start saving on costly employee training by creating fast intuitive Walk-Thrus for Salesforce. Claim your Free Account Now
Dim myIPAddress As String = "192.168.1.1" Dim localAdd As System.Net.IPAddress = IPAddress.Parse(myIPAddress) Dim sock As TcpClient Dim s As String Dim n As Integer Try sock = New TcpClient() sock.Connect(myIPAddress, 23) Dim b As Boolean = sock.Connected Dim ns As NetworkStream = sock.GetStream Dim sr As New StreamReader(ns) Dim result As String Dim sw As New StreamWriter(ns) Dim b1 As Boolean Do Until n = 2 If Not b1 Then sw.WriteLine("telnet") sw.Flush() End If result = sr.ReadLine If InStr(result, "Username") Then sw.WriteLine("USERNAME") sw.Flush() b1 = True n += 1 End If If InStr(result, "Password") Then sw.WriteLine("PASSWORD") sw.Flush() b1 = True n += 1 End If Loop sw.WriteLine("system") sw.Flush() result = sr.ReadLine sw.WriteLine("shell") sw.Flush() result = sr.ReadLine sw.WriteLine("top") sw.Flush() result = sr.ReadLine s = result Catch ex As Exception MessageBox.Show("Error " & ex.Message) Finally sock.Close() End Try
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
|Office 365: Assigning MailboxPlan to a mailbox||8||72|
|Import a excel sheet in a grid||2||45|
|How does GeoJson relates to Leaflet and Mapbox?||4||50|
|Building Collections of Objects based on their Tag Property||33||55|
Join the community of 500,000 technology professionals and ask your questions.