预期语句结束 vb UFT
Exspected End of Statement vb UFT
我不是自动化新手,但我是 vb 脚本和 HP UFT 新手。我在 UFT 中不断收到错误提示(预期语句结束)和(预期标识符)。我的代码如下。你能帮帮我吗?
Dim browserHome
Dim pageHome
Dim txtAnnualSalary
Dim txtCon401k
Set browserHome = Description.Create
browserHome("micclass").value = "Browser"
browserHome("name").value = "401K Calculator | How" //issue here
Set pageHome =Description.Create //issue here
pageHome("micclass").value = "Page" //issue here
pageHome("title").value = "401K Calculator | How" //issue here
Set txtAnnualSalary = Description.Create //issue here
txtAnnualSalary("micclass").value = "WebEdit" //issue here
txtAnnualSalary("name").value = "AnnualSalary"
Set txtCon401k = Description.Create
txtCon401k("micclass").value = "WebEdit"
txtCon401k("name").value = "Con401k"
Dim txtCon401k
Set txtCon401k = Description.Create
txtEmpMatch("micclass").value = "WebEdit"
txtEmpMatch("name").value = "EmpMatch"
SystemUtil.Run "iexplore.exe","http://www.401kcalculator.org/"
Browser(browserHome).Page(pageHome).WebEdit(txtAnnualSalary).Set "10000"
Browser(browserHome).Page(pageHome).WebEdit(txtCon401k).Set "30"
Browser(browserHome).Page(pageHome).WebEdit(txtEmpMatch).Set "30"
代码似乎 ok.But 请检查浏览器是否有一个 属性 调用 "name" 使用对象 Spy.If 不是你不能使用那个。
如果是那么:
另外,您能否尝试在以下行中放一个退格键。
而不是:
browserHome("name").value = "401K Calculator | How"
尝试:
browserHome("name").value = "401K Calculator \| How"
我不是自动化新手,但我是 vb 脚本和 HP UFT 新手。我在 UFT 中不断收到错误提示(预期语句结束)和(预期标识符)。我的代码如下。你能帮帮我吗?
Dim browserHome
Dim pageHome
Dim txtAnnualSalary
Dim txtCon401k
Set browserHome = Description.Create
browserHome("micclass").value = "Browser"
browserHome("name").value = "401K Calculator | How" //issue here
Set pageHome =Description.Create //issue here
pageHome("micclass").value = "Page" //issue here
pageHome("title").value = "401K Calculator | How" //issue here
Set txtAnnualSalary = Description.Create //issue here
txtAnnualSalary("micclass").value = "WebEdit" //issue here
txtAnnualSalary("name").value = "AnnualSalary"
Set txtCon401k = Description.Create
txtCon401k("micclass").value = "WebEdit"
txtCon401k("name").value = "Con401k"
Dim txtCon401k
Set txtCon401k = Description.Create
txtEmpMatch("micclass").value = "WebEdit"
txtEmpMatch("name").value = "EmpMatch"
SystemUtil.Run "iexplore.exe","http://www.401kcalculator.org/"
Browser(browserHome).Page(pageHome).WebEdit(txtAnnualSalary).Set "10000"
Browser(browserHome).Page(pageHome).WebEdit(txtCon401k).Set "30"
Browser(browserHome).Page(pageHome).WebEdit(txtEmpMatch).Set "30"
代码似乎 ok.But 请检查浏览器是否有一个 属性 调用 "name" 使用对象 Spy.If 不是你不能使用那个。
如果是那么:
另外,您能否尝试在以下行中放一个退格键。
而不是:
browserHome("name").value = "401K Calculator | How"
尝试:
browserHome("name").value = "401K Calculator \| How"