Уважаемый TiR
Ну я в этих скриптах ни в зуб ногой и не могу сказать, зачем там dir. Я это решение скачал в инете.
После внесения указанного Вами изменения (добавил Set) в строку, опять показывает окно с ошибкой
Script Error
An error has occurred in the script on this page.
Line: 5
Char: 1
Error: Permission denied: theHref
Code: 0
URL: file:///C:/OperaAC/Open In Browser/lnOpera Page.htm
Do you want to continue running scripts on this page?
В общем изначально в этом твике было 4 файла:
InOpera.htm с таким содержанием:
[more]
<script language="VBScript">
Function GetHref(element)
if element.tagName = "IMG" then
set element = element.parentElement
end if
if element.tagName <> "A" then
GetHref = ""
else
GetHref = element.href
end if
End Function
theHref = GetHref(external.menuArguments.event.srcElement)
if theHref = "" then
alert "no link found"
else
Dim WshShell
Set WshShell = CreateObject("WScript.Shell")
WshShell.Exec(dir & "c:\OperaAC\OperaAC.exe " & theHref)
end if
</script>
[/more]
InOperaPage.htm с таким содержанием:
[more]
<script language="VBScript">
theHref=window.external.menuArguments.location
Dim WshShell
Set WshShell = CreateObject("WScript.Shell")
WshShell.Exec(dir & "c:\OperaAC\OperaAC.exe " & theHref)
</script>
[/more]
InOpera.reg с таким содержанием:
[more]
Windows Registry Editor Version 5.00
[HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\MenuExt\Open In Opera]
"Contexts"=dword:00000022
@="C:\\OperaAC\\OpenInBrowser\\InOpera.htm"
[HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\MenuExt\Open Page In Opera]
"Contexts"=hex:01
@="C:\\OperaAC\\OpenInBrowser\\InOperaPage.htm"
[/more]
и readme.txt с содержанием в переводе. Поместите файлы InOpera.htm и InOperaPage.htm в какую либо папку. Затем скорректируйте пути к ним в файле InOpera.reg и запустите его. После этого у вас в контекстном меню IE (ну и FeedDemon) появится строка Open in Opera и вы сможете открывать текущую страничку в Opera (у меня настроено для Opera AC).
Такой же твик есть для FireFox и для браузера по умолчанию. Для FireFox устроен аналогично (могу выложить - они оба от одного автора), а вот Open in Default Browser у меня не появилось в контекстном меню вообще. Хотелось бы чтобы помогли с ним разобраться заодно.
Этот твик содержит open-in-default-browser.htm и open-in-default-browser.reg
Содержимое open-in-default-browser.htm
[more]
<script type="text/javascript">
// sends URL to cmd.exe /c "start "" "%1""
// which should load it in the default browser
// See
http://channel9.msdn.com/ShowPost.aspx?PostID=106285#106285 // Sven's implementation, shamelessly tweaked by Maurits
var url = window.external.menuArguments.event.srcElement;
var safeurl = "" + url;
// ONLY http, https, and ftp links, please!
// No javascript: or aol: nonsense
// and no newlines or quotes
if (/^(https?|ftp):\/\//.test(safeurl) && !/\n|"/.test(safeurl))
{
var shell = new ActiveXObject("WScript.Shell");
var commandString = "cmd.exe /c \"start \"\" \"" + safeurl + "\""
var stateMinimized = 2;
shell.Run(commandString, stateMinimized);
} else
{
// if the URL did not pass our strict safety requirements...
// display an error message in a new IE window
var w = window.open();
if (w)
{
safeurl = safeurl.replace("<", "<");
safeurl = safeurl.replace(">", ">");
safeurl = safeurl.replace("\"", """);
safeurl = safeurl.replace("\n", "<br />");
w.document.write("Cannot load link:<br />" + safeurl);
}
}
</script>
[/more]
Содержимое open-in-default-browser.reg
[more]
Windows Registry Editor Version 5.00
[HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\MenuExt\Open in &Default Browser]
@="file://C:\\OperaAC\\OpenInBrowser\\open-in-default-browser.htm"
"Contexts"=hex:20
[/more]
В общем этот пункт даже не появился в контекстном меню.
Вообще эти твики были бы удобны, чтобы открывать странички FeedDemona в нужном тебе браузере по выбору.
Жду решения от спецов.