Преобразование MSXML2.XMLHTTP из Classi c ASP в VB.NET

Question

У меня есть проект по преобразованию веб-страницы ASP classi c в страницу VB. NET, и есть эта функция, и мне трудно конвертировать. Пожалуйста, помогите мне, что эквивалентный код для VB. NET

Function GetSHA1(strKey)
Dim returnString, SoapPara, SoapURL

Set SoapRequest = Server.CreateObject("MSXML2.XMLHTTP.3.0") 
Set myXML =Server.CreateObject("MSXML.DOMDocument")

myXML.Async=False

SoapPara = "Key=" & strKey


If SoapPara <> "" Then

    SoapURL = "http://URL" & SoapPara


    SoapRequest.Open "GET",SoapURL , False 
    SoapRequest.Send()
    if Not myXML.load(SoapRequest.responseXML) then 
        GetSHA1 = "" 
    Else  
        Set nodesDecimal=myXML.documentElement.selectNodes("//string") 
        GetSHA1 = nodesDecimal(0).text
    end if

    Set SoapRequest = Nothing 
    Set myXML = Nothing

End If
End Function

 set xmlhttp = CreateObject("MSXML2.ServerXMLHTTP") 
 set xmlhttp = nothing 

ipay_post_url = chr(34) & "url"  & chr(34)