1

過去に、次の vbscript を使用してウィンドウをアクティブに保ちました。また、ウィンドウが閉じられた場合は、ウィンドウを再度開きます。ウィンドウが常に開いたままバックグラウンドにあるように、これを変更するにはどうすればよいですか。ただし、他のウィンドウはアクティブにすることができます。これはキオスクのセットアップです。ユーザーがリンクをクリックすると、ポップアップ ウィンドウが開きます。ポップアップ ウィンドウを閉じることができます。スクリプト内のショートカット リンクは、Chrome キオスク モードで Web ページを起動します。ソリューションは、アクティブなデスクトップの背景のようなものです。アクティブなデスクトップ機能を持たない Windows 7 Thin PC コンピューターでこれを使用しています。

Option Explicit
'On Error Resume Next

Dim objShell

Set objShell = CreateObject("WScript.Shell")

Do 
If (objShell.AppActivate("Kiosk") = False) Then
objShell.Run "c:\scripts\kioskhomepage"
WScript.Sleep 5000
Else
WScript.Sleep 3000
End If
Loop
4

1 に答える 1