Vb.Net launch/Close NotePad.exe,WORD.exe

[Lennie]

Hi there,

Launching more than one sessions of NotePad.exe or WORD.exe using Vb.Net Component PROCESS is fine but having problem closing NotePad.exe or WORD.exe when more than one Session of NotePad.exe or WORD.exe are on display on Windows.

Here is the sample script to stop NotePad.exe or WORD.exe

Private Sub BtnWordStop_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles BtnWordStop.Click
Try
With WordProcess
.StartInfo.FileName = "WinWord.exe"
.CloseMainWindow()
End With
Catch ex As Exception
MessageBox.Show(ex.Message, "WORD Stop Error")
End Try
End Sub
--------------------------------------

Private Sub BtnStop_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles BtnStop.Click
'stop and close NotePad.exe
Try
With noteProcess
.StartInfo.FileName = "NotePad.exe"
.CloseMainWindow()
End With
Catch ex As Exception
MessageBox.Show(ex.Message, "Note Pad Stop Error")
End Try
End Sub


Could someone please help me with sample script. Thanks.

[joewmaki]

Something like this should work:

Sub KillProcess(ByVal strApp As String)
        Try
            Dim proc As Array = Process.GetProcessesByName(strApp)
            For Each P As Process In proc
                P.CloseMainWindow()
            Next
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        End Try
    End Sub

[Lennie]

Hi Joe,
Thanks for the sample script.

I have tested it and was surprised that :-
For example I have more than one sessions of WINWORD.EXE on, instead of the script closing it down automatically one at a time but I have to click on the BTNWORDSTOP many times.

Is there a way to make it close all the WORD sessions logically instead of clicking on the BTNWORDSTOP continously.

[joewmaki]

Sorry Lennie, it works as desired on my machine. How are you calling the procedure in the button_click?

[Lennie]

Hi Joe,
Thanks for your response. If it's a single session it does work. But if there are more than one sessions only one session is closed instead of all closed automatically without continously clicking on the BTNWORDSTOP.

Being struggling the whole night till morning trying to work around it but in vain.

Here are the scripts that I used to test.

Private Sub BtnWordStop_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles BtnWordStop.Click

FKillProcess ("WinWord")
End sub


Private Sub FKillProcess(Byval strApp)
try
Dim proc As Array = Process.GetProcessesByName(strApp)
For Each P As Process In proc
P.CloseMainWindow()
Next

Catch ex as exception
messagebox.show(ex.message)

End try
End sub

[joewmaki]

Your right, it must be a word issue. I tested with notepad and it worked correctly