Você está offline; aguardando reconexão

Como fazer uma solicitação GET usando Visual Basic .NET ou Visual Basic 2005

IMPORTANTE: Este artigo foi traduzido por um sistema de tradução automática (também designado por Machine Translation ou MT), não tendo sido portanto traduzido ou revisto por pessoas. A Microsoft possui artigos traduzidos por aplicações (MT) e artigos traduzidos por tradutores profissionais, com o objetivo de oferecer em português a totalidade dos artigos existentes na base de dados de suporte. No entanto, a tradução automática não é sempre perfeita, podendo conter erros de vocabulário, sintaxe ou gramática. A Microsoft não é responsável por incoerências, erros ou prejuízos ocorridos em decorrência da utilização dos artigos MT por parte dos nossos clientes. A Microsoft realiza atualizações freqüentes ao software de tradução automática (MT). Obrigado.

Clique aqui para ver a versão em Inglês deste artigo: 301102
Para obter uma Microsoft Visual translation from VPE for Csharp .NET versão deste artigo, consulte 307023.

NESTA TAREFA

Sumário
O Microsoft .NET Framework inclui muitas classes úteis para redes, incluindo a capacidade de fazer solicitações da Web. Este artigo demonstra como fazer uma solicitação GET simples para recuperar uma página da Web da Internet.

back to the top

Requisitos

A lista a seguir descreve o hardware recomendado, software, infra-estrutura de rede e service packs que será necessário:
  • Microsoft Windows 2000 Professional, Microsoft Windows Server 2003, Windows 2000 Server, Windows 2000 Advanced Server ou Windows NT 4.0 Server
  • Microsoft Visual Studio .NET ou Microsoft Visual Studio 2005
Observação : se você estiver atrás de um servidor proxy, será necessário um endereço da Web interno ou valores de proxy estático (veja as etapas 7 e 8) para testar o código neste artigo.

back to the top

Solicitar uma página da Web

A capacidade de recuperar uma página da Web por meio de programação tem uma ampla variedade de usa. Esta capacidade foi fornecida para programadores de Microsoft Visual Basic 6.0 por meio do controle de transferência de Internet ou por meio direto codificando as interfaces de programação de aplicativo (APIs) WinInet. No. NET, os namespaces System.NET fornecem a classe WebRequest para encapsular uma solicitação para um recurso de Internet e a classe WebResponse para representar os dados que são retornados. Usando esses objetos, você pode obter um fluxo que representa a resposta para uma determinada solicitação. Depois de ter um fluxo, ler a resposta é não diferente de leitura de um arquivo de texto local ou de outra fonte.

Para fazer uma solicitação GET, execute estas etapas:
  1. Abra o Visual Studio .NET ou Visual Studio 2005
  2. Crie um novo aplicativo de console no Microsoft Visual Basic .NET ou no Microsoft Visual Basic 2005. Visual Basic .NET ou Visual Basic 2005 cria um módulo para você, juntamente com um procedimento Main() vazio.
  3. Certifique-se de que pelo menos o namespace System é referenciado pelo projeto.
  4. Use a declaração Imports no sistema , System.NET e namespaces System.IO (para os objetos de fluxo) para que não será necessário para qualificar declarações desses namespaces posteriormente no seu código. Essas instruções devem ser usadas antes para qualquer outra declaração.
    Imports SystemImports System.NetImports System.IO					
  5. Neste exemplo, apenas embutir o localizador de recursos uniforme (URL) em uma variável. Em um sistema real, você provavelmente receberia esse valor como um parâmetro para uma função ou talvez como um argumento de linha de comando para um aplicativo de console.
    Dim sURL As StringsURL = "http://www.microsoft.com"					
  6. Crie um novo objeto WebRequest , que só pode ser feito através do método Create estático da classe WebRequest ("Novo WebRequest" não é válido). Fornecer a URL de destino como parte da chamada para criar para inicializar o objeto com esse valor.
    Dim wrGETURL As WebRequestwrGETURL = WebRequest.Create(sURL)					
  7. Se você estiver atrás de um proxy, você precisará criar um objeto WebProxy e fornecê-lo para o objeto WebRequest se você desejar solicitar URLs fora da sua rede local. O objeto WebProxy tem uma variedade de propriedades (que não estão sendo definidas nesse código de exemplo) que permitem que você especificar as mesmas informações básicas, como pode ser definido através das configurações de proxy do Microsoft Internet Explorer.
    Dim myProxy As New WebProxy("myproxy", 80)myProxy.BypassProxyOnLocal = TruewrGETURL.Proxy = myProxy					
  8. Se você desejar usar apenas configurações de qualquer foram configuradas no Internet Explorer, você pode fazer isso através do método estático de GetDefaultProxy do class. WebProxy
    wrGETURL.Proxy = WebProxy.GetDefaultProxy()					
  9. Agora que sua solicitação é configurada com a URL de destino e as informações de proxy aplicável, você pode usá-lo a obter um objeto de fluxo correspondente à resposta à sua solicitação.
    Dim objStream As StreamobjStream = wrGETURL.GetResponse.GetResponseStream()					
  10. Depois de ter o fluxo de resposta, você possa tratá-lo como qualquer outro fluxo (tal como de abrir um arquivo de texto) e ler através de seu conteúdo linha por linha ou mesmo todas ao mesmo tempo. O loop abaixo lê o fluxo de uma linha por vez até que o método ReadLine retornará Nothing, cada linha para o console de saída.
    Dim objReader As New StreamReader(objStream)Dim sLine As String = ""Dim i As Integer = 0Do While Not sLine Is Nothing    i += 1    sLine = objReader.ReadLine    If Not sLine Is Nothing Then        Console.WriteLine("{0}:{1}", i, sLine)    End IfLoopConsole.ReadLine()					
  11. Salve e em seguida, execute o programa, certificando-se de que você tenha configurado as informações de proxy (etapas 7 e 8) corretamente para o seu ambiente. Você deve ver linhas de conteúdo HTML numeradas e de saída para o console.
back to the top

Concluir a listagem de código

Imports SystemImports System.NetImports System.IOModule Module1    Sub Main()        Dim sURL As String        sURL = "http://www.microsoft.com"        Dim wrGETURL As WebRequest        wrGETURL = WebRequest.Create(sURL)        Dim myProxy As New WebProxy("myproxy", 80)        myProxy.BypassProxyOnLocal = True        'wrGETURL.Proxy = myProxy        wrGETURL.Proxy = WebProxy.GetDefaultProxy()        Dim objStream As Stream        objStream = wrGETURL.GetResponse.GetResponseStream()        Dim objReader As New StreamReader(objStream)        Dim sLine As String = ""        Dim i As Integer = 0        Do While Not sLine Is Nothing            i += 1            sLine = objReader.ReadLine            If Not sLine Is Nothing Then                Console.WriteLine("{0}:{1}", i, sLine)            End If        Loop        Console.ReadLine()    End SubEnd Module				
back to the top

Aviso: este artigo foi traduzido automaticamente

Propriedades

ID do Artigo: 301102 - Última Revisão: 12/06/2006 23:18:59 - Revisão: 3.3

Microsoft Visual Basic 2005, Microsoft Visual Basic .NET 2003 Standard Edition, Microsoft Visual Basic .NET 2002 Standard Edition

  • kbmt kbvs2005swept kbvs2005applies kbhowtomaster KB301102 KbMtpt
Comentários
d"; document.getElementsByTagName("head")[0].appendChild(m);