oggetto xmlhttp con asp

[semolino]

Devo spedire una pagina che contiene codice asp via mail con cdosys e farla visualizzare con corpo della mail..

Ho letto che bisogna usare l'oggetto xmlhttp. Io ho scritto questo codice:

Dim iMsg
Dim iConf
Dim Flds

set iMsg = CreateObject("CDO.Message")
set iConf = CreateObject("CDO.Configuration")
Set Flds = iConf.Fields
Flds("http://schemas.microsoft.com/cdo/configuration/urlgetlatestversion") = True
Flds.Update

With iMsg

Set .Configuration = iConf


Dim objXMLHTTP 
Set objXMLHTTP = Server.CreateObject("Microsoft.XMLHTTP")
 objXMLHTTP.Open "GET", "http://pagina da spedire.asp", false
 
 .To = Request.Form("email")
 .From = "info@dominio.com"
 .Subject = "Invio locali della settimana di MP"
 
 objXMLHTTP.SetRequestHeader "Content-type", "text/html" 
 objXMLHTTP.Send 
objCDOMail.Body = objXMLHTTP.ResponseText
End with

E' scritto nel modo corretto per voi? ora non riesco a testarlo perchè ho il server in off e non so perchè visto che pago un servizio... va beh Grazie

[Roby_72]

Ad occhio sembrerebbe di si ma non fidarti... quando puoi testalo.

Roby

[semolino]

Infatti non era giusto ma ora ho risolto grazie