troubleshooting Question

MsgBox that shows computer not found instead of Nast VB system.exception window

Avatar of solomonacquah
solomonacquahFlag for United States of America asked on
Visual Basic.NET
2 Comments1 Solution290 ViewsLast Modified:
I have code here to kill a process on a remote machine.  If I put in a node name that doesn't exist, it throws a nast vb system.execption error, how can I make so that a simple Msgbox shows that just simply says computer not found or destination host cannot be contacted, or even access denied if the program is being run without the proper permissions.

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Dim objWMIService, objProcess, colProcess, objProgram
        Dim strComputer, strProcessKill, strInput, strexe, strShell

        strProcessKill = "''"

        If (Trim(Me.Pcname.Text) = "") Then
            Call MsgBox("Please, Type a Host Name or IP.", MsgBoxStyle.Exclamation, Application.ProductName)
            Exit Sub
        End If

        ' Input Box to get name of machine to run the process
        Do
            strComputer = Pcname.Text
            If strComputer <> "" Then
                strInput = True
            End If
        Loop Until strInput = True

        objWMIService = GetObject("winmgmts:" _
        & "{impersonationLevel=impersonate}!\\" _
        & strComputer & "\root\cimv2")

        colProcess = objWMIService.ExecQuery _
("Select * from Win32_Process Where Name = " & strProcessKill)
        For Each objProcess In colProcess
            objProcess.Terminate()
        Next
        TextBox1.Text = (" Just killed process " & strProcessKill _
        & " on " & strComputer)

    End Sub
ASKER CERTIFIED SOLUTION
appari

Our community of experts have been thoroughly vetted for their expertise and industry experience.

Log in to continue reading
Become an EE member today7-DAY FREE TRIAL
Members can start a 7-Day Free trial then enjoy unlimited access to the platform for $9.99/mo
View membership options
Unlock 1 Answer and 2 Comments.
or
Learn why we charge membership fees
We get it - no one likes a content blocker. Take one extra minute and find out why we block content.
See how we're fighting big data
The Value of Experts Exchange in My Daily IT Life

Experts Exchange (EE) has become my company's go-to resource to get answers. I've used EE to make decisions, solve problems and even save customers. OutagesIO has been a challenging project and... Keep reading >>

Mike

Owner of Outages.IO
Phoenix, Arizona, United States
Member Since 2016
Join a full scale community that combines the best parts of other tools into one platform.
Unlock 1 Answer and 2 Comments.
View membership options
“All of life is about relationships, and EE has made a virtual community a real community. It lifts everyone's boat.”
William Peck

Member since 2004