Webmaster Forum Logo Part 1 Webmaster Forum Logo Part 2
Webmaster Forum Logo Part 3
     
 
  :: Anmeldung

Benutzername:

Registrierung...

Passwort:

Passwort vergessen?

angemeldet bleiben


  
  :: Umfrage
Welche sozialen Netzwerke benutzt du regelmäßig?

 Facebook
 Webmaster - WebspaceWebmaster - WebspaceWebmaster - Webspace 73%
 keines
 Webmaster - WebspaceWebmaster - WebspaceWebmaster - Webspace 22%
 Google+
 Webmaster - WebspaceWebmaster - WebspaceWebmaster - Webspace 19%
 Twitter
 Webmaster - WebspaceWebmaster - WebspaceWebmaster - Webspace 11%
 Xing
 Webmaster - WebspaceWebmaster - WebspaceWebmaster - Webspace 6%
 schülerVZ
 Webmaster - WebspaceWebmaster - WebspaceWebmaster - Webspace 5%
 meinVZ
 Webmaster - WebspaceWebmaster - WebspaceWebmaster - Webspace 4%
 studiVZ
 Webmaster - WebspaceWebmaster - WebspaceWebmaster - Webspace 4%
 MySpace
 Webmaster - WebspaceWebmaster - WebspaceWebmaster - Webspace 2%
 LinkedIn
 Webmaster - WebspaceWebmaster - WebspaceWebmaster - Webspace 2%

 ges. 392 Stimmen
 
  :: Buttons

Valid XHTML 1.0 Transitional

† Luna †

Doppel-As

Dabei seit: 10.04.2005

Beiträge: 117

 

1 Zum Seitenanfang

Samstag, 31. Dezember 2005, 18:52

VB6: Variabel als WinSock deklarieren - wie?

Ich versuche in Visual Basic 6, WinSock-Objekte *dynamisch* zu erzeugen, aber irgendwie kriege ich das nicht hin.
Ich benutze folgenden Code:

Quellcode

1
2
3
4
5
6
7
8
9
10
11
12
13
Dim ws(10000) As Winsock
Dim wscount As Long

Private Sub Form_Load()
wscount = 0
Winsock1.Bind
Winsock1.Listen
End Sub

Private Sub Winsock1_ConnectionRequest(ByVal requestID As Long)
ws(wscount).Accept requestID
wscount = wscount + 1
End Sub


Aber sobald ich mich verbinde, komm folgendes:

Zitat

Laufzeitfehler '91':

Objektvariable oder With-Blockvariable nicht festgelegt

_W_eiter -|- _B_eenden -|- _D_ebuggen -|- _H_ilfe

Und Set ws(xxx) = New WinSock ist laut Visual Basic "unzulässig"

Statisch WinSock2.Accept requestID funktioniert, aber dann bin ich ja festgelegt :(
Wie mache ich das richtig? Ich möchte das dynamisch und jetzt nicht für jede mögliche Verbindung noch ne WinSock aufs Formular haun
...
 

nocturne

Kaiser

Dabei seit: 06.01.2005

Beiträge: 1 167

 

2 Zum Seitenanfang

Montag, 20. Februar 2006, 09:08

Try this:
1000) as New Winsock1

... Oder mach eine Kopie vom "Form1" !?!. <-- Halte ich eh für die bessere Methode. Du hast dann noch platz im Form1 für andere Informationen (z.b.: Debuginformationen)

Dieser Beitrag wurde bereits 3 mal editiert, zuletzt von »nocturne« (20. Februar 2006, 09:12)

 

† Luna †

Doppel-As

Dabei seit: 10.04.2005

Beiträge: 117

 

3 Zum Seitenanfang

Dienstag, 28. Februar 2006, 22:15

Das Problem besteht immernoch.

Ein "As New" ist laut VB eine "Ungültige Verwendung des Schlüsselwortes New" :( Funktioniert nicht.

Und was meinst du mit "Kopie von Form1"?

Hauptsache ich habe nicht so viele Komponenten auf dem Formular wie ich Sockets habe.
...
 

nocturne

Kaiser

Dabei seit: 06.01.2005

Beiträge: 1 167

 

4 Zum Seitenanfang

Donnerstag, 27. April 2006, 16:21

nun, das dürften mehrere zehntausend sein.

stell dir vor du hast ein neues Form in das Projekt eingefügt, stell dir vor, diese form heist "Form2".

Stell dir nun vor, in dieser Form2, ist ein winsock-objekt.

Fantasiere dir dazu diesen aufruf:

DIM neuesFenster = new Form2


jetzt kannst du auf das Winsock zugreifen mit:

neuesFenster.winsock32.connect.......


Noch Fragen? Nein?!
Energie!