在 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