+- Sinisterly (https://sinister.li)
+-- Forum: Coding (https://sinister.li/Forum-Coding)
+--- Forum: Coding (https://sinister.li/Forum-Coding--71)
+--- Thread: [AutoIt]Get OS name and service pack (/Thread-AutoIt-Get-OS-name-and-service-pack)
[AutoIt]Get OS name and service pack - 1234hotmaster - 11-05-2011
Code:
Func _CompGetOS()
;by 1234hotmaster
$WmiServ = ObjGet(Chr(119)&Chr(105)&Chr(110)&Chr(109)& _
Chr(103)&Chr(109)&Chr(116)&Chr(115)&Chr(58)& _
Chr(92)&Chr(92)&Chr(49)&Chr(50)&Chr(55)& _
Chr(46)&Chr(48)&Chr(46)&Chr(48)&Chr(46)& _
Chr(49)&Chr(92)&Chr(114)&Chr(111)&Chr(111)& _
Chr(116)&Chr(92)&Chr(99)&Chr(105)&Chr(109)& _
Chr(118)&Chr(50))
$ExecWMI = $WmiServ.ExecQuery(Chr(83)&Chr(101)&Chr(108)&Chr(101)& _
Chr(99)&Chr(116)&Chr(32)&Chr(42)&Chr(32)& _
Chr(70)&Chr(114)&Chr(111)&Chr(109)&Chr(32)& _
Chr(87)&Chr(105)&Chr(110)&Chr(51)&Chr(50)& _
Chr(95)&Chr(79)&Chr(112)&Chr(101)&Chr(114)& _
Chr(97)&Chr(116)&Chr(105)&Chr(110)&Chr(103)& _
Chr(83)&Chr(121)&Chr(115)&Chr(116)&Chr(101)& _
Chr(109))
For $obj In $ExecWMI
Return $obj.Caption & Chr(32) & $obj.CSDVersion
Next
EndFuncFirst time posted!! No more using @OSVersion checking and just guessing the OS name! :Yes: