日期:2011-08-02  浏览次数:20409 次

 你再也不需要使用Win32应用编程接口或者VB的Shell函数来启动外部应用程序了。因为你可以使用.NET框架中的System.Diagnostics.Process类来进行这个操作,从而进一步简化代码。

  虽然.NET使很多事情变得更加复杂,但是启动外部应用程序不在此列。在传统VB程序中,你可以使用Shell函数启动一个应用程序。当你传送一个数据文件名的时候,VB在相应应用程序中打开这个数据文件。你可以使用一个任选的windowstyle参数控制所启动的应用程序的窗口方式。例如,在VB6中,下面这行代码将启动默认的文本编辑器(通常是记事本)并打开文件"c:\somepath\somefile.txt":

returnID = Shell("c:\somepath\somefile.txt", vbNormalFocus)

  通过Microsoft.VisualBasic.Comaptibility域名空间,在VB.NET中仍然能够使用Shell功能,并且它已经被做了一些改动,但在.NET框架中它并不是启动应用程序的最好的方法,因为Shell函数有一些严格的限制条件,其中之一就是只能异步地启动程序;在启动应用程序之后,你自己的程序才继续运行。所以你不能直接使用它来启动一个程序,并且只能等到这个程序退出,你才能返回到你自己的程序中。为了在传统VB中做到这点,你必须求助于Windows API,而这需要对窗口句柄、过程识别号、枚举最高级窗口等有所了解。

  使用.NET,就能使这个操作变得很简单。你可以使用System.Diagnostics域名空间中的Process类来启动外部程序。你可以简单的使用共享的Process.Start方法启动一个新的过程,把一个可执行文件名或者可执行应用程序的扩展关联文件名作为参数传输给它。例如,下面的代码启动"c:\somepath\somefile.txt"文件。

System.Diagnostics.Process.Start ("c:\somepath\somefile.txt")

  Start方法有一个超载的版本,能返回一个Process对象,所以你可以获得对启动的过程的引用,并可用于多种用途:

Dim myProcess As Process = System.Diagnostics.Process.Start
("c:\somepath\somefile.txt")
MessageBox.Show(myProcess.ProcessName)

  初看起来,你看上去好象丧失了控制窗口风格的能力(还记得Shell函数的第二个参数吗?),但是事实情况并非如此。在很多情况下,你不需要明确地设置窗口风格,因为默认情况是在一个带有焦点的正常窗口(ProcessWindowStyle.Normal)中启动过程。但是如果你想使用一个不同的窗口风格时,可以使用超载的Process.Start方法接收一个ProcessStartInfo对象参数而不是一个简单的字符串。为了使用它,首先要创建一个ProcessStartInfo对象,然后设置进程初置值。两个超载方法让你设置一个文件名或者一个文件名和一组命令行参数。并且ProcessStartInfo对象还有一个WindowStyle属性,由System.Diagnostics.Process.WindowStyle枚举的值组成。所以你可以调用Process.Start方法并传送一个ProcessStartInfo对象来控制启动的窗口的风格。

Dim psInfo As New _
System.Diagnostics.ProcessStartInfo _
("c:\somepath\somefile.txt")
psInfo.WindowStyle = _
System.Diagnostics.ProcessWindowStyle.Normal
Dim myProcess As Process = _
System.Diagnostics.Process.Start(psInfo)

  由于Process类有一个StartInfo属性,它是一个ProcessStartInfo对象,所以另一种产生相同结果的方法是创建一个Process对象并设置它的StartInfo属性。在预创建的Process对象的时候,你可以仅仅调用它的Start方法,而不需使用Process类的共享Start方法。

Dim myProcess As System.Diagnostics.Process = _
new System.Diagnostics.Process()
myProcess.StartInfo.FileName = _
"c:\somepath\somefile.txt"
myProcess.StartInfo.WindowStyle = _
System.Diagnostics.ProcessWindowStyle.Normal
myProcess.Start

 

  在设计期间设置Process参数

  .NET框架出厂时已经带有在设计期间封装这些代码的Process组件。你可以在工具栏的Components栏目中找到它。为了使用它,把一个Process组件拖到你的窗体上,然后在属性窗口展开StartInfo属性,如下图(图1)所示设置StartInfo的值。





图1:你可以添加一个Process组件到一个窗体中,让你在设计期间设置属性而不是在运行期间设置属性。

  监视启动过程

  到目前为止,你看到的启动过程还是使用一种异步的方式;就象传统VB Shell函数一样。换句话说,在启动这个过程之后,父程序中的代码才能继续执行。你需要一些监视被启动的过程的方法,并弄清楚它们什么时候退出或者是否仍在运行。根据你的应用程序的具体情况,你可能需要使用不同的方式来处理这个问题。

   启动过程,停止你的程序直到它退出。

   启动过程,监视它,并只有当它结束时才做某些事情,同时让你的程序正常地运行。

   启动过程,给它一些输入,让它处理这些输入,然后强迫它退出。

   启动过程,并且只要启动的过程正在运行或者运行期间没有出现问题,就执行某些操作。如果过程退出或者停止,你需要作出某些动作。

   启动过程,并给它一些特殊的输入,并/或取得进一步处理产生的输出结果。例如,你可能想启动一个命令窗口,以编程方式在这个窗口中输入一些内容,然后取得并处理输出结果。


  启动一个过程并等到它退出

  等待一个启动的过程结束的最简单的方法时调用Process.WaitForExit方法。这导致正在启动的过程停止执行直到启动过的过程退出。然而不幸的是,当你直接从一个Windows窗体中使用这个方法的时候,它还能导致窗体停止对系统事件的响应,比如Paint。

  所以一般来说你不会想从一个按钮中使用WaitForExit方法来启动一个外部程序(虽然使用WaitForExit方法非常适于从一个没有可视用户界面的应用程序中启动另一个过程,例如从一个ASP.NET应用程序服务器中调用控制台应用程序)。图二中所示的样本窗体有一个名为"Launch and WaitForExit"的按钮,让你在从一个窗体中使用这个方法时能看到会发生什么情况。