Не всегда срабатывает (START-APP)

Обсуждение программ nnCron и nnCron LITE

Не всегда срабатывает (START-APP)

Postby Dark_Jones » Thu, 17 Jul 2008, 20:15

Создал такое слово:
Code: Select all
: PROC-EXIST-HDD-NOT-MEM ( a u )
\ запуск приложения, если оно есть на винче, но не загружено в память
2DUP 2DUP ONLYFILENAMEWOKEY 2>R PATHONLYDIR 2R> S+ EXIST?
IF
  2DUP ONLYFILENAMEWOKEY PROC-EXIST?
  IF
    QUOTE 2SWAP S+ QUOTE S+ S"  уже запущено." S+ CRON-LOG
  ELSE
    2DUP PATHONLYDIR 1 -
    START-IN
    2DUP DUP 14 - 0 MAX /STRING S"  ShowMaximized" COMPARE
    IF
      ShowMinimized
    ELSE
      14 -
      ShowMaximized
    THEN
    2DUP S" Запуск " 2SWAP S+ CRON-LOG
    FALSE (START-APP)
  THEN
ELSE
  QUOTE 2SWAP S+ QUOTE S+ S"  нет на диске" S+ CRON-LOG
THEN ;

В табах использую так:
Code: Select all
.....
AsLoggedUser
LoadProfile
NoLog
.....
  IdlePriority S" C:\Program Files\USB Safely Remove\USBSafelyRemove.exe /startup" PROC-EXIST-HDD-NOT-MEM
  IdlePriority S" C:\Program Files\AmlMaple\AmlMaple.exe" PROC-EXIST-HDD-NOT-MEM
.....


В лог выводится:
Code: Select all
21:08:59 12524 Запуск C:\Program Files\USB Safely Remove\USBSafelyRemove.exe /startup
21:09:08 12524 Запуск C:\Program Files\AmlMaple\AmlMaple.exe

Но сам запуск приложений происходит не всегда. Проверил GetLastError - пишет 5. Доступ запрещён вроде значит... С чем это может быть связано?

Вот нестандартные слова:
Code: Select all
: StringGet { a1 u1 a2 u2 } ( a1 u1 a2 u2 -- pos )
\ возвращает позицию, с которой начинается строка a2 u2 в строке a1 u1
a1 u1 a2 u2 ISEARCH IF DROP a1 - 1+ ELSE 2DROP 0 THEN ;

: ONLYFILENAME ( a1 u1 -- a2 u2 )
\ возвращает имя файла с последующими ключами (если они есть) из FULLNAME
BEGIN
     2DUP S" \" StringGet ?DUP
WHILE
     /STRING
REPEAT ;

: ONLYFILENAMEWOKEY ( a1 u1 -- a2 u2 )
\ возвращает имя файла без ключей из FULLNAME
ONLYFILENAME
2DUP S"  " StringGet ?DUP
IF
  NIP 1 -
THEN ;

: PATHONLYDIR ( a1 u1 -- a2 u2 )
\ возвращает только путь (без имени файла) из FULLNAME
2DUP 2DUP ONLYFILENAME StringGet NIP 1 - ;
Dark_Jones
 
Posts: 414
Joined: Thu, 09 Nov 2006, 00:43
Location: Russia, S.Peterburg

Return to nnCron forum (Russian)

Who is online

Users browsing this forum: No registered users and 3 guests

cron