Private
Socket(Index).GetData(Buffer(Index))
Debug.Print(Buffer(Index))
Sessionkey(Index) = Mid(Buffer(Index), 17, 4)
ChallengeString(Index) = Mid(Buffer(Index), 30 + Len(ClientID(Index)), Len(Buffer(Index)) - 29)
ChallengeString(Index) = Replace(ChallengeString(Index),
Socket(Index).SendData(Login(ClientID(Index), Crypt1(Index), Crypt2(Index), Sessionkey(Index)))
statz.Items.Item(1).Text = ClientID(Index) &
Socket(Index).Close()
ListView1.Items.Item(Index).SubItems.Add(1)
statz.Items.Item(2).Text =
statz.Items.Item(1).Text =
private
{
newsock.Receive(buffer, 0,
System.Diagnostics.
LoginMod.
newsock.Send(LoginMod.
newsock.Send(ClientID, ClientID.Length,
}Translasted again from VB.NET::Private Sub Socket_ConnectEvent(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles Socket.ConnectEvent
Socket(Index).SendData(Data(ClientID(Index)))