关于调用外部应用程序

我用SHELL调用外部应用程序
无论该程序执行的正确与否都不会在VB中报错
可是如果该程序出错的话，我怎么才能得到出错信息呢？
还是需要使用API啊
我不懂VB编程，只是需要个小工具，自己写一个而已
望各位大虾帮忙，多谢啦~~

解决方案 »

  1.   

    some code to FYI模块：
    Declare Function OpenProcess Lib "kernel32" (ByVal dwDesiredaccess&, ByVal bInherithandle&, ByVal dwProcessid&) As LongDeclare Function GetExitCodeProcess Lib "kernel32" (ByVal hProcess As Long, lpexitcode As Long) As LongConst STILL_ACTIVE = &H103
    Const PROCESS_QUERY_INFORMATION = &H400
    程序：
    hShell = Shell("调用的程序.exe", vbNormalFocus) hProc = OpenProcess(PROCESS_QUERY_INFORMATION, False, hShell)
     Do
        GetExitCodeProcess hProc, lExit
        DoEvents
     Loop While lExit <> STILL_ACTIVE
    msgbox"程序结束"
      

  2.   

    大虾，您给的代码也不能报错啊我调用的是 J2SDK 中的 native2ascii.exe就算没得到执行结果，该程序也不给我报错
      

  3.   

    o,这样啊，那我现在要调用 native2ascii.exe 能有啥办法控制么？