Private Sub CreateConnecting()
      Dim ipTargetAdress As IPAddress
      Dim m_Socket As Socket
      Dim ipEntry As IPHostEntry
 
      ipEntry = Dns.GetHostEntry("pop.gmx.net")
      ipTargetAdress = ipEntry.AddressList(0)
 
      'IPEndpoint erstellen
      Dim remoteEP As New IPEndPoint(ipTargetAdress, 110)
 
       Try
         m_Socket = New Socket(AddressFamily.InterNetwork, SocketType.Stream, _
           ProtocolType.Tcp)
         m_Socket.Connect(ipTargetAdress, 110) 
      Catch ex As Exception
 
      End Try
End Sub

Zitat:

{"Das Objekt des Typs System.Int32 kann nicht in Typ System.Collections.ArrayList umgewandelt werden."}