Is it possible to create a honeypot in vb.net. Just a simple honeypot that opperated on a port of my computer. Could it give the ip of the computer trying to connect? or the total bytes of data being sent? Would it be possible to create a fake telnet so time is wasted trying to crack the password? The bytes of data being sent seems doable. Here is wat i have so far:
Code:
  Sub honeylisten(ByVal obj As Object)  'Thread
        Dim port = tports(CStr(obj))
        Try
            setresults("Honeypot Succesfully Created on port: " & port & vbNewLine)

            honeypot(CInt(obj)).AcceptTcpClient()
            setresults("Connection Attempt made on: " & port)

        Catch ex As Exception
            MsgBox(ex.Message)
        Finally
            honeypot(CInt(obj)).Server.Close()
            honeypot(CInt(obj)).Stop()
            setresults("Honeypot Closed on port: " & port & vbNewLine)
        End Try
    End Sub
All it does is say a connection attempt was made. Useful to see if your being portscanned. But what else would be possible in vb.net?