Corrigindo problemas de acentuação ao utilizar HttpWebRequest

Fala, galera!!

Recentemente publiquei aqui no blog um código mostrando como fazer um HttpRequest utilizando o .net.
Esses dias me deparei com um problema de acentuação.
Sempre que as palavras retornadas no meu httpRequest tivessem acentos o mesmo era substituído por um outro caracter.

A correção para esse problema é bem simples.
Basta especificar o encoding.

Segue a correção:


Dim myRequest As HttpWebRequest = WebRequest.Create("http://www.algumaURL.com.br")
            Dim resp As HttpWebResponse = myRequest.GetResponse()
            Dim ResponseEncoding As Text.Encoding = Text.Encoding.GetEncoding(resp.CharacterSet)

            Dim sr As New StreamReader(resp.GetResponseStream(), ResponseEncoding)
            Retorno = sr.ReadToEnd()
            sr.Close()

O código em negrito é o código que precisei adicionar ao antigo código postado no blog.

Um abraço e até a próxima!!