you can get all the system details using below script.

32 or 64 bit depend on the OS version . 64 bit   version is  6.1.7601
   msgbox "Version: " & os.Version



Set dtmConvertedDate = CreateObject("WbemScripting.SWbemDateTime")
strComputer = "."
Set objWMIService =
GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer &
"\root\cimv2")
Set oss = objWMIService.ExecQuery ("Select * from Win32_OperatingSystem")

For Each os in oss

    msgbox "Caption: " & os.Caption
    msgbox "Code Set: " & os.CodeSet
    msgbox "Country Code: " & os.CountryCode
    msgbox "Debug: " & os.Debug
    msgbox "Encryption Level: " & os.EncryptionLevel
    dtmConvertedDate.Value = os.InstallDate
    dtmInstallDate = dtmConvertedDate.GetVarDate
    msgbox "Install Date: " & dtmInstallDate
    msgbox "Licensed Users: " & os.NumberOfLicensedUsers
    msgbox "Organization: " & os.Organization
    msgbox "OS Language: " & os.OSLanguage
    msgbox "OS Product Suite: " & os.OSProductSuite
    msgbox "OS Type: " & os.OSType
    msgbox "Primary: " & os.Primary

    msgbox "Serial Number: " & os.SerialNumber
    msgbox "Version: " & os.Version
Next


On Sun, Sep 11, 2016 at 4:23 PM, zelias <[email protected]> wrote:

> you can try in Environment variables, in ProductDir variable:
> (if UFT was installed in default path)
> *in 32 bit* you get the value C:\Program Files\HP\Unified Functional
> Testing
> *in 64 bit* you get the value C:\Program Files *(x86)*\HP\Unified
> Functional Testing
>
>
>
> On Saturday, September 10, 2016 at 10:17:32 AM UTC+3, [email protected]
> wrote:
>>
>> Hi,
>>
>>
>> How to find out whether the machine is 32-bit or 64-bit using the script?
>>
>> Thanks
>>
> --
> --
> You received this message because you are subscribed to the Google
> "QTP - HP Quick Test Professional - Automated Software Testing"
> group.
> To post to this group, send email to [email protected]
> To unsubscribe from this group, send email to
> [email protected]
> For more options, visit this group at
> http://groups.google.com/group/MercuryQTP?hl=en
>
> ---
> You received this message because you are subscribed to the Google Groups
> "QTP - HP Quick Test Professional - Automated Software Testing" group.
> To unsubscribe from this group and stop receiving emails from it, send an
> email to [email protected].
> For more options, visit https://groups.google.com/d/optout.
>

-- 
-- 
You received this message because you are subscribed to the Google
"QTP - HP Quick Test Professional - Automated Software Testing"
group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to
[email protected]
For more options, visit this group at
http://groups.google.com/group/MercuryQTP?hl=en

--- 
You received this message because you are subscribed to the Google Groups "QTP 
- HP Quick Test Professional - Automated Software Testing" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to [email protected].
For more options, visit https://groups.google.com/d/optout.

Reply via email to