Technology Questions

Go Back   Technology Questions > Software Questions > General Questions > Microsoft Office
Window Size & Position Window Size & Position
Register FAQs Calendar Search Today's Posts Mark Forums Read

Reply
 
LinkBack Thread Tools
  #1 (permalink)  
Old 04-20-2007, 11:01 AM
Snakeoids
Newsgroup Contributor
  
Posts: n/a
Window Size & Position
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}{TA B}{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


Digg this Post!Add Post to del.icio.usBookmark Post in TechnoratiFurl this Post!
Reply With Quote

 
Old 04-20-2007, 11:01 AM
  #2 (permalink)  
Old 04-20-2007, 01:30 PM
Beth Melton
Newsgroup Contributor
  
Posts: n/a
Re: Window Size & Position
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/newsgroups...&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/boo...x#AboutTheBook

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

"Snakeoids" <Snakeoids@discussions.microsoft.com> wrote in message
news:FBA4F845-16D4-4ADC-923C-1522DD8114CA@microsoft.com...
> 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}{TA B}{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
>
>


Digg this Post!Add Post to del.icio.usBookmark Post in TechnoratiFurl this Post!
Reply With Quote

  #3 (permalink)  
Old 04-20-2007, 07:15 PM
Peter Foldes
Newsgroup Contributor
  
Posts: n/a
Re: Window Size & Position
Aside from what Beth advised you I suggest that you also post it to the Windows Scripting group

http://msdn.microsoft.com/newsgroups...ever.scripting



--
Peter

Please Reply to Newsgroup for the benefit of others
Requests for assistance by email can not and will not be acknowledged.

"Snakeoids" <Snakeoids@discussions.microsoft.com> wrote in message news:FBA4F845-16D4-4ADC-923C-1522DD8114CA@microsoft.com...
> 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}{TA B}{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
>
>
Digg this Post!Add Post to del.icio.usBookmark Post in TechnoratiFurl this Post!
Reply With Quote

  #4 (permalink)  
Old 04-20-2007, 09:30 PM
Peter Foldes
Newsgroup Contributor
  
Posts: n/a
Re: Window Size & Position
Just a question. Is your IE set in kiosk mode. That would explain why the windows will not hold on resizing

--
Peter

Please Reply to Newsgroup for the benefit of others
Requests for assistance by email can not and will not be acknowledged.

"Snakeoids" <Snakeoids@discussions.microsoft.com> wrote in message news:FBA4F845-16D4-4ADC-923C-1522DD8114CA@microsoft.com...
> 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}{TA B}{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
>
>
Digg this Post!Add Post to del.icio.usBookmark Post in TechnoratiFurl this Post!
Reply With Quote

Reply

Bookmarks

« Previous Thread | Next Thread »
Thread Tools

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts
BB code is On
Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On

Similar Threads
Thread Thread Starter Forum Replies Last Post
Re: Window Size and Position Black Vista version Windows Vista 0 11-30-2008 07:40 PM
Re: Window Size and Position La Poste Windows Vista 3 11-30-2008 06:20 PM
Re: Window Size and Position Black Vista version Windows Vista 0 11-29-2008 02:20 PM
window position and size is saved b11_ Windows XP 2 10-17-2008 04:57 AM
window position, size and views Glenn Windows Vista 2 02-09-2008 05:50 AM


New To Technology Questions? Do You Need Help with Your Computer or Device? Do You Need Help with this site?

All times are GMT -8. The time now is 09:47 AM.

Technology Questions - Past Articles - Top

2003 - 2009 All Rights Reserved. Technology Questions

Search Engine Friendly URLs by vBSEO 3.3.0