===[ Кстати о SysLog ]===

#post-id: 4536-17-16
#original-date: 26.12.2012 Wed
#original-time: 5:16 PM
#original-day:  4536
#original-host: WinXP Prof SP3 (Build 2600)

Вот код простейшего сервера OO Буду писать своё вместо тяжёленокого 
Ipswitch SysLogServer.

> Option Explicit
> 
> '====================================================================
> Private Sub wsSysLog_DataArrival(ByVal bytesTotal As Long)
>   Dim TXT As BStr
>   
>   Me.wsSysLog.GetData TXT, vbString, bytesTotal
>   
>   TXT = asTrimCRLF(TXT)
>   asTextBoxAddLine Me.txtLog.hWnd, TXT
> End Sub
> 
> '====================================================================
> Private Sub Form_Load()
>   Me.wsSysLog.Protocol = sckUDPProtocol
>   Me.wsSysLog.Bind 514
> End Sub
> 
> Private Sub Form_Unload(Cancel As Integer)
>   Me.wsSysLog.Close
> End Sub

#upd: Я ничего не понимаю! Оказывается, все модемы с прошикой 
      BusyBox шлют сообщения не по стандарту! Или это какая-то 
      другая версия стандарта, или я не тот RFC нашла =_= Короче, 
      там по идее должно быть так:

> <Код> Дата Машина Текст сообщения...

А прилетает так:

> <Код> Текст сообщения...