vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Zippen wie die Profis!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2024
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

VB.NET - Fortgeschrittene
Kommunikation zwischen Threads 
Autor: RaMireZ
Datum: 30.08.08 04:05

Hallo,

ich schreibe gerade eine Server-Client-Anwendung mit VB .Net 2008.
Ich habe früher mit VB6 gearbeitet und dabei das Winsck-Control benützt.
Da ich mich aber auch mal auf den .net krämpel einlassen will, hab ichs mal so probiert
(für mein Problem ist nur der SourceCode vom Server relevant):
Imports System.Net.Sockets
 
Public Class Form1
    Dim sck_Server_TcpListener As TcpListener
    Dim sck_ServerTcpClient As TcpClient
    Dim sck_Server_NWS As NetworkStream
    Dim bytes() As Byte
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles MyBase.Load
        sck_Server_TcpListener = New TcpListener(System.Net.IPAddress.Parse(0), _
        44000)
        sck_Server_TcpListener.Start()
        sck_Server_TcpListener.BeginAcceptTcpClient(AddressOf OnConnect, New _
          Object)
    End Sub
    Private Sub OnConnect(ByVal data As System.IAsyncResult)
        Log("connected")
        sck_Server_TcpListener.EndAcceptTcpClient(data)
        sck_ServerTcpClient.GetStream()
 
        ReDim bytes(sck_ServerTcpClient.ReceiveBufferSize)
        sck_Server_NWS.BeginRead(bytes, 0, CInt( _
          sck_ServerTcpClient.ReceiveBufferSize), AddressOf OnDataArrival, New _
          Object)
 
    End Sub
 
    Private Sub OnDataArrival(ByVal data As System.IAsyncResult)
        Dim clientdata As String = System.Text.Encoding.ASCII.GetString(bytes)
        ListView1.Items.Add(clientdata)
        sck_Server_NWS.BeginRead(bytes, 0, CInt( _
          sck_ServerTcpClient.ReceiveBufferSize), AddressOf OnDataArrival, New _
          Object)
    End Sub
 
    Private Sub Log(ByVal Text As String)
        ListView1.Items.Add(Text)
    End Sub
End Class
sobald also daten vom client kommen, sollen diese in die ListView1 geschrieben werden.
Jedoch gibt es eine Crossthreading-Fehlermeldung (an der Fettgedruckten Stelle). Das ist mir auch verständlich, weil der ConnectionThread ja nicht aufs ListView zugreifen darf, weil dieses nicht in diesem Thread erzeugt wurde. Aber wie löse ich das Problem jetzt?
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Kommunikation zwischen Threads2.866RaMireZ30.08.08 04:05
Re: Kommunikation zwischen Threads2.760ModeratorRalf Ehlert30.08.08 08:39
Re: Kommunikation zwischen Threads2.429ModeratorRalf Ehlert30.08.08 08:51
Re: Kommunikation zwischen Threads2.095RaMireZ31.08.08 03:14
Re: Kommunikation zwischen Threads2.007Drapondur31.08.08 16:02
Re: Kommunikation zwischen Threads2.027RaMireZ31.08.08 18:33
Re: Kommunikation zwischen Threads2.003Drapondur31.08.08 19:42
Re: Kommunikation zwischen Threads2.029RaMireZ31.08.08 19:56
Re: Kommunikation zwischen Threads2.020Drapondur31.08.08 20:14
Re: Kommunikation zwischen Threads2.111RaMireZ01.09.08 01:07
Re: Kommunikation zwischen Threads1.968Drapondur01.09.08 01:27
Re: Kommunikation zwischen Threads2.087RaMireZ01.09.08 01:43
Re: Kommunikation zwischen Threads2.132Drapondur01.09.08 01:49
Re: Kommunikation zwischen Threads1.991RaMireZ01.09.08 02:08
Re: Kommunikation zwischen Threads2.048Drapondur01.09.08 02:26
Re: Kommunikation zwischen Threads792Liam79Xbm12.10.20 14:02
Re: Kommunikation zwischen Threads1.040Liam79Xbm30.10.20 12:29

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2024 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel