Flash Client  и Basic Server. Есть проблемы. Конектируется, сервер пулучает данные от клиента, но клиент нехочет получать ответ от сервера. вот отрывок кода Flash 


client.onData = on(dat);

function on(dat) {
    trace(dat);
}
я думаю проблема в этом месте.

Подскайите как решить проблему, может быть Basic  офигел? 

Что можно сказать по клачку волос...
Сокрее всего он, флешь, просто получает данные которых ваще еще нет... 

а сервер отправляет с завершающим нулем пакет? сделано через XMLSocket? 

Вот отрывок из Бейсика

Private Sub Form_Load()
' Set the LocalPort property to an integer.
' Then invoke the Listen method.
tcpServer.LocalPort = 5555
tcpServer.Listen
End Sub

Private Sub send_Click()
tcpServer.SendData txtSendData.Text + ChrB(48)  ------------------ здесь в конце прибавляю 0
End Sub

Private Sub tcpServer_ConnectionRequest _
(ByVal requestID As Long)
' Check if the control's State is closed. If not,
' close the connection before accepting the new
' connection.
If tcpServer.State <> sckClosed Then _
tcpServer.Close
' Accept the request with the requestID
' parameter.
frmServer.Text1 = "connect"
tcpServer.Accept requestID
End Sub



Private Sub tcpServer_DataArrival _
(ByVal bytesTotal As Long)
' Declare a variable for the incoming data.
' Invoke the GetData method and set the Text
' property of a TextBox named txtOutput to
' the data.
Dim strData As String
tcpServer.GetData strData
txtOutput.Text = strData
End Sub

 Проблема в том, что клиент не понимает сервера.

 

Эм. Надо добавлять не цифру, а 0 байт.
т.е. если ChrB возвращает символ из кода (я хз как что в васике), то должно быть ChrB(0)

PS: используйте подсветку кода 

Если ты не догнал.. то тут AS опсуждают... нам твой бейсик...   
Давай свой код на AS.... и ни надо ни чего другого...