Войти

Показать полную графическую версию : [решено] Как и где можно прописать автозагрузку двух окон iexplorer


Snowmania
06-10-2010, 11:58
Доброго всем дня!
У меня такая задача:

Есть комп (XP Professional SP3), для мониторинга и записи с 2х IP камер. Мониторинг ч/з 2 окна iexplorer (соответственно, два разных IP адреса)
Нужно, чтобы при перезапуске системы, автоматически загружались два окна iexplorer с заданными параметрами(размерами и местоположением на экране) и разными адресами.
Я в программировании - не силен) Желательно, чтобы через cmd или regedit...

Petya V4sechkin
06-10-2010, 12:03
[решено] Батник для открытия url (http://forum.oszone.net/thread-136280.html)

Snowmania
06-10-2010, 12:17
Не вижу связи с моей темой

Iska
06-10-2010, 14:13
Snowmania, что-либо наподобие такого?! StartTwoIE.vbs
Option Explicit

With WScript.CreateObject("Shell.Application")
.MinimizeAll

' URL, Left, Top, Width, Height
StartIE "http://www.ya.ru", 100, 100, 400, 300
StartIE "http://www.google.ru", 600, 100, 400, 300

.TileVertically
End With

WScript.Quit 0
'=============================================================================

'=============================================================================
Sub StartIE(strURL, intLeft, intTop, intWidth, intHeight)
Const READYSTATE_COMPLETE = 4

With WScript.CreateObject("InternetExplorer.Application")
.Silent = True

.FullScreen = False
'.Resizable = False

.MenuBar = False
.ToolBar = False
.AddressBar = False
.StatusBar = False

.Left = intLeft
.Top = intTop
.Width = intWidth
.Height = intHeight

.Navigate strURL

Do
WScript.Sleep 100
Loop Until Not .Busy And .ReadyState = READYSTATE_COMPLETE

.Visible = True
End With
End Sub

giksapiens
07-10-2010, 02:49
Не уверен, что через батники возможно управление окнами. А вот через powershell возможно - http://wasp.codeplex.com/

amel27
07-10-2010, 06:05
giksapiens, да тут полноценного управления и не нужно:

- настроить параметры первого окна, выставить URL1 как стартовую страницу;
- закрыть окно;
- повторно открыть и убедиться, что всё как нужно - положение, адрес и т.п.;
- закрыть окно;
- сохранить ветку реестра через RegEdit или CMD в url1.reg:
reg export "HKCU\Software\Microsoft\Internet Explorer\Main" url1.reg
- проделать то же самое со вторым URL, сформировать url2.reg;
- поставить в автозагрузку батник типа:
@echo off

reg import url1.reg
ping -n 2 127.0.0.1 >nul

start "URL1" iexplore.exe
ping -n 3 127.0.0.1 >nul

reg import url2.reg
ping -n 2 127.0.0.1 >nul

start "URL2" iexplore.exe

Snowmania
07-10-2010, 17:12
Всем ОГРОМНОЕ СПАСИБО!

Вариант, предложенный Iska, идеально подходит! (рис1)

Но! Когда включаю Св-ва обозревателя/Содержание/Ограничение доступа - не грузит страницы (рис2)
и когда прописываю адреса камер, то же самое (рис3)
Открываю браузером - все работает! (рис4)

Помогите не особо осведомленному человеку)! :durak:

Snowmania
11-10-2010, 10:33
Через *.vbs не получилось.
Зато, работает батник. Не успевало первое окно загрузиться, нужен был timeout.
amel27 :up

@echo off

reg import url1.reg
//ping -n 2 10.127.0.1 >nul

start "URL1" iexplore.exe
//ping -n 3 10.127.0.1 >nul

timeout /T 2 /nobreak

reg import url2.reg
//ping -n 2 10.127.0.1 >nul

start "URL2" iexplore.exe

amel27
11-10-2010, 10:37
Не успевало первое окно загрузиться »
хоть бы хто подсказал, что в IP в ошибся... исправил ; )

Snowmania
12-10-2010, 09:27
Еще вопрос!
Как в iexplorer'е Все кнопки и поля повырубать?

В коде Iska *.vbs, можно было:
.MenuBar = False
.ToolBar = False
.AddressBar = False
.StatusBar = False
Это очень удобно, чтоб охранники напакостить не могли. Я через реестр не смог все отключить, а в скриптах не понимаю....

amel27
12-10-2010, 10:45
чтоб охранники напакостить не могли »
вообще-то для этого есть локальная политика/административные шаблоны

Snowmania
12-10-2010, 11:11
Я не нашел, как отключить все это ни в реестре, ни в Локальных политиках, ни в групповой политике.
MenuBar
ToolBar
AddressBar
StatusBar
Нужно, чтобы осталось пустое окно, ни каких команд и кнопок iexplorer!

В сообщении #6, картинки 1 и 2. Нужно запускаемые окна так настроить.
:help:

amel27
12-10-2010, 11:34
не нашел, как отключить все это ни в реестре, ни в Локальных политиках, ни в групповой политике »
извиняюсь... забыл, что начиная с IE7 всё это добро вынесли в IEAK (http://technet.microsoft.com/ru-ru/ie/cc889351.aspx)

Snowmania
12-10-2010, 12:08
Да, забыл сказать, у меня IE 6.0

amel27
12-10-2010, 13:45
кое-что тут есть:

Ограничения, существующие в обозревателе Internet Explorer 6.0 с пакетом обновления 1 (SP1) (http://support.microsoft.com/?kbid=823057)

Internet Explorer Restrictions (http://www.pctools.com/guides/registry/detail/442)
Internet Explorer Toolbar Restrictions (http://www.pctools.com/guides/registry/detail/1111/)
Internet Explorer Control Panel Restrictions (Part 1) (http://www.pctools.com/guides/registry/detail/537)
Internet Explorer Control Panel Restrictions (Part 2) (http://www.pctools.com/guides/registry/detail/797/)

Internet Explorer Administration Kit 6 (http://technet.microsoft.com/de-de/ie/bb219529.aspx)

Snowmania
13-10-2010, 15:54
amel27 Спасибо!

Остался один меню-бар (Правка, Вид, Сервис, Справка) Безопасности он не угрожает... Но, в связи с потраченным временем, глаза мозолит... Неужели нельзя его убрать!?

amel27
14-10-2010, 13:05
Snowmania, может совместить с методом Iska?..
запустить VBS последней строкой батника - после того, как прогрузятся страницы:
On Error Resume Next

For Each obj in WScript.CreateObject("Shell.Application").Windows()
If Left(obj.LocationURL,7)="http://" Then
obj.MenuBar = False
End If
Next

Snowmania
15-10-2010, 10:05
Получилось! :clapping: :clapping: :clapping:




© OSzone.net 2001-2012