Visual Basic

vijay2482 wrote:

I will use google before getting into the forum.

thatraja |Chennai|India|

---

Brainbench certifications
Down-votes are like kid's kisses don't reject it
Do what you want quickly because the Doomsday on 2012

Catch exp As Exception
                   MsgBox("The Database is used by Ariane. Easy ECN will exit Ariane now.")
                   Dim pProcess() As Process = System.Diagnostics.Process.GetProcessesByName("db2krun")
                   For Each p As Process In pProcess
                       p.Kill()
                   Next

Catch exp As Exception
                   MsgBox("The Database is used by Ariane. Easy ECN will exit Ariane now.")
                   Dim pProcess() As Process = System.Diagnostics.Process.GetProcessesByName("db2krun")
                   For Each p As Process In pProcess
                       p.Kill()
                   Next

Dim pProcess() As Processes = System.Diagnostics.Process.GetProcessesByName("db2krun")
If pProcesses.Count > 0 Then
     MsgBox("The Database is currently being used by Ariane. Easy ECN will exit now.")
     Application.Terminate
End If

I are Troll