none
Acentuação RRS feed

  • Pergunta

  • Olá,

    Estou com um pequeno problema com acentuação, estou passando parâmetro através da url e outro servidor me retornará um PDF, por isso meu código esta um pouco diferente.

    A questão é aonde tratar este retorno?

    Dim SourceStream As System.IO.Stream
    Dim Response As HttpWebResponse
      
    Dim url As String = "nome=Fábio"
            
    Dim Req As HttpWebRequest = HttpWebRequest.Create("http://minhaurl.jsp?" & url)
            
    Response = Req.GetResponse()
            
    SourceStream = Response.GetResponseStream
                    
    Dim Buffer(4096) As Byte, BlockSize As Integer
              
    Dim TempStream As New MemoryStream
            
    Do
       BlockSize = SourceStream.Read(Buffer, 0, 4096)
         If BlockSize > 0 Then TempStream.Write(Buffer, 0, BlockSize)
    
    Loop While BlockSize > 0
      
    Dim saveTo As String ="minhamáquina\teste3.pdf"
                            
    Dim by As Byte() = TempStream.ToArray
                                            
    System.IO.File.WriteAllBytes(saveTo, by)
    

    Desde já agradeço

    sexta-feira, 17 de abril de 2015 19:14

Todas as Respostas