在 HPE UFT/VBscript 中替换 URL 的一部分
Replacing portion of a URL in HPE UFT / VBscript
所以我试图让一个脚本工作,它将获取打开选项卡的当前 URL,替换 URL 的一部分,然后输入 in/navigate新的 URL 具有替换的文本。
我正在努力使用替换功能以及如何在当前选项卡中启动已编辑的 URL。
这是我认为它应该是什么样子的粗略想法。如果这行得通,它将打开一个带有新 URL 的新浏览器,但我希望它位于我当前所在的选项卡上。
我需要为替换函数的结果创建一个对象吗?
如果我现在在
abc123.UZ.com/xaxsxa
我想去页面
xyz789.UZ.com/xaxsxa
代码:
Browser("Edge").Page("Loan#").WebButton("LoanConditions").Click
Browser("Edge").Page("Loan#).GetROProperty("url")
Result = Browser("Edge").Page("Loan#").GetROProperty("url")
replace (Result,"abc123","xyz789")
Systemutil.Run "Chrome.exe", "Result"
使用浏览器对象的 Navigate 方法。
您只需将最后两行替换为:
Result = replace(Result,"abc123","xyz789")
Browser("Edge").Navigate Result
更新(基于评论中提到的问题):
试试这个代码。这还没有经过我的测试。所以,让我知道它是否适合你。
set odesc = Description.create
odesc("micclass").value = "Browser"
intBefore = Desktop.Childobjects(odesc).count
Browser("Edge").Page("Loan#").WebButton("LoanConditions").Click
Browser("Edge").Page("Loan#").Sync
intAfter = Desktop.Childobjects(odesc).count
if intAfter = intBefore + 1 then
intIndex = intAfter-1
set objBro = Desktop.Childobjects(odesc).item(intIndex)
Result = objBro.getRoProperty("url")
Result = replace(Result,"abc123","xyz789")
objBro.Navigate Result
end if
所以我试图让一个脚本工作,它将获取打开选项卡的当前 URL,替换 URL 的一部分,然后输入 in/navigate新的 URL 具有替换的文本。
我正在努力使用替换功能以及如何在当前选项卡中启动已编辑的 URL。
这是我认为它应该是什么样子的粗略想法。如果这行得通,它将打开一个带有新 URL 的新浏览器,但我希望它位于我当前所在的选项卡上。
我需要为替换函数的结果创建一个对象吗?
如果我现在在
abc123.UZ.com/xaxsxa
我想去页面
xyz789.UZ.com/xaxsxa
代码:
Browser("Edge").Page("Loan#").WebButton("LoanConditions").Click
Browser("Edge").Page("Loan#).GetROProperty("url")
Result = Browser("Edge").Page("Loan#").GetROProperty("url")
replace (Result,"abc123","xyz789")
Systemutil.Run "Chrome.exe", "Result"
使用浏览器对象的 Navigate 方法。
您只需将最后两行替换为:
Result = replace(Result,"abc123","xyz789")
Browser("Edge").Navigate Result
更新(基于评论中提到的问题):
试试这个代码。这还没有经过我的测试。所以,让我知道它是否适合你。
set odesc = Description.create
odesc("micclass").value = "Browser"
intBefore = Desktop.Childobjects(odesc).count
Browser("Edge").Page("Loan#").WebButton("LoanConditions").Click
Browser("Edge").Page("Loan#").Sync
intAfter = Desktop.Childobjects(odesc).count
if intAfter = intBefore + 1 then
intIndex = intAfter-1
set objBro = Desktop.Childobjects(odesc).item(intIndex)
Result = objBro.getRoProperty("url")
Result = replace(Result,"abc123","xyz789")
objBro.Navigate Result
end if