网页条件语句判断。。

L.E.O

现在以hao123网页为例来说说我的需求
比如现在打开hao123主页，输入邮箱账号：abc选择@126.com登陆。。这是一正常录制登陆。。。
我现在就拿网页上的一个值来做判断，比如“百度”关键字
我现在想加入一条if语句。。。如果检查到网页中包含"百度"两个字，那么我就选择@21cn.com邮箱登陆！
如果不加if语句就选择@126.com登陆
请问这个该怎么写、我写了一条但不成功、麻烦大家指点一下。谢谢！

———————我的代码———————————————————     
Browser("hao123－－我的上网主页").Page("hao123－－我的上网主页").WebEdit("hao_mail_username").Set "abc"
Browser("hao123－－我的上网主页").Page("hao123－－我的上网主页").WebElement("空 间").Check CheckPoint("空 间")
If innertext="百 度" Then
    Browser("hao123－－我的上网主页").Page("hao123－－我的上网主页").WebList("select").Select "@21cn.com"
End If
'Browser("hao123－－我的上网主页").Page("hao123－－我的上网主页").WebList("select").Select "@126.com 网易"
Browser("hao123－－我的上网主页").Page("hao123－－我的上网主页").WebEdit("hao_mail_passwd").SetSecure "4bd706ee346e0c349059e3b9"
Browser("hao123－－我的上网主页").Page("hao123－－我的上网主页").WebButton("登录").Click
Browser("hao123－－我的上网主页").Page("hao123－－我的上网主页").WebEdit("hao_mail_passwd").SetSecure "4bd706efb8b6"
Browser("网易通行证 > 用户验证").Page("网易通行证 > 用户验证").Sync
Browser("网易通行证 > 用户验证").CloseAllTabs

泥泥虫

set innername = cstr(Browser("hao123－－我的上网主页").Page("hao123－－我的上网主页").webelement("百度").getROproperty("innerText"))
if StrComp(("百度",innername ,1) = 0
    Browser("hao123－－我的上网主页").Page("hao123－－我的上网主页").WebList("select").Select "@21cn.com"
else
    Browser("hao123－－我的上网主页").Page("hao123－－我的上网主页").WebList("select").Select "@21cn.com"
end if