[Creat0R]

NikLok,

скрипт определения пути, куда установилась программа »

Смотря какая программа, вопрос довольно смутный, подробнее можно?

[beve]

Вот такой вопрос: хочу вставить условие в условие, примерно вот так:
if (MsgBox(4100, "Внимание", "Окно выбора")) = 6 Then

$sSystemDate = @MDAY & "/" & @MON
If $sSystemDate = "08/07" Then
SplashTextOn("Поздравляю!", "Мой текст!", 800, 350, -1, -1, 4, "", 25)
Sleep(1000)
SplashOff()
Exit
Else
EXIT
ENdif

Тоесть если в первом окне ответить ДА, то началось второе условие, а если нет, то выход вобще. Но при моей раскладке требует ENdif, но я же не могу вставить ENdif ибо второе условие выполнятся не будет. Помогите советом.

[Creat0R]

beve,

если в первом окне ответить ДА, то началось второе условие, а если нет, то выход вобще »

Можно проверять не 6, а 7, и тогда просто Exit.

при моей раскладке требует ENdif, но я же не могу вставить ENdif ибо второе условие выполнятся не будет »

Там нехватает ещё одного EndIf в конце, т.к на каждый If .... Then должно быть EndIf (если после Then идёт перевод строки и ещё команды)...

Код:

;Первый вариант, всё находится в условии, <если нажата кнопка "Да">.
If MsgBox(4100, "Внимание", "Окно выбора") = 6 Then
    $sSystemDate = @MDAY & "/" & @MON

    If $sSystemDate = "08/07" Then
        SplashTextOn("Поздравляю!", "Мой текст!", 800, 350, -1, -1, 4, "", 25)
        Sleep(1000)
        SplashOff()
        Exit
    Else
        Exit
    EndIf
EndIf

;Второй вариант, выход из скрипта если нажата кнопка "Нет".
If MsgBox(4100, "Внимание", "Окно выбора") = 7 Then Exit

$sSystemDate = @MDAY & "/" & @MON

If $sSystemDate = "08/07" Then
    SplashTextOn("Поздравляю!", "Мой текст!", 800, 350, -1, -1, 4, "", 25)
    Sleep(1000)
    SplashOff()
    Exit
Else
    Exit
EndIf

[Creat0R]

amel27,
Не подскажешь ещё такой момент в RegExp...
Мне нужно заменить число в имени файла, тоже на число, на единицу больше, но при этом нужно оставить все остальные значения, т.е я просто решил что на каждый нужный мне кусок с имени файла будет назначена группа, а в параметре Replace она будет Использоваться, и между группами я просто подставляю нужное число, но получается что оно как бы добавляет к значению группы

Код:

$Num = "2"
$Var = StringRegExpReplace("FileName (1).txt", "(.*)(1)(.*)$", "\1" & $Num & "\3")
ConsoleWrite($Var)

Тут получается что используется не «\1», а «\12» - Как можно отменять числа в этом случае?

P.S
Без групп почему то не получается...

[NikLok]

Creat0R,

Смотря какая программа, вопрос довольно смутный, подробнее можно? »

Да я в общем так и ответил. -
каждая программа хранит свои данные об установке в разных ключах реестра, потому универсальный скрипт вряд ли прокатит! Скорее всего придется знать ветку для каждой программы!

Код:

$var = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Adobe\Acrobat Reader\8.0\Installer", "Path")
if @error then
MsgBox(4096, "Program files are in:", "Progarm Adobe not installed")
Else
MsgBox(4096, "Program files are in:", $var)
EndIf

$var = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Adobe\Acrobat Reader\9.0\Installer", "Path")
if @error then
MsgBox(4096, "Program files are in:", "Progarm Adobe not installed")
Else
MsgBox(4096, "Program files are in:", $var)
EndIf

exit

Есть более актуальный вопрос!!! Как определить ставлюсь я на виртуальной машине или на реальной!
Я использую VMWare, и пока думаю делать это проверкой наличия их видеоадаптера с VEN_15AD&DEV_0405
Как обстоят дела под другими виртуалками и каие есть готовые скрипты у кого нибудь.

Связано это с тем, что например программы работающие со SMART таблицами дисков под VMWare ставить пока вроде смысла нет, так как не эмулируются и выдаются всякие нештатные сообщения. (6.0.0 b45731)

[ShaddyR]

поправьте ссылку в шапке

Русская справка »

на http://www.autoitscript.com/autoit3/docs.shtml

[amel27]

Creat0R

Тут получается что используется не «\1», а «\12» »

да, на оффсайте поднимали эту тему неоднократно, но по-моему глухо
могу предложить обходной вариант

Код:

$Num = "2"
$Var = StringRegExpReplace("FileName (1).txt" &$Num, "(.*)(1)(.*)(\d)$", "\1\4\3")
ConsoleWrite($Var&@CRLF)

[Creat0R]

amel27,

на оффсайте поднимали эту тему неоднократно »

Вот найти бы где....

могу предложить обходной вариант

Хм.. необычный вариант - Но имхо, он не очень надёжный, всегда остаётся риск того что на конце имени файла будет добавлена лишняя цифра...

Я ещё так придумал:

Код:

$iFind_Num      = 1
$iNum           = $iFind_Num + 1

$sDelim1        = " ("
$sDelim2        = ")"

$sDelim1_RE     = StringRegExpReplace($sDelim1, '([][{}()|.?+*\\^])', '\\\1')
$sDelim2_RE     = StringRegExpReplace($sDelim2, '([][{}()|.?+*\\^])', '\\\1')

$Var = StringRegExpReplace("FileName (1).txt", "(.*)" & $sDelim1_RE & $iFind_Num & $sDelim2_RE, "\1" & $sDelim1 & $iNum & $sDelim2)

ConsoleWrite($Var & @CRLF)

Мне просто известны заранее разделители, а вот цифра которую нужно найти и заменить может всё время меняться, а может и вовсе не существовать (просто FileName.txt).

P.S
Это я доделываю функцию _FileNewNameEx(), чтобы не получилось имён с лишними добавками (типа "FileName (1)(1).txt"). Позже выложу...

[vbrv]

Ситуация:
В системе два пользователя, админ и просто юзер.
Есть программа, которая может запускаться только с админскими правами.
Программа в процессе работы должна брать файлы с сетевого диска.

Что я сделал:
Залогинился под админом, сделал автомонтирование сетевого диска. Всё отлично работает, при каждом входе под админом автоподключается сетевой диск.
Скомпилировал скриптик запуска этой проги с правами админа: RunAsWait("Администратор", "org.local", "пароль", 4, "прога с полным путём").

Проблема:
Когда из под юзера запускаю эту прогу, что через скрипт, что через "Запуск от имени администратора" - программа не видит сетевой диск, лезу через Open file, а сетевой диск перечеркнут.

Вопрос:
Так и должно быть, что из под RunAs винда (vista) не автомантирует сетевой диск?
Как можно с помощью скрипта подмонтировать его? И как потом размонтировать, если это необходимо?

[amel27]

Creat0R

Вот найти бы где »

я сходу тоже не нашел, но помню что в ответ было молчание...

всегда остаётся риск того что на конце имени файла будет добавлена лишняя цифра »

угу, требуется соблюдение формата, значит придется сначала проверять обычным ReExp()

Я ещё так придумал »

ну тогда можно еще в два захода - сначала заменить цифру на спецсимвол, не встречающийся в именах файлов (*?), а потом его заменить на нужную подстановку