PDA

Показать полную графическую версию : Открыт файл в Фотошопе


Starmen
10-07-2011, 10:43
Привет всем.Прошу примерами мне помочь.Надо открыт "1ст.вмр" файл в Фотошопе.
Автоматически при запуске скрипта аутоит- без использования диалогового окна "Открыт файл
(Файл "1ст.вмр" лежить в папке вместе со скриптом)

FlatX007
26-07-2011, 00:34
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
26-07-2011, 19:23
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
26-07-2011, 21:29
Starmen,
Поменяйте '\1ст.вмр' на \1ст.bmp' (bmp - английскими буквами).

Starmen
27-07-2011, 10:47
madmasles,
Поменял но тепер ошибки нет и исполнение тоже.

ferget
27-07-2011, 10:55
а если прописать путь к Photoshop.exe




© OSzone.net 2001-2012