multiple connections vb.net

[VITAS]

Hi
Im trying to program a irc client and got stuck in trying to establish
multiple server connections. The core problem is, that i dont know how many
connections i will be using so i tried a array with the type tcpclient, but
it doesnt work.

my code:

Public Class IRCtest

Private con As New TcpClient <-it works with a normal var but not if i try
to make it an array.

Private Sub btncon_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles btncon.Click

If btncon.Text = "Connect" Then

servcount = servcount + 1

servers(0, 0) = boxserver.Text

con.Connect(boxserver.Text, boxport.Text)

Dim sendBytes As [Byte]() = Encoding.ASCII.GetBytes(": NICK " + txtnick.Text
+ Chr(13))

con.GetStream.Write(sendBytes, 0, sendBytes.Length)

sendBytes = Encoding.ASCII.GetBytes(": USER VITAS 0 * :VITAS IRC" + Chr(13))

con.GetStream.Write(sendBytes, 0, sendBytes.Length)

nicklist.Nodes.Add(servcount + ",0", boxserver.Text)

btncon.Text = "Disconnect"

Else

con.Client.Close()

btncon.Text = "Connect"

End If

End Sub

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles reader.Tick

If con.GetStream.DataAvailable Then <- this is a problem if i use arrays (it
gives a error saying, that i cant use undeclared values or something like
that)

output()

End If

End Sub

Private Sub nicklist_NodeMouseClick(ByVal sender As System.Object, ByVal e
As System.Windows.Forms.TreeNodeMouseClickEventArgs) Handles
nicklist.NodeMouseClick

Dim nodepath() = Split(",", nicklist.SelectedNode.Name)

txtstatus.Clear()

txtstatus.Text = serverstxt(nodepath(0), nodepath(1)) <- ive got a tree view
control and try to make a tree of servers / channels only showing the text
of the marked one

End Sub

End Class

VITAS

[Hlrsr]

Why not using an Array List and adding to it the new TcpClient object? Then,
when the coms between client-server are finished removing it from the list.
I am doing this with sockets and it works perfect.

Regards
GM.
"VITAS" <[e-mail]> wrote in message
news:43***********************@news.kamp.net...

Hi
Im trying to program a irc client and got stuck in trying to establish
multiple server connections. The core problem is, that i dont know how many connections i will be using so i tried a array with the type tcpclient, but it doesnt work.

my code:

Public Class IRCtest

Private con As New TcpClient <-it works with a normal var but not if i try
to make it an array.

Private Sub btncon_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles btncon.Click

If btncon.Text = "Connect" Then

servcount = servcount + 1

servers(0, 0) = boxserver.Text

con.Connect(boxserver.Text, boxport.Text)

Dim sendBytes As [Byte]() = Encoding.ASCII.GetBytes(": NICK " + txtnick.Text + Chr(13))

con.GetStream.Write(sendBytes, 0, sendBytes.Length)

sendBytes = Encoding.ASCII.GetBytes(": USER VITAS 0 * :VITAS IRC" + Chr(13))
con.GetStream.Write(sendBytes, 0, sendBytes.Length)

nicklist.Nodes.Add(servcount + ",0", boxserver.Text)

btncon.Text = "Disconnect"

Else

con.Client.Close()

btncon.Text = "Connect"

End If

End Sub

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles reader.Tick

If con.GetStream.DataAvailable Then <- this is a problem if i use arrays (it gives a error saying, that i cant use undeclared values or something like
that)

output()

End If

End Sub

Private Sub nicklist_NodeMouseClick(ByVal sender As System.Object, ByVal e
As System.Windows.Forms.TreeNodeMouseClickEventArgs) Handles
nicklist.NodeMouseClick

Dim nodepath() = Split(",", nicklist.SelectedNode.Name)

txtstatus.Clear()

txtstatus.Text = serverstxt(nodepath(0), nodepath(1)) <- ive got a tree view control and try to make a tree of servers / channels only showing the text
of the marked one

End Sub

End Class

VITAS