RE: OT: Batch File Help

[Frost Neil <Neil.Frost@xxxxxxx>]

Like this....

copy and paste into notepad, change the URL's and save as .vbs.

You can run as an AT job or if you need a batch file just put the path
in.

eg c:\test.vbs

Neil



'----------------------------
Dim IE
Dim screen_width
Dim screen_height

screen_width = 1024
screen_height = 768

Set WshShell = WScript.CreateObject("WScript.Shell")
Set IE = CreateObject("InternetExplorer.Application")
ie.left=0
ie.top=0
ie.height=(screen_height/2)
ie.width=(screen_width/3)
ie.menubar=1
ie.toolbar=1
ie.navigate "www.theregister.co.uk"
ie.visible=1

Set IE = CreateObject("InternetExplorer.Application")
ie.left=((screen_width/3)*2)
ie.top=0
ie.height=(screen_height/2)
ie.width=(screen_width/3)
ie.menubar=1
ie.toolbar=1
ie.navigate "http://www.google.com"
ie.visible=1

Set IE = CreateObject("InternetExplorer.Application")
ie.left=(screen_width/3)
ie.top=0
ie.height=(screen_height/2)
ie.width=(screen_width/3)
ie.menubar=1
ie.toolbar=1
ie.navigate "http://www.yahoo.com"
ie.visible=1

Set IE = CreateObject("InternetExplorer.Application")
ie.left=0
ie.top=(screen_height/2)
ie.height=(screen_height/2)-10
ie.width=(screen_width/3)
ie.menubar=1
ie.toolbar=0
ie.navigate "http://www.bbc.co.uk"
ie.visible=1

Set IE = CreateObject("InternetExplorer.Application")
ie.left=((screen_width/3)*2)
ie.top=(screen_height/2)
ie.height=(screen_height/2) -10
ie.width=(screen_width/3)
ie.menubar=1
ie.toolbar=0
ie.navigate "http://www.automatedhome.co.uk"
ie.visible=1

Set IE = CreateObject("InternetExplorer.Application")
ie.left=(screen_width/3)
ie.top=(screen_height/2)
ie.height=(screen_height/2) -10
ie.width=(screen_width/3)
ie.menubar=1
ie.toolbar=0
ie.navigate "http://www.letsautomate.com"
ie.visible=1

Set WshShell = Nothing
Set IE = Nothing
wscript.quit

'----------------------------


>I have script which opens 4 browser windows in a grid. Perhaps you
could
use 
>something like it instead.

Yahoo! Groups Sponsor

ADVERTISEMENT

http://www.automatedhome.co.uk
Post message: ukha_d@xxxxxxx 
Subscribe:  ukha_d-subscribe@xxxxxxx 
Unsubscribe:  ukha_d-unsubscribe@xxxxxxx 
List owner:  ukha_d-owner@xxxxxxx
List of UKHA Groups here - http://groups.yahoo.com/group/UKHA_Grouplists/

Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.