Сканеры штрих-кодов, ридеры и прочее под терминалом
Управление com-портами клиентских машин из под терминала.
- Описание
- Подробнее
Описание
Праздный вопрос: как работать ридерами из 1С, которая стоит на сервере?
Вариантов решения данной проблемы в инете довольно много, предлагаю на Ваш суд еще один способ. Вот кусочек кода из глобальника при старте системы:
НомерПорта
= 0
; Network
= СоздатьОбъект(«WScript.Network»)
; WshShell
=СоздатьОбъект(«WScript.Shell»)
;
Если
СокрЛП
(
Network
.
UserName
) = «kassa1» Тогда//определили имя терминального пользователя
НомерПорта
= 1
; WshShell
.
Run
(«cmd /c «+«net use /delete com1»,0)
;
//удалили com1, оставшийся от пред.сеанса
WshShell
.
Run
(«cmd /c «+«net use com1 \\tsclient\com1»,0)
;
//добавили com1, для тек.пользователя ИначеЕсли
СокрЛП
(
Network
.
UserName
) = «kassa2» Тогда
НомерПорта
= 2
; WshShell
.
Run
(«cmd /c «+«net use /delete com2»,0)
; WshShell
.
Run
(«cmd /c «+«net use com2 \\tsclient\com1»,0)
;
КонецЕсли
;
Если
НомерПорта
<> 0 Тогда //тут полет программерской мысли… Иначе //а вот здесь непредвиденная ситуация… КонецЕсли
;
Это все прекрасно работает 2000 и 2003 серверах, для Citrix необходимо вместо «tsclient» использовать «client».
Таким способом подключал сканера штрих-кодов, ридеры, терминалы сбора данных, весы.

