HORiSi
Junior Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Код:
#NoTrayIcon
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_icon=yandex.ico
#AutoIt3Wrapper_outfile=d:\Yandex-SetDefault.exe
#AutoIt3Wrapper_Res_Comment=http://rutracker.org/forum/viewtopic.php?t=5329265
#AutoIt3Wrapper_Res_Description=Portable Yandex Setdefault
#AutoIt3Wrapper_Res_Fileversion=16.11.1.673
#AutoIt3Wrapper_Res_LegalCopyright=http://rutracker.org/forum/viewtopic.php?t=5329265
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
$sYandex = @ScriptDir & '\Browser.exe'
FileMove(@ScriptDir & '\Browser.exe', @ScriptDir & '\Browser.ex',1)
sleep(1000)
FileCopy(@ScriptDir & '\App\Browser-bin\Browser.exe', @ScriptDir & '\Browser.exe')
$confr = MsgBox(1,"Внимание", "Назначить браузером по умолчанию портативную версию Yandex Browser из этой папки?")
If $confr == 1 Then ; Таможня дала добро
RegWrite('HKEY_CURRENT_USER\SOFTWARE\Classes\.htm', '', 'REG_SZ', 'PortableYandexHTML')
RegWrite('HKEY_CURRENT_USER\SOFTWARE\Classes\.htm', '', 'REG_SZ', 'PortableYandexHTML')
RegWrite('HKEY_CURRENT_USER\SOFTWARE\Classes\.html', '', 'REG_SZ', 'PortableYandexHTML')
RegWrite('HKEY_CURRENT_USER\SOFTWARE\Classes\.shtml', '', 'REG_SZ', 'PortableYandexHTML')
RegWrite('HKEY_CURRENT_USER\SOFTWARE\Classes\.xht', '', 'REG_SZ', 'PortableYandexHTML')
RegWrite('HKEY_CURRENT_USER\SOFTWARE\Classes\.xhtml', '', 'REG_SZ', 'PortableYandexHTML')
RegWrite('HKEY_CURRENT_USER\SOFTWARE\Classes\PortableYandexHTML', '', 'REG_SZ', 'PortableYandex Document')
RegWrite('HKEY_CURRENT_USER\SOFTWARE\Classes\PortableYandexHTML', 'FriendlyTypeName', 'REG_SZ', 'PortableYandex Document')
RegWrite('HKEY_CURRENT_USER\SOFTWARE\Classes\PortableYandexURL', '', 'REG_SZ', 'PortableYandex URL')
RegWrite('HKEY_CURRENT_USER\SOFTWARE\Classes\PortableYandexURL', 'FriendlyTypeName', 'REG_SZ', 'PortableYandex URL')
RegWrite('HKEY_CURRENT_USER\SOFTWARE\Classes\PortableYandexURL', 'EditFlags', 'REG_DWORD', '0x00000002')
RegWrite('HKEY_CURRENT_USER\SOFTWARE\Classes\PortableYandexURL', 'URL Protocol', 'REG_SZ', '')
RegWrite('HKEY_CURRENT_USER\SOFTWARE\Classes\ftp\DefaultIcon', '', 'REG_SZ', $sYandex&',0')
RegWrite('HKEY_CURRENT_USER\SOFTWARE\Classes\http\DefaultIcon', '', 'REG_SZ', $sYandex&',0')
RegWrite('HKEY_CURRENT_USER\SOFTWARE\Classes\https\DefaultIcon', '', 'REG_SZ', $sYandex&',0')
RegWrite('HKEY_CURRENT_USER\SOFTWARE\Classes\PortableYandexHTML\DefaultIcon', '', 'REG_SZ', $sYandex&',0')
RegWrite('HKEY_CURRENT_USER\SOFTWARE\Classes\PortableYandexURL\DefaultIcon', '', 'REG_SZ', $sYandex&',0')
RegWrite('HKEY_CURRENT_USER\SOFTWARE\Classes\ftp\shell', '', 'REG_SZ', 'open')
RegWrite('HKEY_CURRENT_USER\SOFTWARE\Classes\http\shell', '', 'REG_SZ', 'open')
RegWrite('HKEY_CURRENT_USER\SOFTWARE\Classes\https\shell', '', 'REG_SZ', 'open')
RegWrite('HKEY_CURRENT_USER\SOFTWARE\Classes\PortableYandexHTML\shell', '', 'REG_SZ', 'open')
RegWrite('HKEY_CURRENT_USER\SOFTWARE\Classes\PortableYandexURL\shell', '', 'REG_SZ', 'open')
RegWrite('HKEY_CURRENT_USER\SOFTWARE\Classes\ftp\shell\open\command', '', 'REG_SZ', '"'&$sYandex&'" -- "%1"')
RegWrite('HKEY_CURRENT_USER\SOFTWARE\Classes\http\shell\open\command', '', 'REG_SZ', '"'&$sYandex&'" -- "%1"')
RegWrite('HKEY_CURRENT_USER\SOFTWARE\Classes\https\shell\open\command', '', 'REG_SZ', '"'&$sYandex&'" -- "%1"')
RegWrite('HKEY_CURRENT_USER\SOFTWARE\Classes\PortableYandexHTML\shell\open\command', '', 'REG_SZ', '"'&$sYandex&'" -- "%1"')
RegWrite('HKEY_CURRENT_USER\SOFTWARE\Classes\PortableYandexURL\shell\open\command', '', 'REG_SZ', '"'&$sYandex&'" -- "%1"')
RegWrite('HKEY_CURRENT_USER\Software\Clients\StartMenuInternet\browser.exe', '', 'REG_SZ', 'Yandex Browser')
RegWrite('HKEY_CURRENT_USER\Software\Clients\StartMenuInternet\browser.exe\Capabilities', 'ApplicationIcon', 'REG_SZ', '"'&$sYandex&',0"')
RegWrite('HKEY_CURRENT_USER\Software\Clients\StartMenuInternet\browser.exe\Capabilities', 'ApplicationName', 'REG_SZ', 'Yandex')
RegWrite('HKEY_CURRENT_USER\Software\Clients\StartMenuInternet\browser.exe\Capabilities\FileAssociations', '.htm', 'REG_SZ', 'PortableYandexHTML')
RegWrite('HKEY_CURRENT_USER\Software\Clients\StartMenuInternet\browser.exe\Capabilities\FileAssociations', '.html', 'REG_SZ', 'PortableYandexHTML')
RegWrite('HKEY_CURRENT_USER\Software\Clients\StartMenuInternet\browser.exe\Capabilities\FileAssociations', '.shtml', 'REG_SZ', 'PortableYandexHTML')
RegWrite('HKEY_CURRENT_USER\Software\Clients\StartMenuInternet\browser.exe\Capabilities\FileAssociations', '.xht', 'REG_SZ', 'PortableYandexHTML')
RegWrite('HKEY_CURRENT_USER\Software\Clients\StartMenuInternet\browser.exe\Capabilities\FileAssociations', '.xhtml', 'REG_SZ', 'PortableYandexHTML')
RegWrite('HKEY_CURRENT_USER\Software\Clients\StartMenuInternet\browser.exe\DefaultIcon', '', 'REG_SZ', '"'&$sYandex&',0"')
RegWrite('HKEY_CURRENT_USER\Software\RegisteredApplications', 'Yandex', 'REG_SZ', 'Software\Clients\StartMenuInternet\browser.exe\Capabilities')
RegWrite('HKEY_CURRENT_USER\SOFTWARE\Clients\StartMenuInternet', '', 'REG_SZ', 'browser.exe')
; edit 25.01.2015
RegWrite('HKEY_CURRENT_USER\Software\Clients\StartMenuInternet\browser.exe\Capabilities\StartMenu', 'StartMenuInternet', 'REG_SZ', 'browser.exe')
RegWrite('HKEY_CURRENT_USER\Software\Clients\StartMenuInternet\browser.exe\Capabilities', 'ApplicationDescription', 'REG_SZ', 'Portable Yandex Browser 16.11.1.673 [rutracker.org]')
RegWrite('HKEY_CURRENT_USER\Software\Clients\StartMenuInternet\browser.exe\Capabilities\URLAssociations', 'ftp', 'REG_SZ', 'PortableYandexURL')
RegWrite('HKEY_CURRENT_USER\Software\Clients\StartMenuInternet\browser.exe\Capabilities\URLAssociations', 'http', 'REG_SZ', 'PortableYandexURL')
RegWrite('HKEY_CURRENT_USER\Software\Clients\StartMenuInternet\browser.exe\Capabilities\URLAssociations', 'https', 'REG_SZ', 'PortableYandexURL')
; end edit 25.01.2015
RegDelete('HKEY_CURRENT_USER\SOFTWARE\Classes\ftp\shell\open\ddeexec')
RegDelete('HKEY_CURRENT_USER\SOFTWARE\Classes\http\shell\open\ddeexec')
RegDelete('HKEY_CURRENT_USER\SOFTWARE\Classes\https\shell\open\ddeexec')
RegDelete('HKEY_CURRENT_USER\SOFTWARE\Classes\PortableYandexHTML\shell\open\ddeexec')
RegDelete('HKEY_CURRENT_USER\SOFTWARE\Classes\PortableYandexURL\shell\open\ddeexec')
$confr2 = MsgBox(1,"Уточните", "По умолчанию для всех пользователей?")
If $confr2 == 1 Then
RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Classes\.htm', '', 'REG_SZ', 'PortableYandexHTML')
RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Classes\.htm', '', 'REG_SZ', 'PortableYandexHTML')
RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Classes\.html', '', 'REG_SZ', 'PortableYandexHTML')
RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Classes\.shtml', '', 'REG_SZ', 'PortableYandexHTML')
RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Classes\.xht', '', 'REG_SZ', 'PortableYandexHTML')
RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Classes\.xhtml', '', 'REG_SZ', 'PortableYandexHTML')
RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Classes\PortableYandexHTML', '', 'REG_SZ', 'PortableYandex Document')
RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Classes\PortableYandexHTML', 'FriendlyTypeName', 'REG_SZ', 'PortableYandex Document')
RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Classes\PortableYandexURL', '', 'REG_SZ', 'PortableYandex URL')
RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Classes\PortableYandexURL', 'FriendlyTypeName', 'REG_SZ', 'PortableYandex URL')
RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Classes\PortableYandexURL', 'EditFlags', 'REG_DWORD', '0x00000002')
RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Classes\PortableYandexURL', 'URL Protocol', 'REG_SZ', '')
RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Classes\ftp\DefaultIcon', '', 'REG_SZ', $sYandex&',0')
RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Classes\http\DefaultIcon', '', 'REG_SZ', $sYandex&',0')
RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Classes\https\DefaultIcon', '', 'REG_SZ', $sYandex&',0')
RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Classes\PortableYandexHTML\DefaultIcon', '', 'REG_SZ', $sYandex&',0')
RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Classes\PortableYandexURL\DefaultIcon', '', 'REG_SZ', $sYandex&',0')
RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Classes\ftp\shell', '', 'REG_SZ', 'open')
RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Classes\http\shell', '', 'REG_SZ', 'open')
RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Classes\https\shell', '', 'REG_SZ', 'open')
RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Classes\PortableYandexHTML\shell', '', 'REG_SZ', 'open')
RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Classes\PortableYandexURL\shell', '', 'REG_SZ', 'open')
RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Classes\ftp\shell\open\command', '', 'REG_SZ', '"'&$sYandex&'" -- "%1"')
RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Classes\http\shell\open\command', '', 'REG_SZ', '"'&$sYandex&'" -- "%1"')
RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Classes\https\shell\open\command', '', 'REG_SZ', '"'&$sYandex&'" -- "%1"')
RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Classes\PortableYandexHTML\shell\open\command', '', 'REG_SZ', '"'&$sYandex&'" -- "%1"')
RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Classes\PortableYandexURL\shell\open\command', '', 'REG_SZ', '"'&$sYandex&'" -- "%1"')
RegWrite('HKEY_LOCAL_MACHINE\Software\Clients\StartMenuInternet\browser.exe', '', 'REG_SZ', 'Yandex Browser')
RegWrite('HKEY_LOCAL_MACHINE\Software\Clients\StartMenuInternet\browser.exe\Capabilities', 'ApplicationIcon', 'REG_SZ', '"'&$sYandex&',0"')
RegWrite('HKEY_LOCAL_MACHINE\Software\Clients\StartMenuInternet\browser.exe\Capabilities', 'ApplicationName', 'REG_SZ', 'Yandex')
RegWrite('HKEY_LOCAL_MACHINE\Software\Clients\StartMenuInternet\browser.exe\Capabilities', 'ApplicationDescription', 'REG_SZ', 'Portable Yandex Browser 16.11.1.673 [rutracker.org]')
RegWrite('HKEY_LOCAL_MACHINE\Software\Clients\StartMenuInternet\browser.exe\Capabilities\FileAssociations', '.htm', 'REG_SZ', 'PortableYandexHTML')
RegWrite('HKEY_LOCAL_MACHINE\Software\Clients\StartMenuInternet\browser.exe\Capabilities\FileAssociations', '.html', 'REG_SZ', 'PortableYandexHTML')
RegWrite('HKEY_LOCAL_MACHINE\Software\Clients\StartMenuInternet\browser.exe\Capabilities\FileAssociations', '.shtml', 'REG_SZ', 'PortableYandexHTML')
RegWrite('HKEY_LOCAL_MACHINE\Software\Clients\StartMenuInternet\browser.exe\Capabilities\FileAssociations', '.xht', 'REG_SZ', 'PortableYandexHTML')
RegWrite('HKEY_LOCAL_MACHINE\Software\Clients\StartMenuInternet\browser.exe\Capabilities\FileAssociations', '.xhtml', 'REG_SZ', 'PortableYandexHTML')
RegWrite('HKEY_LOCAL_MACHINE\Software\Clients\StartMenuInternet\browser.exe\DefaultIcon', '', 'REG_SZ', $sYandex&',0')
RegWrite('HKEY_LOCAL_MACHINE\Software\RegisteredApplications', 'Yandex', 'REG_SZ', 'Software\Clients\StartMenuInternet\browser.exe\Capabilities')
RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Clients\StartMenuInternet', '', 'REG_SZ', 'browser.exe')
; edit 25.01.2015
RegWrite('HKEY_LOCAL_MACHINE\Software\Clients\StartMenuInternet\browser.exe\Capabilities\StartMenu', 'StartMenuInternet', 'REG_SZ', 'browser.exe')
RegWrite('HKEY_LOCAL_MACHINE\Software\Clients\StartMenuInternet\browser.exe\Capabilities', 'ApplicationDescription', 'REG_SZ', 'Portable Yandex Browser 16.11.1.673 [rutracker.org]')
RegWrite('HKEY_LOCAL_MACHINE\Software\Clients\StartMenuInternet\browser.exe\Capabilities\URLAssociations', 'ftp', 'REG_SZ', 'PortableYandexURL')
RegWrite('HKEY_LOCAL_MACHINE\Software\Clients\StartMenuInternet\browser.exe\Capabilities\URLAssociations', 'http', 'REG_SZ', 'PortableYandexURL')
RegWrite('HKEY_LOCAL_MACHINE\Software\Clients\StartMenuInternet\browser.exe\Capabilities\URLAssociations', 'https', 'REG_SZ', 'PortableYandexURL')
; end edit 25.01.2015
RegDelete('HKEY_LOCAL_MACHINE\SOFTWARE\Classes\ftp\shell\open\ddeexec')
RegDelete('HKEY_LOCAL_MACHINE\SOFTWARE\Classes\http\shell\open\ddeexec')
RegDelete('HKEY_LOCAL_MACHINE\SOFTWARE\Classes\https\shell\open\ddeexec')
RegDelete('HKEY_LOCAL_MACHINE\SOFTWARE\Classes\PortableYandexHTML\shell\open\ddeexec')
RegDelete('HKEY_LOCAL_MACHINE\SOFTWARE\Classes\PortableYandexURL\shell\open\ddeexec')
EndIf
Run ('control /name Microsoft.DefaultPrograms /page pageDefaultProgram')
ToolTip("Идет настройка системы", 200, 200,"Минуточку..",1,2)
Sleep(7000)
ToolTip("")
EndIf
FileMove(@ScriptDir & '\browser.ex', @ScriptDir & '\browser.exe',1)
$confr3 = MsgBox(1,"Последний вопрос", "Создать на рабочем столе ярлык для портативной версии Yandex Browser из этой папки?")
If $confr3 == 1 Then ; Таможня дала добро
FileCreateShortcut(@ScriptDir & '\browser.exe', @DesktopDir & "\Yandex Browser Portable.lnk", @ScriptDir ,'', 'Яндекс в коробке', @ScriptDir & '\browser.exe')
EndIf
|
Доп. информация: В системах, где уже когда-то устанавливался обычный Яндекс браузер, может не сработать установка браузером по умолчанию.
|
Всего записей: 162 | Зарегистр. 24-05-2006 | Отправлено: 16:49 25-01-2020 | Исправлено: HORiSi, 17:00 25-01-2020 |
|
