Script- To select a mail having subject "Facebook"

Dim n
Browser("title:=Gmail.*").Page("title:=Gmail.*").Link("name:=Inbox.*").Click
n= Browser("title:=Gmail.*").Page("title:=Gmail.*").WebTable("class:=th").RowCount
For i=2 to n
If Browser("title:=Gmail.*").Page("title:=Gmail.*").WebTable("class:=th").GetCellData(i,2)="Facebook" then

Browser("title:=Gmail.*").Page("title:=Gmail.*").WebCheckBox("index:="&i-1).Set "ON"
End If

Next
OUTPUT___________________________________________________________