Question

此代码效果很好。它将在Chrome标签中打开网站：

$companies = Company::with(['mainContact'=> function($query) use ($contact){
    $query->wherePivot('main_contact', $contact);
}])->get();

但是是否可以在所有其他正在运行的程序后面打开相同的浏览器选项卡？

我的意思是在后面说。 Chrome标签位于exel窗口的后面。

Answer 1

从帮助

在新进程中运行程序。
object.Run(strCommand, [intWindowStyle], [bWaitOnReturn])   
参数

对象WshShell对象。

strCommand 字符串值，指示要运行的命令行。您必须包括要传递给   可执行文件。

intWindowStyle

可选。指示程序外观的整数值   窗口。请注意，并非所有程序都使用此信息。

bWaitOnReturn

可选。布尔值，指示脚本是否应等待   该程序在继续执行下一个之前要完成执行   脚本中的语句。如果设置为true，脚本执行将暂停直到   程序完成，“运行”返回由程序返回的所有错误代码。   程序。如果设置为false（默认值），则Run方法返回   启动程序后立即自动返回0（不是   解释为错误代码。

备注

Run方法返回一个整数。运行方法启动程序   在新的Windows进程中运行。您可以让脚本等待   程序在继续执行之前要完成执行。这使您能够   同步运行脚本和程序。内环境变量   参数strCommand将自动展开。如果文件类型   已正确注册到特定程序，在   该类型的文件将执行程序。例如，如果Word是   安装在计算机系统上，然后在* .doc文件上调用“运行”   Word并加载文档。下表列出了可用的   intWindowStyle的设置。

intWindowStyle描述
0
 Hides the window and activates another window.

1
 Activates and displays a window. If the window is minimized or maximized, the system restores it to its original size and position. An application should specify this flag when displaying the window for the first time.

2
 Activates the window and displays it as a minimized window. 

3
 Activates the window and displays it as a maximized window. 

4
 Displays a window in its most recent size and position. The active window remains active.

5
 Activates the window and displays it in its current size and position.

6
 Minimizes the specified window and activates the next top-level window in the Z order.

7
 Displays the window as a minimized window. The active window remains active.

8
 Displays the window in its current state. The active window remains active.

9
 Activates and displays the window. If the window is minimized or maximized, the system restores it to its original size and position. An application should specify this flag when restoring a minimized window.

10
 Sets the show-state based on the state of the program that started the application.
以下VBScript代码打开当前正在运行的副本记事本编写脚本。
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "%windir%\notepad " & WScript.ScriptFullName
以下VBScript代码执行相同的操作，除了它指定窗口类型，等待用户关闭记事本，并且保存从记事本关闭时返回的错误代码。
Set WshShell = WScript.CreateObject("WScript.Shell")
Return = WshShell.Run("notepad " & WScript.ScriptFullName, 1, true)
以下VBScript代码打开一个命令窗口，将其更改为 C：\的路径，并执行DIR命令。
Dim oShell
Set oShell = WScript.CreateObject ("WSCript.shell")
oShell.run "cmd /K CD C:\ & Dir"
Set oShell = Nothing
适用于：
WshShell Object

如何使用vbs在所有其他正在运行的程序之后运行程序？

1 个答案: