Имя: Пароль:
1C
1C 7.7
v7: Подключение весов к 1С
,
0 KrutoyDron
 
26.12.12
13:28
Здравствуйте. Хочу подключить весы к 1С использую MSCOMM32.OCX. все бы нормально но не все. С помощью одной проги узнал что весы отправляют в середине строки символ #0 и 1С распознает его как конец строки. К примеру "вес # 30 kg", "вес" получаю а "30 kg" нет. как решить проблему помогите.
1 defini
 
26.12.12
13:50
(0) А СтрЗаменить() не?
2 KrutoyDron
 
26.12.12
14:12
(1) нет
делаю так Сообщить(СтрЗаменить(Драйвер.Input, Симв(0),"D"));
3 defini
 
26.12.12
14:53
А если так:
Стр = СокрЛП(Драйвер.Input);
Сообщить(СтрЗаменить(Стр, Симв(0),"D"));
4 KrutoyDron
 
26.12.12
15:23
(3) тоже нет
5 KrutoyDron
 
26.12.12
15:34
Процедура ПриОткрытии()

Попытка
   Драйвер=СоздатьОбъект("MSCOMMLib.MSComm.1");
Исключение
   Предупреждение("Не могу создать объект");    
   Возврат;
КонецПопытки;
Драйвер.CommPort = 2;  
Драйвер.Settings = "9600,N,8,1";

Попытка
   Драйвер.PortOpen=1;
Исключение
   Предупреждение("Не могу открыть порт");    
   Возврат;
КонецПопытки;
Если Драйвер.PortOpen=0 Тогда
   Предупреждение("Не открыт порт");    
   Возврат;
КонецЕсли;  
Сообщить("Создан объект "+Драйвер+" и включен");
КонецПроцедуры

//*******************************************
Процедура ПриЗакрытии()
   Драйвер.PortOpen=0;
   Драйвер=0;
КонецПроцедуры
6 Lionee
 
26.12.12
16:42
а что за весы ?
7 Torquader
 
26.12.12
19:43
Предлагается использовать MSScriptControl, где вставить код на VbScript, передающий, что нужно, и анализирующий, как нужно.
А этот код уже вызывать через команду Run, от MsScriptControl.
Также можно написать OLE-объект через Windows Script Component, который возвращает нужное число или код ошибки, а все танцы с весами будут вообще далеко от 1С.
8 KrutoyDron
 
26.12.12
23:12
(6) cas nt-570a
9 Ganiev
 
27.12.12
09:15
Стр = СокрЛП(Драйвер.Input);
Код1 = КодСимв("#");
Код2 = КодСимв("0");
СтрЗаменить(Стр,Симв(Код1),"D");
СтрЗаменить(Стр,Симв(Код2),"D");
Сообщить(Стр);
10 KrutoyDron
 
27.12.12
09:27
(9) Код символа я как раз знаю это "0" в 1С или #0 в системах типа дэлфи и т.д или 00 как HEX
11 Ganiev
 
27.12.12
09:39
Если не ошибаюсь то 1с распознает #0 как 2 символа # и 0 !
12 timax
 
27.12.12
09:44
Читай руководство к весам. Обычно в самой железке куча настроек в т.ч. по формату сообщения. Работал с весам AND и Vibra.
13 KrutoyDron
 
27.12.12
09:53
народ вот руководство но на энглише кто может разобратся
http://www.cas-polska.com.pl/zalacznik.php?id=321&element=335
14 KrutoyDron
 
27.12.12
09:58
есть у кого-нибудь хотябы похожее на русском