Принцип работы
07.06.2010
22:24
#2
"Вот ведь, чего только не придумают 
В общем, метод СкриптКонтрол.SendKeys("""") заставляет постоянно срабатывать функцию Обновлялка(), находящуюся в форме диалога, симулируя активность пользователя.
(как эту ссылку вставить, чтоб не рубилась она? в общем в конце ее "=VS.85).aspx")
> Sends one or more keystrokes to the active window (as if typed on the keyboard).
При этом в модуле объевлен глобальный флаг флПроцесс, в зависимости от значения которого Обновлялка() либо сразу прерывается, либо все таки занимается перебором элементов пока не дойдет до конца.
WScript это сервер сценариев и применяя:
СкриптКонтрол=СоздатьОбъект("WScript.Shell");
мы создаем только объект, способный отправлять серверу сценариев команды, а исполняются они не этим объектом, а сервером сценариев непосредственно, поэтому мы не получаем блокировок в 1С и по сути автор сумел создать двухпоточный алгоритм. Один поток = 1С, второй поток = сервер сценариев. СкриптКонтрол - средство обмена данными меж потоками."
В общем, метод СкриптКонтрол.SendKeys("""") заставляет постоянно срабатывать функцию Обновлялка(), находящуюся в форме диалога, симулируя активность пользователя.
(как эту ссылку вставить, чтоб не рубилась она? в общем в конце ее "=VS.85).aspx")
> Sends one or more keystrokes to the active window (as if typed on the keyboard).
При этом в модуле объевлен глобальный флаг флПроцесс, в зависимости от значения которого Обновлялка() либо сразу прерывается, либо все таки занимается перебором элементов пока не дойдет до конца.
WScript это сервер сценариев и применяя:
СкриптКонтрол=СоздатьОбъект("WScript.Shell");
мы создаем только объект, способный отправлять серверу сценариев команды, а исполняются они не этим объектом, а сервером сценариев непосредственно, поэтому мы не получаем блокировок в 1С и по сути автор сумел создать двухпоточный алгоритм. Один поток = 1С, второй поток = сервер сценариев. СкриптКонтрол - средство обмена данными меж потоками."
08.06.2010
10:53
#3
"Как ни странно но даже если закоментировать
СкриптКонтрол.SendKeys("""");
то-же работает...
[off]Принцип работы до меня вчера только в 11:00 вечера дошел... понедельник...[/off]"
СкриптКонтрол.SendKeys("""");
то-же работает...
[off]Принцип работы до меня вчера только в 11:00 вечера дошел... понедельник...[/off]"
1С V7.7 ЗиК 267 Документ "Ввод расчета сотруднику" - выбор вида начисленияДобаить общий журнал в 1С:8х
Читают тему
(гостей: 1)