[DmitriiV]

... как можно ограниченно реализовать IsWow64Process на WSH...»

А такой вариант?

Код:

Set objWShell = CreateObject("WScript.Shell")
strPA = UCase(objWShell.ExpandEnvironmentStrings("%PROCESSOR_ARCHITECTURE%"))
strPA6432 = UCase(objWShell.ExpandEnvironmentStrings("%PROCESSOR_ARCHITEW6432%"))
If strPA = "X86" And strPA6432 = "%PROCESSOR_ARCHITEW6432%" Then
	WScript.Echo "32-разрядная ОС"
ElseIf strPA = "X86" And Right(strPA6432, 2) = "64" Then
	WScript.Echo "32-разрядный процесс в 64-разрядной ОС"
Else
	WScript.Echo "64-разрядная ОС"
End If