If..Then..Else..with checkpoint

[yuetling926]

Dear All,

I tried to write a if..then..else statement using the checkpoint value. However, it is obvious that I made mistakes.
Please help.

Code:

SiebApplication("Siebel Energy (CMS DR)").SiebScreen("Appointment Booking").SiebView("TG Appointment Booking").SiebApplet("Appointment Schedule").SiebButton("Query").Click
SiebApplication("Siebel Energy (CMS DR)").SiebScreen("Appointment Booking").SiebView("TG Appointment Booking").SiebApplet("Appointment Schedule").SiebButton("Go").Click
SiebApplication("Siebel Energy (CMS DR)").SiebScreen("Appointment Booking").SiebView("TG Appointment Booking").SiebApplet("Appointment Schedule_2").SiebText("Owner Position").Output CheckPoint("Owner Position")

Code:

If CheckPoint("Owner Position")<>"READONLY" Then
msgbox "error"
else
SiebApplication("Siebel Energy (CMS DR)").SiebMenu("Menu").Select "File\\File - Logout"
end if