→ The Lansweeper Customer Excellence Awards 2024 - Submit Your Project Now! Learn More & Enter Here
‎04-20-2010 08:16 AM
‎10-13-2010 02:40 AM
Set oWS = CreateObject("WScript.Shell")
Set oFS = CreateObject("Scripting.FileSystemObject")
sComputer = "ComputerNameHere"
sScriptName = WScript.ScriptName
sScriptPath = WScript.ScriptFullName
sTemp = Replace(sScriptName, ".vbs", ".txt")
sTempFile = Replace(sScriptPath, sScriptName, sTemp)
oWS.Run "cmd.exe /c psexec \\" & sComputer & " -c C:\Windows\System32\chkcpu32 /v >" & Chr(34) & sTempFile & chr(34),0 ,True
Set oTempFile = oFS.OpenTextFile(sTempFile, 1)
Do While oTempFile.AtEndOfStream <> True
sText = oTempFile.ReadLine
If Instr(sText, "64-bit support") Then
sText = LCase(sText)
If InStr(sText, "no") Then
oWS.Popup "CPU with 64-bit support NOT detected", ,sComputer , vbExclamation
Else
oWS.Popup "CPU with 64-bit support DETECTED!", ,sComputer , vbInformation
End If
Exit Do
End If
Loop
oTempFile.Close
oFS.DeleteFile(sTempFile)
‎04-29-2010 09:13 AM
‎04-29-2010 10:56 AM
hzjfans wrote:
Hi,
but Intel website said the CPU is Intel 64. and I use BITS check is x64 CPU.
‎04-22-2010 10:35 AM
‎04-22-2010 11:16 AM
hzjfans wrote:
Caption: x86 Family 6 Model 23 Stepping 10
AddressWidth: 32
DataWidth: 32
‎04-20-2010 10:11 AM
Experience Lansweeper with your own data. Sign up now for a 14-day free trial.
Try Now