PureBoard

Verfasst: **05.02.2012 23:33**

Einen Client , der sich am Server anmeldet , was ist das ?

Wie sieht das denn Programmmässig aus.

Danke.

Gruss

Verfasst: **08.02.2012 02:11**

Ein sehr einfach gehaltenes Beispiel. Nur Verbindung herstellen und trennen werden angezeigt.

Server:

;Server

EnableExplicit

Define Event.i, Quit.i

InitNetwork()

OpenConsole()

If CreateNetworkServer(0,5000,#PB_Network_TCP)
  
  PrintN("Server Erstellt. Port: 5000")  
  
  Repeat
    
    Event = NetworkServerEvent()
    
    Select Event
        
      Case 1
        
        PrintN("Client verbunden. ID: " + Str(EventClient()))
        
      Case 4
        
        PrintN("Client getrennt. ID: " + Str(EventClient()))
        
    EndSelect  
     
    Delay(10)
     
  ForEver
  
  CloseConsole() 
      
EndIf

Client:

Code: Alles auswählen

;Client

EnableExplicit

Define Event.i, Quit.i, ConID.i

#IP = "127.0.0.1"

InitNetwork()

OpenConsole()

ConID = OpenNetworkConnection(#IP,5000,#PB_Network_TCP)

If ConID

  PrintN("Verbindung hergestellt.")
  PrintN("ServerIP: " + #IP + "  Port: 5000")
  
  Repeat
    
    Event = NetworkClientEvent(ConID)
    
    Select Event
        
     
        
    EndSelect  
     
    Delay(10)
     
  ForEver
  
  CloseConsole() 
      
EndIf

Verfasst: **08.02.2012 11:35**

Jup danke für die Info.

Den Server hab ich, das ist der Zusiserver.

Wie kann ich jetzt mit deinem Clienten Daten zum Zusiserver senden um ihn mitzuteilen, welche Daten ich bekommen möchte und er mit dann die Daten zuschickt , die ich dann mit einem Eventablauf empfangen möchte ?
Danke

Gruss

Verfasst: **08.02.2012 14:39**

lies in der Protokoll-Beschreibung des Zusi servers (oder der Hersteller) einfach nach.
Wenn du keine Protokoll-Beschreibung hast, frag beim hersteller nach.
Alles andere ist Reverse Engineering und kann viel Zeit kosten.
Das schaffst du ansonsten evtl. nicht mehr.........

Verfasst: **08.02.2012 15:10**

Jup, danke.

Habe es jetzt gelöst dank eurer Hilfe hier, es funktioniert jetzt mit dem Zusiserver zusammen.

Gruss

PureBoard

TCP-Daten empfangen...

Re: TCP-Daten empfangen...

Re: TCP-Daten empfangen...

Re: TCP-Daten empfangen...

Re: TCP-Daten empfangen...

Re: TCP-Daten empfangen...