temp=Browser("Browser").Page("Page").WebElement("innertext:=.*[退出登录]").GetROProperty("innertext")
If insrt(temp,UserUid)<>0 Then 'UserUid 是我开始在Global里面输入的用户名,现在我检查他和temp是不是包含了
MsgBox "发贴时用户名与登录名一致"
End If
For i=0 to 200
temp=Browser("Browser").Page("Page").WebTable("name:=查看积分策略说明","index:="&i).GetROProperty("innertext:")
s=instr(temp,UserUid)
If s<>0 Then
MsgBox temp&i
End If
Next