The following snippet of code sends a XML request to the following site

```
Sub GetContents()

            Dim XMLReq As New MSXML2.XMLHTTP60

            XMLReq.Open "Get", "https://echa.europa.eu/brief-profile/-/briefprofile/100.028.723", False
            XMLReq.send

End Sub

```

I have another Sub routine `GetURL()` which prints out the desired URL in this case: `https://echa.europa.eu/brief-profile/-/briefprofile/100.028.723`

How can I essentially concatenate the output of GetURL() into the BstrUrl? i.e.

`XMLReq.Open "Get", "x", False` where x is the output of GetURL()

Despite various attempts the syntax is not accepted as a URL.