Leggere un file da un sito

[Daisyland]

Visto che non posso scaricare un file da un sito vorrei sapere un'altra cosa.
Posso leggere un file che si trova in un sito ?
Mi spiego: ad esempio un file .txt che ha come contenuto 3 righe con scritto

file
di
testo

voglio semplicemente leggere il contenuto riga per riga.
So farlo per un file che si trova nello stesso programma, ma io voglio che da un programma che gira sul mio server riesca a leggere un file che si trova su un sito.
E' impossibile ?

[byluciani]

no, devi utilizzare xml
guarda questo esempio
http://www.byluciani.com/asp/default...=articoli&ID=8

[Daisyland]

Lo provo appena posso.
Ma l'hai creato tu ?

[byluciani]

no, babbo natale
scherzo

provalo puntando al file txt remoto

[santino83]

Originariamente inviato da byluciani
no, babbo natale
scherzo

provalo puntando al file txt remoto

il grande byluciani...

[Daisyland]

Tiro su questo thread perchè sto utilizzando l'oggetto objXMLHTTP per recuperare i dati di un file come segnalato nel link.
Però ho un grosso problema: i caratteri particolari (esempio, le lettere accentate) vengono letti in maniera corretta dal browser ma poi vengono convertiti in maniera sbagliata.
Non so come rimediare alla cosa.
Che si può fare ?
grazie.

[Daisyland]

up !
nessuno ne sa niente ?
ho provato a decodificare i dati con una funzione ma certi dati (penso siano quelli con un codice Ascii superiore a 127) me li legge sbagliati
grazie

[santino83]

se il problema è a livello di stampa, magari è sbagliato o non settato il charset della pagina html che li visualizza...

[Daisyland]

Originariamente inviato da santino83
se il problema è a livello di stampa, magari è sbagliato o non settato il charset della pagina html che li visualizza...

Ho provato anche quello.
Il charset settato è iso-8859-1.
Ho provato a mettere iso-8859-14 o utf-8, ma non cambiano le cose.

[fulviolo58]

provalo così, io ho risolto...

	Set objXMLHTTP = Server.CreateObject("Microsoft.XMLHTTP") 
		objXMLHTTP.Open "Get", URLOggetto, False
		objXMLHTTP.Send
	
		If objXMLHTTP.status = 200 then
			Set rs = Server.CreateObject("ADODB.Recordset")
				rs.Fields.Append "text", 201, -1 ' text field
				rs.Open
				rs.AddNew
				rs("text").AppendChunk objXMLHTTP.responseBody
				testoHTML = rs("text")
				rs.Delete
				rs.Update
				rs.Close
			Set rs=Nothing	
		Else
			testoHTML = "Errore"
		End If
	
	Set xml = Nothing