Public Overloads Shared Function FN_ExecuteCmd(ByVal strFileName As String) As String
Dim myProcess As System.Diagnostics.Process = Nothing
Try
myProcess = New System.Diagnostics.Process
myProcess.StartInfo.FileName = strFileName
myProcess.StartInfo.CreateNoWindow = True
myProcess.Start()
myProcess.Close()
myProcess.Dispose()
Return "1"
Catch ex As Exception
myProcess.Close()
myProcess.Dispose()
Throw ex
End Try
End Function