Имя: Пароль:
1C
 
Текущий вход как OLE?
0 1Сергей
 
12.09.09
09:55
Извиняюсь за глупый вопрос. Была вроде функция чтобы проверить текущий вход в базу через оле или просто? как называется?
1 ДенисЧ
 
12.09.09
09:59
с 8кой не путаешь?
2 1Сергей
 
12.09.09
10:01
(1) Мне в 7 надо. Нету чтоль?
3 Rie
 
12.09.09
10:01
(0) А зачем? Может, задачу можно как-то иначе решить?
4 1Сергей
 
12.09.09
10:03
(3) Задача такова: при начале работы системы, если это вход через ОЛЕ, то не делать лишних телодвижений. Могу просто по имени пользователя, но...
5 ДенисЧ
 
12.09.09
10:09
(2) НЯЗ, нет такого
6 1Сергей
 
12.09.09
10:14
(5) Понял, спасибо
7 dk
 
12.09.09
10:21
можно попытаться определить командную строку процесса, но муторно и не 100%
8 smaharbA
 
12.09.09
10:56

ШелСкрипт = СоздатьОбъект("WScript.Shell");
Локатор=СоздатьОбъект("wbemscripting.swbemlocator");
Сервис=Локатор.ConnectServer(Компьютер,"root\cimv2");
Выполнение=ШелСкрипт.Exec("rundll32.exe kernel32,Sleep");
Процесс=Сервис.Get("Win32_Process.Handle="+Выполнение.ProcessID);
ПроцессИД=Процесс.ParentProcessID;
Процесс.Terminate();
Процесс=Сервис.Get("Win32_Process.Handle="+ПроцессИД);
Если Найти(Процесс.CommandLine,"-Embedding")>0 Тогда
  //Это ОЛЕ
Иначе
 Сообщить("Нифига не ОЛЕ");
КонецЕсли;

но начиная с виндуз ХП
9 smaharbA
 
12.09.09
10:57
Компьютер=".";
10 Эльниньо
 
12.09.09
12:47
Отдельного юзера для Оли не судьба?
11 1Сергей
 
12.09.09
12:56
(10) см п.(4) второе предложение
12 Эльниньо
 
12.09.09
12:59
(11) Что - но?
13 1Сергей
 
12.09.09
13:01
(12) Я не единственный человек, который будет сопровождать эту базу. Найдутся люди, которые добавят новых юзверей для ОЛЕ входа
14 1Сергей
 
12.09.09
13:02
Сделал так, как Вы и говорите. Просто мне казалось, что есть такая штатная функция - оказалось нет. На нет и суда нет
15 Mikeware
 
12.09.09
13:05
(14) А зачем?
16 1Сергей
 
12.09.09
13:09
(15) База не типовая, не я её автор. Там при старте делаются некоторые проверки и обработки, которые занимают до 10 секунд времени. Нет смысла их выполнять при подключении к ним извне.
17 Mikeware
 
12.09.09
13:20
(16) А зачем цепляться по OLE?
18 1Сергей
 
12.09.09
13:24
(17) Это так важно? Зачем мне весь процесс расписывать? Проблема (которой и не было даже) решена
19 Mikeware
 
12.09.09
13:32
(18) Просто для доступа к данным других баз есть более быстрые инструменты...
20 1Сергей
 
12.09.09
13:34
(19) Прямые запросы?
21 Mikeware
 
12.09.09
13:42
(20) А почему бы и нет? На порядок (как минимум) быстрее... Количество подключаемых баз не ограничивается. И тому подобные вкусности...
22 1Сергей
 
12.09.09
13:44
(21) Тут мой промах. Не осилил еще 1С++, изучаю