Hallo!

Kann man eigentlich davon ausgehen, dass auf dem Computer des Benutzers immer der Windows Scripting Host (zum Ausführen von VBS-Scripts) installiert ist? Wenn nicht, wie kann man testen, ob der WSH installiert bzw. aktiv ist?

Ist seit Windows 98 immer installiert.

Zitat:

Windows Script Host is distributed and installed by default on Windows 98 and later versions of Windows. It is also installed if Internet Explorer 5 (or a later version) is installed. Beginning with Windows 2000, the Windows Script Host became available for use with user login scripts.

Von
Wikipedia

Nun, ich habe auch deshalb gefragt, weil der Windows Scripting Host von manchen "Security"-Tools deaktiviert wird. Von daher wäre es vielleicht ganz sinnvoll zu prüfen, ob er aktiviert ist.

Es muss nicht WSH sein:
http://de.wikipedia.org/wiki/Windows_PowerShell

Zitat:
You can verify the settings for your execution policy by typing the following at the PowerShell command prompt and then pressing ENTER:

Get-ExecutionPolicy

Zitat von hathor:

Es muss nicht WSH sein

Vielen Dank für deine Meinung zum WSH. Aber in diesem Fall brauche ich den WSH und die Info, ob er aktiviert ist.

(Übrigens, wenn .VBS Dateien nicht mit WSH assoziiert sind, hat das nichts zu bedeuten, da viele Benutzer aus Sicherheitsgründen diese Assoziierung entfernen. Der WSH muss dann in diesem Fall explizit aufgerufen werden, mit der VBS-Datei als Parameter).

zusammenfalten · markieren

Delphi-Quellcode:

uses
  ActiveX;

function ProgIDExists(const ProgID: WideString): Boolean;
var
  Tmp: TGUID;
begin
  Result := Succeeded(CLSIDFromProgID(PWideChar(ProgID), Tmp));
end;

function IsWSHInstalled: Boolean;
begin
  Result := ProgIDExists('WScript.Shell');
end;

Vielleicht gibt es auch noch bessere/weitere ProgIds die man testen kann.