Имя: Пароль:
1C
 
ЗапуститьПриложение("Sleep 1",,Истина);
0 Powerfool
 
12.09.14
09:13
Сабж не взлетает. Пишет "Не удается найти "Sleep 1". Проверьте, правильно ли указано имя и повторите попытку".
1 Wobland
 
12.09.14
09:16
предлагаешь проверить? 500 рублей
2 dmpl
 
12.09.14
09:17
(0) Для начала помести sleep.exe в путь, доступный через PATH.
3 Powerfool
 
12.09.14
09:18
(1) Чет дешево берешь. Я бы больше попросил
4 kosts
 
12.09.14
09:21
Microsoft Windows [Version 6.1.7601]
(c) Корпорация Майкрософт (Microsoft Corp.), 2009. Все права защищены.

c:\>Sleep 1
"Sleep" не является внутренней или внешней
командой, исполняемой программой или пакетным файлом.
5 Powerfool
 
12.09.14
09:26
(4) Блин и правда. Я сначала через PowerShell пробовал. Там проглотил
6 Fragster
 
гуру
12.09.14
09:27
7 Powerfool
 
12.09.14
09:27
тогда вопрос поставлю по другому. Есть внутренняя команда венде, типа "расслабься и кури бамбук"?
8 Fragster
 
гуру
12.09.14
09:27
(7) пинг, чО
9 ДенисЧ
 
12.09.14
09:27
(7) ping -w1000 127.0.0.01
10 Fragster
 
гуру
12.09.14
09:27
только нафига?
11 Эмбеддер
 
12.09.14
09:28
Процедура глПауза(Сек) экспорт
    scr=Новый COMОбъект("WScript.Shell");
    scr.Run("ping 127.0.0.1 -n "+(Сек+1),0,1);
КонецПроцедуры
12 Powerfool
 
12.09.14
09:30
(6) Если я правильно понимаю, всё это грузит проц. Я то думал над паузой которая его освободит
13 ArchLord
 
12.09.14
09:32
(12) ужс как грузит проц
Процедура Проведение()
  док=СоздатьОбъект(«Документ»);
  док.ВыбратьДокументы(НачДата, КонДата);
  Пока док.ПолучитьДокумент()=1 Цикл
    док.Провести();
    Предупреждение(«Ждем 3 секунды…», 3);
  КонецЦикла;
КонецПроцедуры
Самый первый пример....

в статье еще 1 вариант не упомянут
Wscript.shell timeout
14 Powerfool
 
12.09.14
09:33
(13) Первый вариант громкий "громкий". Про второй буду курить
15 Chai Nic
 
12.09.14
09:34
(12) пинг проц не груз
16 ArchLord
 
12.09.14
09:37
(14) я не совсем корректно выразился...
у WScript.Shell нет метода timeout, есть в винде такая утилка
вот пример
scr = Новый COMОбъект ("WScript.Shell");
scr.Run("timeout "+КоличествоСекунд,0,1);
//0,1 скрывает окно и дожидается исполнения
17 Dolphinbet
 
12.09.14
09:49
Когда уже 1с паузу сделает?)
18 Powerfool
 
12.09.14
09:49
(16) Спасибо. Буду юзать этот вариант
19 _fvadim
 
12.09.14
09:50
(16) в xp нету. надо отдельно ставить
20 arccos6pi
 
12.09.14
11:50
(0) v8: Задержать выполнение программы в 8-ке
ТекДата = ТекущаяДата();

Пока НЕ ТекущаяДата() = ТекДата + 10 Цикл
    .... думаем 10 секунд :)
КонецЦикла;
21 Fragster
 
гуру
12.09.14
11:57
(20) никогда так не делай
22 Эмбеддер
 
12.09.14
12:21
(20) программа в этом цикле может остаться навечно)
23 МишельЛагранж
 
15.09.14
15:36
(21) (20) а что мешает поставить
Пока НЕ ТекущаяДата() => ТекДата + 10
....
и все, никакого зацикливания?
24 Fragster
 
гуру
15.09.14
15:38
(23) ну, если батареи плохо зимой топят, то можно и так. а вот ближе к лету это надо будет переписать
25 МишельЛагранж
 
15.09.14
15:39
(24) что так? человек предложил вариант, как костыль вполне работоспособный. С поправкой.
26 Jokero
 
15.09.14
15:40
(23) Самое интересное это не вариант условия, а что в точках скрыто.
27 МишельЛагранж
 
15.09.14
15:42
(26) считаем до 100 млн ))
Или 10 000 запросов к любому справочнику.
Или еще что-нибудь )
28 Jokero
 
15.09.14
15:46
//процессор спасибо не скажет
//БД спасибо точно не скажет
//что-нибудь уж тем более будет не радо.
29 Jokero
 
15.09.14
15:47
из что нибудь лучше всего будет загрузить работой сетевую карту - это как раз выше приведенный вариант с ping
30 H A D G E H O G s
 
15.09.14
15:47
(25) Потому что ты - это ты.

Твоим именем детей 1С неков пугать надо.
31 МишельЛагранж
 
15.09.14
15:49
(29) ну так по-любому кого-то надо пугать - процессор, карту, базу... 1С ведь..
(30) так ведь? ))
32 H A D G E H O G s
 
15.09.14
15:52
(31) Функция sleep() никого не пугает.
33 МишельЛагранж
 
15.09.14
15:55
(32) если б 1с еще догадалась не на грабли наступать, а встроить эту "мелочевку" в платформу...