Window Size & Position

[Snakeoids]

Greetings,
I have a small program (Visual Basic) that automatically restarts my
computer and launches various applications so that when I get into the
office, my computer is ready to go. However I have a problem with my
Internet Explorer windows that launch in the program. The size and position
of these windows are not what I want, so when I get to my computer, I have to
manually size and position with my mouse. Can someone advise me code that I
can add to my program to have these windows automatically sized and
positioned to what I want when they launch please? Thank you.

See my current code below. Cheers.


Set objShell = WScript.CreateObject("WScript.Shell")
objShell.Run "Notepad.exe"
Do Until Success = True
Success = objShell.AppActivate("Notepad")
Wscript.Sleep 1000
Loop
objShell.SendKeys "{F5}{ENTER}{ENTER}"
Wscript.Sleep 5000


Set objShell = WScript.CreateObject("WScript.Shell")
objShell.Run "http://165.252.48.3:7070/NTN/ntndol/input"
Wscript.Sleep 5000
objShell.SendKeys
"NBCCMISS{TAB}102182{TAB}RN{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}{ENTER}"
Wscript.Sleep 5000


Set objShell = WScript.CreateObject("WScript.Shell")
objShell.Run "IEXPLORE.EXE"
Wscript.Sleep 5000
objShell.SendKeys "RNEVILLE{TAB}{ENTER}"
Wscript.Sleep 5000
Set objShell = WScript.CreateObject("WScript.Shell")
objShell.Run "IEXPLORE.EXE"
Wscript.Sleep 5000
objShell.SendKeys "RNEVILLE{TAB}{ENTER}"
Wscript.Sleep 5000
Set objShell = WScript.CreateObject("WScript.Shell")
objShell.Run "IEXPLORE.EXE"
Wscript.Sleep 5000
objShell.SendKeys "RNEVILLE{TAB}{ENTER}"
Wscript.Sleep 10000
Set objShell = WScript.CreateObject("WScript.Shell")
objShell.Run "IEXPLORE.EXE"
Wscript.Sleep 5000
objShell.SendKeys "RNEVILLE{TAB}{ENTER}"
Wscript.Sleep 10000

Set objShell = WScript.CreateObject("WScript.Shell")
objShell.Run "http://176.16.1.16/ntn/inquiryLogin.action"
Wscript.Sleep 5000
objShell.SendKeys "RNEVILLE{TAB}2009{TAB}{ENTER}"
Wscript.Sleep 10000

Set objShell = WScript.CreateObject("WScript.Shell")
objShell.Run "NOTES.exe"
Wscript.Sleep 20000
objShell.SendKeys "pass{ENTER}"
Wscript.Sleep 5000

Set objShell = WScript.CreateObject("WScript.Shell")
objShell.Run "https://anywhere.telus.com/index.jsp"
Wscript.Sleep 5000

 

[Beth Melton]

You may want to post this in a Visual Basic newsgroup instead of an Office
newsgroup.

Here's link for the general discussion group:
http://msdn.microsoft.com/newsgroup...ft.public.vb.general.discussion&lang=en&cr=US

Please post all follow-up questions to the newsgroup. Requests for
assistance by email can not be acknowledged.

~~~~~~~~~~~~~~~
Beth Melton
Microsoft Office MVP

Co-author of Word 2007 Inside Out:
http://www.microsoft.com/MSPress/books/9801.aspx#AboutTheBook

Word FAQ: http://mvps.org/word
TechTrax eZine: http://mousetrax.com/techtrax/
MVP FAQ site: http://mvps.org/

 

[Peter Foldes]

Aside from what Beth advised you I suggest that you also post it to the Windows Scripting group

http://msdn.microsoft.com/newsgroups/default.aspx?dg=microsoft.public.windows.sever.scripting

 

[Peter Foldes]

Just a question. Is your IE set in kiosk mode. That would explain why the windows will not hold on resizing