VBScript Basics, Part 31 | Internet Explorer - Existing Window (Automation) смотреть онлайн
VBScripting (.vbs) Basic tutorial on how to use an existing or already opened Internet Explorer Window instead of creating a new one to run your script.
Code Example:
______________________________________________________
Option Explicit
Dim objApp, nIE, oIE, Window
Set objApp = CreateObject("Shell.Application")
Set oIE = Nothing
For Each Window In objApp.Windows
If InStr( Window.Name, "Internet Explorer" ) Then
Set oIE = Window
End If
Next
If oIE is Nothing Then
Call NewIE
Else
Call OpenIE
End If
'Internet Explorer is closed.
Sub NewIE
Set nIE = CreateObject("InternetExplorer.Application")
nIE.Navigate2 "http://www.youtube.com/user/thesimplycoded/",2048
nIE.Visible = True
End Sub
'Internet Explorer is already opened.
Sub OpenIE
oIE.Navigate2 "http://www.youtube.com/user/thesimplycoded/",2048
oIE.Visible = True
End Sub
'navOpenInNewTab = 2048
'navOpenInBackgroundTab = 4096
______________________________________________________
Рады приветствовать вас в нашем кинозале, у нас собрана огромнейшая база видео файлов и вы всегда сможете найти любой фильм на свой вкус и увидеть его совершенно бесплатно и не нужно регистрироваться.
Онлайн просмотр кино стало любимым времяпрепровождением для все киноманов, ведь не всегда есть время, чтобы посетить кинотеатр, но мі собрали огромную базу видео и фильмов, сериалов, мультфильмов для онлайн просмотра. Ваш отдых - это наша работа, мы пополняем нашу базу регулярно и только лучшими и кассовыми фильмами, и все это у нас бесплатно и без регистрации. Наша задача обеспечить просмотр ваших любимых фильмов с максимальным комфортом, без рекламы и в любое удобное для Вас время.
У нас собраны лучшее из коллекций всемирного кинематографа онлайн, вы можете смотреть фильмы бесплатно без регистрации , выбирая любимый фильм из нашей коллекции, которая включает в себя копии мировой классики и последние кино новинки. Все посетители выбирая наш сайт смогут найти киноленту по своему вкусу и начать просмотр с удовольствием.
Для просмотра видео используются любые онлайн - браузеры установленные на вашем компьютере.
Все, что необходимо, чтобы смотреть фильмы онлайн - это хорошее настроение!
Не забываемого вам пребывания у нас в интернет-кинозале, онлайн кинотеатре ULTRADOX!