ВНИМАНИЕ! ОСТЕРЕГАЙТЕСЬ МОШЕННИКОВ!
Помните, что все браузеры Opera АБСОЛЮТНО БЕСПЛАТНЫ.
Загружайте новые версии ТОЛЬКО С ОФИЦИАЛЬНОГО САЙТА или с ресурсов, которым ДОВЕРЯЕТЕ!


Предыдущее | Следующее | Архив форума | myOpera.net | Поиск
Как к 8.0 прикрутить Download Master? DiVaK  06/06/05 08:03 PM

Раскажите как к Opera 8.0 прикрутить Download Master

Re: Как к 8.0 прикрутить Download Master? aga  06/06/05 09:27 PM

вообще, настройки дм, там есть интеграция в оперу. если пункты интеграции после этого не появились, значит скорее всего или дм не нашёл оперу, или стоит своё меню.
тогда открыть своё меню и вставить строки в разделы:

1. link popup menu
Item, "Download with Download Master"=Execute program, "C:\Program Files\Download Master\dmaster.exe","%l %u"
Item, "Download ALL with Download Master"=Execute program, "C:\Program Files\Download Master\dmaster.exe","ALL %u %s"

2. image link popup menu
Item, "Download with Download Master"=Copy link & Execute program, "C:\Program Files\Download Master\dmaster.exe","%c"

почему-то в контекстном меню картинки-ссылки нет пункта закачки всего, может получится пенести его туда из контекстного меню ссылки.



Re: Как к 8.0 прикрутить Download Master? S_M  11/21/05 12:02 AM

Можно также сделать запуск через скрипт аналогично addlink.vbs для FlashGet.
DMLINK.VBS
Code:
Dim desc  
ref=""
addr=""
if WScript.Arguments.Count>1 then
ref=WScript.Arguments(1)
end if
addr = WScript.Arguments(0)
If Left(addr,5) = "href=" Then addr = Right(addr,Len(addr)-5)
if Left(addr,1) = "(" Then addr = Right(addr,Len(addr)-1)
if Left(addr,1) = Chr(34) Then addr = Right(addr,Len(addr)-1)
if Left(addr,1) = "<" Then addr = Right(addr,Len(addr)-1)
if Left(addr,1) = "_" Then addr = Right(addr,Len(addr)-1)
if Left(addr,1) = "-" Then addr = Right(addr,Len(addr)-1)
If Right(addr,1) = "." Then addr = Left(addr,Len(addr)-1)
If Right(addr,1) = "," Then addr = Left(addr,Len(addr)-1)
If Right(addr,1) = "?" Then addr = Left(addr,Len(addr)-1)
If Right(addr,1) = "!" Then addr = Left(addr,Len(addr)-1)
If Right(addr,1) = ":" Then addr = Left(addr,Len(addr)-1)
If Right(addr,1) = ";" Then addr = Left(addr,Len(addr)-1)
If Right(addr,1) = Chr(34) Then addr = Left(addr,Len(addr)-1)
If Right(addr,1) = ")" Then addr = Left(addr,Len(addr)-1)
If Right(addr,1) = "(" Then addr = Left(addr,Len(addr)-1)
If Right(addr,1) = ">" Then addr = Left(addr,Len(addr)-1)
addr = Replace(addr,"hxxp://", "http://")
addr = Replace(addr,"hххp://", "http://")
addr = Replace(addr,"HXXP://", "http://")
addr = Replace(addr,"hXXp://", "http://")
addr = Replace(addr,"HxxP://", "http://")
addr = Replace(addr,"хттп://", "http://")
addr = Replace(addr,"ХТТП://", "http://")
addr = Replace(addr,"h__p://", "http://")
addr = Replace(addr,"H__P://", "http://")
addr = Replace(addr,"h**p://", "http://")
addr = Replace(addr,"H**P://", "http://")
addr = Replace(addr,"fxp://", "ftp://")
addr = Replace(addr,"fхp://", "ftp://")
addr = Replace(addr,"FXP://", "ftp://")
addr = Replace(addr,"f*p://", "ftp://")
addr = Replace(addr,"F*P://", "ftp://")
addr = Replace(addr,"f_p://", "ftp://")
addr = Replace(addr,"F_P://", "ftp://")
addr = Replace(addr,"ФТТП://", "ftp://")
addr = Replace(addr,"фттп://", "ftp://")
addr = Replace(addr,"hxxps://", "https://")
addr = Replace(addr,"HTTP://", "http://")
addr = Replace(addr,"HTTPS://", "https://")
addr = Replace(addr,"FTP://", "ftp://")
addr = Replace(addr,"MMS://", "mms://")
addr = Replace(addr,"RTSP://", "rtsp://")
if Left(addr,4) = "ftp." then
addr = "ftp://" + addr
elseif Left(addr,7) <> "http://" and Left(addr,6) <> "ftp://" and Left(addr,8) <> "https://" and Left(addr,6) <> "mms://" and Left(addr,7) <> "rtsp://" then
addr = "http://" + addr
end if
AddLink addr, desc, ref
Sub AddLink(ByVal Url, ByVal Refer)
set DMCatch = CreateObject("dmie.moveurl")
DMCatch.AddURL Url, Refer
end sub


и прописываем в своем меню -
_menu.ini
Code:
[Hotclick Popup Menu]
Item, "Download with Download Master"=Execute program, "wscript", "//NOLOGO D:\progra~1\opera\ADLINK.VBS %t %u"

[Link Popup Menu]
Item, "Download with Download Master"=Execute program, "wscript", "//NOLOGO D:\progra~1\opera\ADLINK.VBS %l %u"

[Image Link Popup Menu]
Item, "Download with Download Master"=Execute program, "wscript", "//NOLOGO D:\progra~1\opera\ADLINK.VBS %l %u"



Re: Как к 8.0 прикрутить Download Master? Sunam  03/27/06 11:12 AM

S_M
О, спасибо. давно искал такой же скрипт для DM, как использую для Reget. Вообще-то, Reget держу на машине только из-за возможностей перехвата, предоставляемых этим скриптом.
Попробовал скрипт для DM, но чтой-то он не хочет нормально работать. Своими силами поправить - знаниев не хыватает. Сначала скрипт ругался на лишний конец строки - убрал (может, лучше .vbs файл к посту прицепить?), потом на количество аргументов, а если из аргументов убрать описание, вместо ссылки пытается закачать реферрер.
А еще, можно ли прикрутить возможность закачки без подтверждения, как в регетовском скрипте?
PS тело скрипта для регета не привожу, по-моему автор тот же



MyOpera.net - Home


Rambler's Top100