Flasher
|
 Posted: Fri Oct 09, 2015 23:22 Post subject: |
 |
|
Avada
Попробуй:
| Code: | GUID = "::{21EC2020-3AEA-1069-A2DD-08002B30309D}"
With CreateObject("WScript.Shell")
Path = .Environment("Process")("COMMANDER_EXE")
If .Environment("System")("PROCESSOR_ARCHITECTURE") = "AMD64" And InStrRev(_
CreateObject("Shell.Application").NameSpace(.Environment("Process")("COMMANDER_PATH")).ParseName(_
CreateObject("Scripting.FileSystemObject").GetFileName(Path)).ExtendedProperty("FileDescription"),32)_
Then .Run GUID Else .Run """" & Path & """ /S /O /L=::{20D04FE0-3AEA-1069-A2D8-08002B30309D}\" & GUID
End With |
_________________
Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой.
Last edited by Flasher on Thu Oct 22, 2015 16:34; edited 5 times in total |
|
Rules
Search
FAQ
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
