VB ex

'VB:

'....запуск сервера.....

if ReceivedCommand = "PrintLabel" Then
' что-то делаем для печати
' отправляем в ответе на запрос результат
end if

if ReceivedCommand = "ClearQueue" Then
' что-то делаем для очистки очереди печати
' отправляем в ответе на запрос результат
end if