Starting Process and Resizing Process Window in VB.NET

I've been studying this solution, yet can not duplicate.

http://www.thescripts.com/forum/thread351439.html


I have a form with a single button. When the button is clicked, I want Internet Explorer to launch on a specific monitor with a specific window size.

I assume the only way to do this is with the Windows API -- which I have never used.


Here is my code:

-------------------------------------------------------------------------------------------

-------------------------------------------------------------------------------------------

The message box returns false each time, and the window is not resized.

What am I missing??



Tom

re: Starting Process and Resizing Process Window in VB.NET

Answer : Please add the
Imports System.Threading namespace and then add Thread.Sleep(2000) to wait for some time before resize...

It works fine....Thanks for ur help your code works for me also...

Below is Corrected Code

Imports System.Runtime.InteropServices

'Add below namespace for sleep function
Imports System.Threading

Public Class Form1

Dim tom As New Process
Dim tomstyle As New ProcessWindowStyle
Dim hndtom As IntPtr

Public Declare Auto Function SetWindowPos Lib "user32.dll" ( _
ByVal hWnd As IntPtr, _
ByVal hWndInsertAfter As IntPtr, _
ByVal X As Int32, _
ByVal Y As Int32, _
ByVal cx As Int32, _
ByVal cy As Int32, _
ByVal uFlags As UInt32 _
) As Boolean

Public Declare Auto Function MoveWindow Lib "user32.dll" ( _
ByVal hWnd As IntPtr, _
ByVal X As Int32, _
ByVal Y As Int32, _
ByVal nWidth As Int32, _
ByVal nHeight As Int32, _
ByVal bRepaint As Boolean _
) As Boolean


Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

tomstyle = ProcessWindowStyle.Normal

tom = Process.Start("c:\program files\internet explorer\iexplore.exe")

'Put some wait so that it returns the proper handle after the process is launched

Thread.Sleep(2000)

hndtom = tom.MainWindowHandle

MsgBox(MoveWindow(hndtom, 0, 50, 1024, 700, True))

End Sub

End Class

Poonam..:)