Need help with Process and Folder

[DKZ]

Hi,

I'm programing in VB 2010 and i have this fuction:

Public Function getProcessFolder(ByVal ProcessName As String) As String
getProcessFolder = ""
Dim procFolder As Process = Process.GetProcessesByName(ProcessName).Clone(0)
getProcessFolder = Left(procFolder.MainModule.FileName, Len(procFolder.MainModule.FileName) - Len(procFolder.MainModule.ModuleName))
End Function

But when i use this code:
Public Property Pn() As ...

Amasurlocation = Pn.getProcessFolder("amasur")

I get error in this line: Dim procFolder As Process = Process.GetProcessesByName(ProcessName).Clone(0)

Error -> System.IndexOutOfRangeException

Anyone know why?

 

[DKZ]

Basically i need a FullPath of ProcessName withoutextension anyone can help me?

 

[JohnH]

Dim path = IO.Path.GetDirectoryName(Process.GetProcessesByName("notepad")(0).MainModule.FileName)

 

[DKZ]

I return this error:

System.IndexOutOfRangeException was unhandled


Can you help me?

 

[DKZ]

Solved! Thanks so much