[Vinixops]

Olá pessoal... Bom dia!

Preciso muito resolver este problema e conto com vocês!

Segue o código e o problema!

<%

caminho = "http://grupoalphabrasil.com.br/tempo/txt/Brasilia-DF.txt"

Set FSO = Server.CreateObject("Scripting.FileSystemObject")
Set TXT = FSO.OpenTextFile(caminho)

response.write txt.readALL

txt.close

%>

Bom agora vamos ao problema!

Eu preciso abrir este texto que está em um outro servidor.
Não precisa ser necessariamente com FSO, eu preciso apenas colocar o valor deste arquivo txt em uma variável asp para trata-la dentro do site!
Estou a dias procurando uma solução e o mais próximo que consegui encontrar foi um leitor de RSS que lê apenas arquivos XML.

Desde já obrigadão!

[xanburzum]

vc pode usar ASPHTTP ou xmlhttp

[Vinixops]

RESOLVIDO

Segue o código a quem necessitar!

CÓDIGO

<%
  Response.Buffer = True
  Dim xml

  '-- Cria o Objeto de leitura
  Set xml = Server.CreateObject("Microsoft.XMLHTTP")
  
  '-- Use o valor abaixo nas versões 3.0 do XMLHTTP:
  '-- Set xml = Server.CreateObject("MSXML2.ServerXMLHTTP")

  ' Abre a URL indicada no metodo GET
  xml.Open "GET", "http://grupoalphabrasil.com.br/tempo/txt/Brasilia-DF.txt", False
    
  '-- faz o Envio das Informações Requisitadas para o Servidor
  xml.Send

  '-- Pega o Conteudo do TXT e coloca na Variável
  ConteudoTXT = xml.responseText

  '-- Imprime na Tela
  Response.Write ConteudoTXT

  '-- Limpa o 'cache' da Operação
  Set xml = Nothing
%>

This post has been edited by xanburzum: 30 January 2010 - 03:05 PM
Reason for edit: Adicionado BBCode

[xanburzum]

Parabéns