[VB6] Netzwerktunnel aufbauen o. ä

Hallo,
ich habe einen Chat geschrieben, der über das Winsock-Control kommuniziert. Jetzt habe ich das Problem, dass ich keine Nachricht empfangen kann, da ich hinter einem Router hänge. Wie kann ich in dem Programm den Router umgehen bzw. die Firewall oder einen Netzwerktunnel aufbauen?

Danke für eure Hilfe

Pascal