如何在 VB 中使用 ExitWindowsExec() 功能来运行 MS-DOS 批处理文件

文章翻译 文章翻译
文章编号: 147806 - 查看本文应用于的产品
本文已归档。它按“原样”提供,并且不再更新。
展开全部 | 关闭全部

本文内容

概要

ExitWindowsExec() 函数终止 Windows、 运行指定的 MS-DOS 应用程序,然后重新启动 Windows。本文中的信息说明如何从 Microsoft Visual Basic 中调用此函数。

更多信息

若要替换的处于活动状态时 Windows 正在运行的 Windows 组件 ExitWindowsExec() 函数通常用于由安装程序。 通常情况下,您要执行复制时 Windows 暂时关闭该文件将 MS-DOS 批处理文件运行。对于 ExitWindowsExec() 声明如下所示:
   ' Place the following declaration on one, single line:

  Private Declare Function ExitWindowsExec Lib "User" (ByVal lpszExe As String,
      ByVal lpszParams As Any) As Integer
				

第一个参数: lpszExe $

ExitWindowsExec(),lpszExe $ 的第一个参数应包含您要运行的可执行文件的完全限定的路径的字符串。 此字符串必须包含不超过 127 个字符。为批处理文件需要与文件--C:\DOS\COMMAND.COM 指定 COMMAND.COM。若要获取完全限定的路径以 COMMAND.COM Visual Basic 中,您可以使用 Environ $ 函数:
   lpszExe$ = Environ$("COMSPEC")
				

有关 Environ $ 函数的详细信息,请参阅 Microsoft Visual Basic 语言参考或帮助菜单。

第二个参数: lpszParams $

对于 ExitWindowsExec(),lpszParams $ 第二个参数应为一个字符串,其中包含可执行文件的任何必要参数。是否需要任何参数传递的长整数 0 0 如和。

若要执行批处理文件,但是,这是您在其中指定路径批处理文件以及任何所需的参数。此外,您需要使用/c 开关指示要调用的 COMMAND.COM 副本的 MS-DOS 字符串之前加上。下面是一个示例:
   lpszParams$ = "/C C:\DIRNAME\GENERIC.BAT  PARAMETER1 PARAMETER2"
				

此函数的返回值为 False 时函数失败。

分步示例

  1. 使用记事本在 Windows 中的,或者在 MS-DOS 中的编辑称为 C:\RUNIT.BAT 硬盘的根目录中创建一个批处理文件。为其指定以下内容:
       @echo off
       echo Making Backup of autoexec.bat
       copy c:\autoexec.bat c:\*.bak
       echo Done
    
    						
  2. 在 Visual Basic (Alt,F,N) 中启动新项目。默认情况下创建 Form1。
  3. 将下面的声明添加到窗体的通用声明部分:
       ' Place the following declaration on one, single line:
    
       Private Declare Function ExitWindowsExec Lib "User" (ByVal lpszExe As String, _
          ByVal lpszParams As Any) As Integer
    
    						
  4. 将一个 (Command1) 的命令按钮添加到该的表单,并将下面的代码放入 Click() 事件中。
       Private Sub Command1_Click ()
          sComspec$ = Environ$("COMSPEC")
          ret% = ExitWindowsExec(sComspec$,  "/c c:\runit.bat")
       End Sub
    
    						
  5. 保存项目 (Alt,F,V)。然后按 F5 键运行该程序。 单击命令按钮,退出 Windows、 运行该批处理文件和然后重新启动 Windows。

属性

文章编号: 147806 - 最后修改: 2013年9月30日 - 修订: 1.1
这篇文章中的信息适用于:
  • Microsoft Visual Basic 4.0 专业版
  • Microsoft Visual Basic 4.0 16-bit Enterprise Edition
关键字:?
kbnosurvey kbarchive kbmt kbwndw KB147806 KbMtzh
机器翻译
注意:这篇文章是由无人工介入的微软自动的机器翻译软件翻译完成。微软很高兴能同时提供给您由人工翻译的和由机器翻译的文章, 以使您能使用您的语言访问所有的知识库文章。然而由机器翻译的文章并不总是完美的。它可能存在词汇,语法或文法的问题,就像是一个外国人在说中文时总是可能犯这样的错误。虽然我们经常升级机器翻译软件以提高翻译质量,但是我们不保证机器翻译的正确度,也不对由于内容的误译或者客户对它的错误使用所引起的任何直接的, 或间接的可能的问题负责。
点击这里察看该文章的英文版: 147806
Microsoft和/或其各供应商对于为任何目的而在本服务器上发布的文件及有关图形所含信息的适用性,不作任何声明。 所有该等文件及有关图形均"依样"提供,而不带任何性质的保证。Microsoft和/或其各供应商特此声明,对所有与该等信息有关的保证和条件不负任何责任,该等保证和条件包括关于适销性、符合特定用途、所有权和非侵权的所有默示保证和条件。在任何情况下,在由于使用或运行本服务器上的信息所引起的或与该等使用或运行有关的诉讼中,Microsoft和/或其各供应商就因丧失使用、数据或利润所导致的任何特别的、间接的、衍生性的损害或任何因使用而丧失所导致的之损害、数据或利润不负任何责任。

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com