[Vb6] CSocketMaster

[nicok]

Hi,

ich möchte für mein Projekt die CSocketMaster-Klasse benutzen:
http://www.planet-source-code.com/vb/scripts/ShowCode.asp?txtCodeId=52072&lngWId=1

Das ganze besteht aus einem Modul und einem Klassenmodul.
In der Readme steht folgendes:

1) Add CSocketMaster.cls and modSocketMaster.bas to your project.
2) In a Form, Class or UserControl add this line in the declaration area for each socket you want to use:

Dim WithEvents NameOfSocket As CSocketMaster

where 'NameOfSocket' is any name you want for the socket.

3) Finally you need to create the object before using it. Add this line in a sub or funtion:

Set NameOfSocket = New CSocketMaster

That's it.


Das ist auch alles kein Problem, jedoch möchte ich von einem weiteren Modul folgenden Befehl ausführen:
Winsock.SendData "hallo"

"Dim WithEvents Winsock As CSocketMaster"
und
"Set Winsock = New CSocketMaster"
stehen bei mir in Form1. Wenn ich aber aus einem Modul nun mit Winsock opperieren möchte bekomm ich diesen Fehler:

Objekt erforderlich

Naja was kann ich da machen?

 

[Zvoni]

In einem Modul

Public WithEvents Winsock as CSocketMaster (Die Deklaration in der Form1 solltest dann aber löschen, es sei denn du willst es so)

sollte jegliche Unbill auflösen

 

[nicok]

Bekomm ich einen Error bei WithEvents:

"Nur in ObjektModul zulässig"

 

[Zvoni]

Ach Mist, stimmt ja. Hatte ich vergessen. Events kann man nur in einem Objekt-Modul abfangen.

Tja, dann musst du eben in jedem weiteren Objekt-Modul die Dim-Dekla einsetzen, oder du deklarierst das Ding in Form1 als Public, und kannst es dann aus anderen Modulen mit

Form1.Winsock.SendData "blabla"

verwenden