inclusione url

[roby80]

Salve ragazzi, sapete mica se è possibile includere un file presente su internet?...Del tipo




perchè così dà errore...


GRAZIE

[kalosjo]

Non è possibile, perchè il file da includere deve essere visibile dal file system....

[roby80]

azz.....

ma non è possibile includere una pagina presente su un server (nella stessa LAN) differente da quello in cui stiamo lavorando???

[kalosjo]

prova con xmlhttp.

[roby80]

what's????

[roby80]

ciao...

ascolta ho provato questo



set richiesta = Server.CreateObject("Msxml2.XMLHTTP.4.0")

' Apro l'oggetto ed invio la richiesta
call richiesta.Open("GET", "http://www.sito.it/a.xml", false)
richiesta.Send()

' Stampo a video il contenuto del file Xml remoto
Response.Write(richiesta.responseXML.xml)



funziona...solo che mi dà 2 problemi:

1)il testo me lo visualizza in maniere ESTREMAMENTE PICCOLA, quasi illegibile

2) A.xml è un file di prova , ma io dovrei stampare il contenuto di un file ASP

Grazie per l'attenzione...ciao!

[kalosjo]

Perfetto, è lo stesso, non fa altro che richiamare la pagina che indichi nell'url e scriverla così come è...

[roby80]

magari....non mi fà vedere assolutamente nulla

[Baol74]

La prossima volta, fai una ricerca....

Attento che la funzione non gestisce gli errori in caso di url non raggiungibili...

Function GetUrl(Url)
Dim Http
	Set Http = Server.CreateObject("MSXML2.ServerXMLHTTP.4.0")
	Http.open "GET",Url,False
	Http.Send()
	GetUrl = Http.ResponseText
	Set Http=Nothing
End Function

Response.Write GetUrl("http://www.sito.it/pagina.asp")

[roby80]

grazie...avevo già provato un codice simile ma mi dava un errore del tipo: Invalid ID Program ecc. ecc.

HO trovato però un'altro script che mi gira :

<%
dim myURL
myURL = "http://www.sito.it/pagina.asp"

Set Paginetta = Server.CreateObject("WinHTTP.WinHttpRequest.5.1")

Paginetta.Open "GET", myURL, false
Paginetta.Send ""
myPage = Paginetta.ResponseText
Response.Write myPage
Set Paginetta = Nothing
%>

GRAZIE A TUTTI.... CIAO