Любой язык

meir · Отправлено: **11:11, 15-03-2017** | #11

Попробовал мой экспортированный файл закинуть скриптом на рабочий компьютер, он просто создал рядом ветку с моим SID, не понимаю смотрю код, круто реализованно - он рабочий, но почему-то не подменяет

Iska · Отправлено: **19:33, 15-03-2017** | #12

meir, покажите, как должно было быть, и как на самом деле получилось.

DmitriiV · Отправлено: **07:45, 23-03-2017** | #13

Цитата Iska:

... как можно ограниченно реализовать 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