Componente para Comunicar via Protocolo TCP.

[scorch]

Alguém sabe de algum? O que eu queria era um que me permitisse ter um computador que fizesse de servidor, podendo ter vários pedidos pendentes, em vez de um. Eu já experimentei o WinSock Orcas, mas esse só permitia que o servidor tivesse um cliente de cada vez. E tem de ser gratuito.

[n3lThon]

Alguém sabe de algum? O que eu queria era um que me permitisse ter um computador que fizesse de servidor, podendo ter vários pedidos pendentes, em vez de um. Eu já experimentei o WinSock Orcas, mas esse só permitia que o servidor tivesse um cliente de cada vez. E tem de ser gratuito.

O WinSock Orcas permite teres vários utilizadores ligados. Não é no exemplo que vem de origem configurado para abrir no arranque, mas outro que está no projecto. Vai ao Solution Explorer e o server é o que diz "Chatter Server" e o cliente diz "Chatter Client".

[scorch]

Vou investigar. Eu tinha dito que ele não dava para ter mais que um cliente, porque necessita de estar desligado para poder conectar. Era assim uma coisa parecida. E dava-me erro quando eu tinha 2 clientes.

[Ivo Pereira]

Btw, se decidires optar por outro componente, diz qualquer o que usaste 🙂

Cumps

[scorch]

Ainda estou a tentar usar o WinSock Orcas, mas não está a dar resultado. Se for só um cliente, ele funciona. Se for mais, ele conecta mas não envia/recebe nada.

[n3lThon]

Ainda estou a tentar usar o WinSock Orcas, mas não está a dar resultado. Se for só um cliente, ele funciona. Se for mais, ele conecta mas não envia/recebe nada.

Analisa o código do exemplo que estou a falar. É um chat em que tens de usar os comandos criados lá e que funcionam quase como o irc. Essa validação está no "Chatter Server". A class "UserCollection" também faz parte dele.

[scorch]

É esse exemplo que eu estou a seguir. Ele conecta, tal como lá, o servidor recebe a conexão, mas não recebe as mensagens enviadas pelo cliente.

[n3lThon]

Experimenta fazer "/login nome 123" no cliente. Podes executar tal e qual como está porque ele não valida o login. Tem a função para o fazer, mas a mesma está vazia. Já deve de dar para comunicares.

[scorch]

Não é isso, 🙂 o exemplo funciona bem, o meu programa é que não. 😉

[n3lThon]

Não é isso, 😉 o exemplo funciona bem, o meu programa é que não. 🙂

Ok, não tinha percebido.  🙂

Ainda estás a usar a classe DataPacket?

[scorch]

Não, uso apenas a função send.

[n3lThon]

Mostra o código do send e do evento DataArrival da classe _wsks.

[scorch]

A porta e o servidor estão bem configurados no próprio componente.

Tenho assim:

    Private Sub _wsks_DataArrival(ByVal sender As Object, ByVal e As Winsock_Orcas.WinsockDataArrivalEventArgs) Handles _wsks.DataArrival
        WriteConsole(CStr(_wsks.Item(e.SourceIP).Get()), rtxt_server)
    End Sub

Private Sub txt_client_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txt_client.KeyPress
        If e.KeyChar = Chr(13) Then

            If txt_client.Text = "" Then
                WriteConsole("Tem de prêncher algo para enviar", rtxt_client)
            ElseIf txt_client.Text = "connect" Then
                WriteConsole("A conectar ao servidor " & Client_Sock.RemoteHost & " pela porta " & Client_Sock.RemotePort, rtxt_client)
                Application.DoEvents()
                Client_Sock.Connect("127.0.0.1", 1361)
            Else
                WriteConsole("A enviar " & Chr(34) & txt_client.Text.Trim() & Chr(34), rtxt_client)
                Client_Sock.Send(txt_client.Text.Trim)
                WriteConsole("Enviado", rtxt_client)
            End If
            txt_client.Text = ""
        End If
    End Sub