🚀 go-pugleaf

Ik heb dus een client-server gebaseerd programma. De sub 
ProcessCommands() wordt aangeroepen als er een bericht van de server 
door de client wordt ontvangen. Deze sub verwerkt dus het bericht. De 
server stuurt enkele berichten, de client verwerkt deze en stuurt 
eventueel berichten terug. Op een bepaald moment stuurt de server het 
bericht "xxxxx" en alles loopt vast (zoals in de code hieronder aangegeven).


CLIENT:


     Private Sub ProcessCommands(ByVal strMessage As String)
         Dim dataArray() As String

         ' Message parts are divided by "|"  Break the string into an 
array accordingly.
         dataArray = strMessage.Split(Chr(124))

         ' dataArray(0) is the command.
         updatestatus(dataArray(0))
         Select Case dataArray(0)
	    Case ...

             Case "xxxxx"
                 MsgBox("nu de add")
			'DIT KRIJG IK TE ZIEN

                 add(dataArray)		
			'DEZE METHODE VOERT HIJ NIET UIT

                 MsgBox("voila, zo simpel is 't ?")	
			'DEZE MSGBOX KRIJG IK NOOIT TE ZIEN

                 SendData("OK")		
			'DOORDAT HIJ DIT NIET TERUGZEND, LOOPT HET PROG 				'VAST

	    Case ...

     end sub


SERVER:

...code is van geen belang (volgens mij toch niet)...


Waar kan het probleem zitten?  Het is opmerkelijk dat ik de 1e MsgBox te 
zien krijg. Ik heb in de methode add() ook al een msgbox gezet (op de 1e 
uitvoerbare regel), en die krijg ik dus niet te zien. Hij stopt dus 
gewoon na de 1e msgbox("nu de add").

Iemand suggesties ?

bedankt,

	Snuyt