Открыт файл в Фотошопе

FlatX007 · Отправлено: **00:34, 26-07-2011** | #2

Код:

Global $sFile = @ScriptDir & '\1ст.вмр'

_FileOpenPhotoshop($sFile)

Func _FileOpenPhotoshop($FileName = '')
    If Not FileExists($FileName) Then Return SetError(1, 0, 0)

    Local $sPATH_PHOTOSHOP_DIR[2] = [ _
            RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Adobe\Photoshop\11.0", "ApplicationPath"), _
            RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Adobe\Photoshop\10.0", "ApplicationPath")]

    For $i = 0 To UBound($sPATH_PHOTOSHOP_DIR) - 1
        If FileExists($sPATH_PHOTOSHOP_DIR[$i] & 'Photoshop.exe') Then
            $Pid = Run($sPATH_PHOTOSHOP_DIR[$i] & 'Photoshop.exe' & ' ' & $FileName)
            Return SetError(0, $Pid, $sPATH_PHOTOSHOP_DIR[$i] & 'Photoshop.exe')
        Else
            ContinueLoop
        EndIf
    Next

EndFunc   ;==>_FileOpenPhotoshop

Starmen · Отправлено: **19:23, 26-07-2011** | #3

FlatX007,
Спасибо за ответ.Но выдается ошибка.В папке со скриптом находиться 1ст.вмр
C:\OpnFl.au3 (15) : ==> Variable used without being declared.:
If Not FileExists($FileName) Then Return SetError(1, 0, 0)
If Not FileExists(^ ERROR

madmasles · Конфигурация компьютера

Starmen,
Поменяйте '\1ст.вмр' на \1ст.bmp' (bmp - английскими буквами).

Starmen · Отправлено: **10:47, 27-07-2011** | #5

madmasles,
Поменял но тепер ошибки нет и исполнение тоже.

ferget · Отправлено: **10:55, 27-07-2011** | #6

а если прописать путь к Photoshop.exe