Вопрос № 34532: Добрый день. Помогите выйти из положения. Есть терминальный режим работы 1с. Специалисты по работе с базой находятся в разных помещениях. Есть различные типы доступа к данным. Есть внутрибазовый чат написан в 1с специально для общения. НО!!! Если 1с ...Вопрос № 34542: Доброе время суток!
Просьба помочь разобраться.
Задача: необходимо через планировщик раз в сутки запускать на выполнение внешнюю обработку.
Пытыюсь реализовать через OLE. Запускающая часть на Dehphi.
//********************************...
Вопрос № 34.532
Добрый день. Помогите выйти из положения. Есть терминальный режим работы 1с. Специалисты по работе с базой находятся в разных помещениях. Есть различные типы доступа к данным. Есть внутрибазовый чат написан в 1с специально для общения. НО!!! Если 1с находится в свернутом виде, то адресат не видит на экране полученного сообщения (звуком пользоваться нет разрешения!!!). Помогите- есть ли какой нибудь чат который работает в терминальном режиме независимо от 1с!!! ОЧЕНЬ нужно!!!! Спасибо!!!
Отвечает: DrakoN
Здравствуйте, Ткаченко Алексей Васильевич!
Очень легко служба сообщений виндоус...net send работает всегда и везде..Для запуска необходимо включить службу(в SP2 по умолчанию отключена, в остальных ОС вроде включена)..
и рассылать сообщения всем или одному пользователю...Удачи!
--------- От Винта!
Ответ отправил: DrakoN (статус: 10-ый класс)
Отправлен: 01.02.2006, 11:07
Отвечает: Ovr1970
Здравствуйте, Ткаченко Алексей Васильевич!
Команда Net Send работает всегда, но на одном компьютере она получается для всех сразу. Посмотри Power Wow, может поможет.
Ответ отправил: Ovr1970 (статус: 8-ой класс)
Отправлен: 01.02.2006, 11:12
Отвечает: Шахрайчук Владимир Анатольевич
Здравствуйте, Ткаченко Алексей Васильевич!
Диспетчер Задач, закладка Пользователи Послать сообщение. Проверено, работает.
Доброе время суток!
Просьба помочь разобраться.
Задача: необходимо через планировщик раз в сутки запускать на выполнение внешнюю обработку.
Пытыюсь реализовать через OLE. Запускающая часть на Dehphi.
//********************************
var
res,res1:integer;
<skip>
res:=serv1C.initialize(serv1C.rmtrade,'/Dc:1CBases /NАдмин /Pпароль','');
if res = -1 then
begin
res1 := serv1C.ExecuteBatch('ОткрытьФормуМодально("Отчёт",,"C:1Cexport.ert")');
if res1 = -1 then
ShowMessage('Done')
else
ShowMessage('Fail 2');
end
else
ShowMessage('Fail 1');
В результате ВСЕГДА получаю сообщение "Done", но обработка не вызывается :(
Даже если в 'ОткрытьФормуМодально("Отчёт",,"C:1C<имя>.ert")' указываю несуществующий файл в res1 всё равно возвращается -1 (успешное завершение).
............
Пытался подойти с другой стороны: рабочую функцию из внешней обработки поместил в главный модуль.
При вызове
res1 := serv1C.ExecuteBatch('OLEExport()');
в res1 возвращает 0, а при вызове
res1 := serv1C.EvalExpr('OLEExport()');
получаю ошибку:
1 OLEExport<<?>>()
Функция не обнаружена OLEExport
.......
Кто что может посоветовать?
(оба варианта (внешняя обработка и функция глобального модуля) устраивают...
лишь бы хоть как-то заработало)
Отправлен: 01.02.2006, 13:20
Вопрос задал: Telran (статус: Посетитель)
Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 7)
Отвечает: Elric
Здравствуйте, Telran!
На делфи реализовать не смог -- не нашел как объект "V77.Application" создать. Вот рабоющий пример на VBS, думаю разберешься даже если этого языка не знаешь.
Далее создаешь текстовый файл и меняешь ему расширение на .vbs. Редактируется он в блокноте, запускается точно так же как .exe, т.е. двойным щелчком мыши.
Содержимое файла:
set serv1C = CreateObject("V77.Application")
res=serv1C.initialize(serv1C.rmtrade,"/Dc:1CBases /NАдмин /Pпароль","")
serv1C.OLEExport
serv1C=0
Вот, собственно, и всё. При желании можно сделать OLEExport() функцией и вставить проверки на результативность исполнения. Лично я тестировал на пустом внешнем отчете export.ert, его форма исправно открывалась.
В общем, эта схема работает. Если б я знал как в делфи создать нужный объект, написал бы тебе на делфи. Учитывая что ты получал какой-то результат, думаю этот нюанс тебе уже известен, так что можешь попробовать перевести код. Как вариант, можно попробовать вызывать этот .vbs из делфи.
--------- Мирный атом в каждый дом
Ответ отправил: Elric (статус: 3-ий класс)
Отправлен: 01.02.2006, 21:59
Отвечает: Ovr1970
Здравствуйте, Telran!
Попробуй в обработке устанавливать значение справочника, а после ее выполнения опрашивать этот элемент справочника.
Ответ отправил: Ovr1970 (статус: 8-ой класс)
Отправлен: 03.02.2006, 14:46