我有一个应用程序,我的客户想要打开一个信息亭窗口,即在启动时进入他们的公司互联网。Vb 不是我的东西,但他们希望它集成到他们当前的程序中,我认为这很容易,所以我得到了
Shell ("explorer.exe http://www.corporateintranet.com")
需要传递的命令行是 -k
无法弄清楚到底该在哪里放弃它以使其工作。提前致谢!:)
我有一个应用程序,我的客户想要打开一个信息亭窗口,即在启动时进入他们的公司互联网。Vb 不是我的东西,但他们希望它集成到他们当前的程序中,我认为这很容易,所以我得到了
Shell ("explorer.exe http://www.corporateintranet.com")
需要传递的命令行是 -k
无法弄清楚到底该在哪里放弃它以使其工作。提前致谢!:)
如果您想使用 -k,您可能需要调用iexplore.exe
而不是explorer.exe
.
这对我有用,不是最优雅的,但它会做:
Shell ("C:\Program Files\Internet Explorer\iexplore.exe -k http://www.corporateintranet.com")
有点晚了。但是对于以后遇到这个话题的人,我的建议是:使用 Shell32.dll 中的 ShellExecute 函数
例子:
ShellExecute(Application.hwnd, "open", "http://www.corporateintranet.com", vbNullString, vbNullString, SW_SHOWNORMAL)
这是放入模块的声明:
Public Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (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
Public Const SW_SHOW = 5
Public Const SW_SHOWDEFAULT = 10
Public Const SW_SHOWNORMAL = 1
您现在拥有它,但我认为您在 iexplore.exe 之后缺少结束引号
您可能还想取出 [space]-k,将缩放级别设置为在 kiosk 模式下适合您的水平,然后将 [space]-k 放回原处。我猜有一个参数或参数,因为它们调用它以将打开的缩放级别传递给 iexplore,但还不知道该怎么做。