[Файловая система] Корректный запуск файла

[gregaz]

Требуется функция :

Запускающая Файлы типов : au3 , doc , txt , exe (скомпилированный скрипт AutoIt ) на ЗАПУСК (open) ,
при этом , игнорирующая Файлы типа : exe (не являющиеся скомпилированным AutoIt скриптом ) .

Я пробовал так :

Run(@AutoItExe & ' /AutoIt3ExecuteScript "' & $sFullFileName & '"')

Она нормально запускает Скрипты AutoIt и exe-файл (скомпилированный скрипт AutoIt ) , но при попытке запуска файла (не
AutoIt'овского выдает ошибку и выбивает скрипт.
Как выполнить это корректно ?

 

[r35p3ct]

ShellExecute

 

[gregaz]

ShellExecute

Но ведь она запустит и exe- файл , не являющийся скомпилированным скриптом ???



Добавлено:

Сообщение автоматически объединено: 5 Фев 2010

В принципе надо корректно обеспечить не выпадение скрипта при ошибке

 

[CreatoR]

Если я верно понял:

_RunFile(@DesktopDir & "\AutoIt v3 Script.au3")

Func _RunFile($sFile, $sRunExtList = "au3|doc|txt")
	Local $sExt = StringRight($sFile, 3)
	
	If $sExt = "exe" Then
		$sFileVersion = FileGetVersion($sFile, "CompiledScript")
		
		If StringInStr($sFileVersion, "AutoIt") Then
			Return Run($sFile)
		EndIf
	ElseIf StringInStr("|" & $sRunExtList & "|", "|" & $sExt & "|") Then
		Return ShellExecute($sFile)
	EndIf
	
	SetError(1, 0, 0)
EndFunc

 

[gregaz]

CreatoR [?]

Если я верно понял:

Верно понял и сделал то, что надо было.Спасибо