Hi all,
We have a window based application where there are 3 radio buttons which i have to test but its not working
please help
Global $ia = 2
If ($ia == 0) Then
Local $strLess = ControlCommand($winBlob,"",1259,"IsChecked", "")
if ($strLess == 0) Then
Local $strCheck = ControlCommand($winBlob,"",1259,"Check","")
if ($strcheck == 1) Then
FileWriteLine($file,"Check Pass")
Local $setText = ControlSetText($winBlob,"",1170,$strConst)
if ($setText == 0) Then
FileWriteLine($file,"Error: Fail")
Else
FileWriteLine($file,"Set Value Success")
EndIf
Else
FileWriteLine($file,"1 Check button Fail")
EndIf
sleep($iSleepTime)
Else
FileWriteLine($file,"")
EndIf
ElseIf($ia == 1) Then
Local $strBetween = ControlCommand($winBlob,"",1260,"IsChecked", "")
if ($strBetween == 0) Then
Local $strCheck = ControlCommand($winBlob,"",1260,"Check","")
if ($strCheck ==1) Then
FileWriteLine($file,"2 Check Button Pass")
Else
FileWriteLine($file,"Error:2Check Button Fail")
EndIf
sleep($iSleepTime)
Else
FileWriteLine($file,"Between")
EndIf
ElseIf($ia == 2) Then
Local $strGreater = ControlCommand($winBlob,"",1261,"IsChecked", "")
if ($strGreater == 0) Then
Local $strCheck = ControlCommand($winBlob,"",1261,"Check","")
if ($strCheck ==1) Then
FileWriteLine($file," Check Button Pass")
Local $setText = ControlSetText($winBlob,"",1171,$strConst1)
if ($setText == 0) Then
FileWriteLine($file,"Error: Fail")
Else
FileWriteLine($file,"Success")
EndIf
Else
FileWriteLine($file,"Error 3 Check Button Fail")
EndIf
Else
FileWriteLine($file," ")
EndIf
EndIf
We have a window based application where there are 3 radio buttons which i have to test but its not working
please help
Global $ia = 2
If ($ia == 0) Then
Local $strLess = ControlCommand($winBlob,"",1259,"IsChecked", "")
if ($strLess == 0) Then
Local $strCheck = ControlCommand($winBlob,"",1259,"Check","")
if ($strcheck == 1) Then
FileWriteLine($file,"Check Pass")
Local $setText = ControlSetText($winBlob,"",1170,$strConst)
if ($setText == 0) Then
FileWriteLine($file,"Error: Fail")
Else
FileWriteLine($file,"Set Value Success")
EndIf
Else
FileWriteLine($file,"1 Check button Fail")
EndIf
sleep($iSleepTime)
Else
FileWriteLine($file,"")
EndIf
ElseIf($ia == 1) Then
Local $strBetween = ControlCommand($winBlob,"",1260,"IsChecked", "")
if ($strBetween == 0) Then
Local $strCheck = ControlCommand($winBlob,"",1260,"Check","")
if ($strCheck ==1) Then
FileWriteLine($file,"2 Check Button Pass")
Else
FileWriteLine($file,"Error:2Check Button Fail")
EndIf
sleep($iSleepTime)
Else
FileWriteLine($file,"Between")
EndIf
ElseIf($ia == 2) Then
Local $strGreater = ControlCommand($winBlob,"",1261,"IsChecked", "")
if ($strGreater == 0) Then
Local $strCheck = ControlCommand($winBlob,"",1261,"Check","")
if ($strCheck ==1) Then
FileWriteLine($file," Check Button Pass")
Local $setText = ControlSetText($winBlob,"",1171,$strConst1)
if ($setText == 0) Then
FileWriteLine($file,"Error: Fail")
Else
FileWriteLine($file,"Success")
EndIf
Else
FileWriteLine($file,"Error 3 Check Button Fail")
EndIf
Else
FileWriteLine($file," ")
EndIf
EndIf