Visual Basic.NET - Problemas con ShellExecute en VB . NET

Buenas tardes amigo teno problemas a la hora de trabajar con el ShellExecute en la version VB 6 trabajaba sin problemas no se en verdad lo que pasa me da el siguiente error :

Excepción no controlada del tipo 'System.EntryPointNotFoundException' en ShellExcecute.exe

Información adicional: Unable to find an entry point named ShellExecute in DLL shell32.dll.

Que puede ser este error?, otra pregunta ponganme atencion:

Public Declare Function ShellExecute Lib "shell32.dll" Alias _
"ShellExecute" (ByVal hwnd As Long, ByVal lpOperation As String, _
ByVal lpFile As String, ByVal lpParameters As String, _
ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

ByVal hwnd As Long que funcion cumple dentro de este comando?, por favor espero su respuesta lo mas pronto posible, gracias... y saludos

En vez de usar el ShellExecute, el .NET tiene sistemas para lanzar procesos y programas externos sin usar la API. Para emular el ShellExecute, se haria:

Dim Proceso As New System.Diagnostics.Process
Proceso.StartInfo.FileName = "Archivo.EXE"
Proceso.Start()

Con la ventaja de que este objeto tiene diversos metodos y funciones que te dan muchisima mas funcionalidad que el ShellExecute.

Espero que te sea de utilidad. Salu2.

Amigo te hablaba del ShellExecute, ya que esta herramienta me provee mucha flexibilidad necesito ejecura un archivo con unos parametros y guardar su resultado (un archivo de extension .xls o .txt) en una direccion x, no se si con Proceso.Start() ,¿se podria realizar pero necesito este tipo de herramienta?, por favor es posible que me ayudes, si no entiendes o tienes dudas dimelo y te explicare mejor

Como quieras. La verdad es que con el .NET framework ya practicamente no necesitas API's, pero si te va mejor. La llamada en .NET seria:

Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Integer, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Integer) As Integer
Const SW_SHOWNORMAL = 1

Y para realizar la llamada:

ShellExecute(Me.Handle.ToInt64, vbNullString, "C:\Archivos de programa\Internet Explorer\IEXPLORE.EXE", "www.terra.es", "C:\", SW_SHOWNORMAL)

Eso mismo con el proceso en .NET se haria:

Dim ProcessStartInfo As New System.Diagnostics.ProcessStartInfo
ProcessStartInfo.FileName = "C:\Archivos de programa\Internet Explorer\IEXPLORE.EXE"
ProcessStartInfo.Arguments = "www.terra.es"
ProcessStartInfo.WorkingDirectory = "C:\"
ProcessStartInfo.WindowStyle = ProcessStartInfo.WindowStyle.Maximized
ProcessStartInfo.UseShellExecute = True
ProcessStartInfo.CreateNoWindow = False
System.Diagnostics.Process.Start(ProcessStartInfo)

Escoje la forma que quieras. Salu2.

tengo un incoveniente que no se me ejecuta un archivo.bat automaticamente, pero manualmente si lo hace....

Gracias, me sirvió, saludos