Dim contX As String = ""
            Dim RichWeb As System.Net.WebRequest = Net.WebRequest.Create("http://pagina.aspx?pr1=" + var1 + "&pr2=" + var2)
            Dim RespWeb As System.Net.WebResponse = RichWeb.GetResponse
            Dim sr As New System.IO.StreamReader(RespWeb.GetResponseStream, System.Text.Encoding.GetEncoding("UTF-8"))
            contX = sr.ReadToEnd
            Dim nomHTM As String = concat1 & concat2 & "-diagram-" & _
                              concat3 & "-" & concat4 & "-" & cardioXXX & ".htm"
            Try
                If nomHTM <> Session.Item("xxx") Then File.Delete(...)
            Catch
            End Try
            Dim sw As New StreamWriter(Server.MapPath("./.../" & nomHTM))
            sw.Write(contX)
            sw.Flush()
            sw.Close()