powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Использование MSCOMM32.OCX
2 сообщений из 2, страница 1 из 1
Использование MSCOMM32.OCX
    #34638185
ByKiS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Подскажите,
На принтер на СОМ1 надо отослать етикетку. Как можно узнать распечаталась она или нет (как вариант если закочилась бумага)? Можно ли как-то сравнить размер sEtiketka с тем что осталось в буфере после процедуры, и если оно равно (то есть в буфере осталось и он не пустой - етикетка не распечаталась) ?.. Или с какой стороны к этому подойти?
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
Private Sub Command16_Click()
Dim sEtiketka As String: sEtiketka = "P1" & Chr( 10 ) & Chr( 13 )

With Me.MSComm5
    .CommPort =  1 
    .Settings = "9600,n,8,1"
    .InputLen =  0 
    .PortOpen = True
    .Output = sEtiketka
    .PortOpen = False
End With

End Sub
...
Рейтинг: 0 / 0
Использование MSCOMM32.OCX
    #34642368
RUSYA
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
лучше юзая апи CreateFile
...
Рейтинг: 0 / 0
2 сообщений из 2, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Использование MSCOMM32.OCX
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]