;AutoIt_Debugger_Command:Disable_Debug
#include <AutoItConstants.au3>
If _OSVersion() = 'Win7' Or _OSVersion() = 'Win_7SP1' Or _OSVersion() = 'Win7X64' Or _OSVersion() = 'Win7SP1x64' Then
	$ProgramFiles = "C:\Programs\"
Else
	$ProgramFiles = "C:\Program Files\"
EndIf
;If Not (FileExists($ProgramFiles & "Client Access")) Then
;	$ProgramFiles = "C:\Program Files\IBM\"
;EndIf
;If Not (FileExists($ProgramFiles & "Client Access")) Then
;	$sMessage = "Client Access NOT Found."
;	SplashTextOn("Title", $sMessage, -1, 100, -1, -1, $DLG_TEXTLEFT, "", 34)
;	Sleep(3000)
;	SplashOff()
;EndIf

; MsgBox("", "Test", "_OSVersion = " & _OSVersion())

Func _OSVersion()
	Global $OS_Version, $servicepack_version
	Local $sWinVer = FileGetVersion('winver.exe')
	$OS_Version = @OSVersion

	$servicepack_version = StringReplace(@OSServicePack, "Service Pack ", "SP")
	If @error = -1 Then $servicepack_version = ""
	ConsoleWrite($OS_Version & $servicepack_version & StringRegExpReplace(@OSArch, '(X86)', '') & @CRLF)
	ConsoleWrite(@OSArch & @CRLF)
	Return $OS_Version & $servicepack_version & StringRegExpReplace(@OSArch, '(X86)', '')
	;AutoIt_Debugger_Command:Enable_Debug
EndFunc   ;==>_OSVersion