probabilmente è una domanda un pò banale
ringrazio le persone che hanno risposto al mio precedente post, ma purtroppo non sono riuscito a risolvere il problema quindi ... ri-posto e allego il codice sperando che vada meglio
il codice allegato, pur funzionando in quanto invia correttamente la pagina ai destinatari, non funziona affatto bene in quanto nella pagina inviata non viene visualizzato quello che dovrebbe ma solo il testo relativo al codice e nessuna immagine. In poche parole vorrei sapere: si può con cdonts mettere in una variabile del codice asp che poi il server invierà come html correttamente? e se si, come si procede? Spero che questa volta qualcuno mi rispondi e mi dia un aiuto concreto, anche se la richiesta apparirà banale (mi scuso x questo). Grazie.
ecco il codice che prende i dati da un form codificato correttamente:
<!--#include virtual="/adovbs.inc"-->
<!-- #INCLUDE FILE="cdonts.inc" -->
id1 = request.form("id1")
sql= "select * from prodotti where id="&id1
Set OBJConn = Server.CreateObject("ADODB.Connection")
Set RS=server.Createobject("ADODB.Recordset")
objConn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=d:\inetpub\webs\nomesitoit\mdb-database\archivio_db.mdb"
rs.open sql, objconn
cognome=request.form("cognome")
nome=request.form("nome")
email=request.form("email")
email2=request.form("email2")
id=rs("id")
codice=rs("codice")
tipo_lavorazione=rs("tipo_lavorazione")
componenti=rs("componenti")
prezzo=rs("prezzo")
foto_media=rs("foto_media")
categoria=rs("categoria")
descrizione=rs("descrizione")
Dim miaMail
Set miaMail = CreateObject("CDONTS.NewMail")
miamail.From = cognome
miamail.To = email
miamail.Bcc = email2
miamail.subject = "il tuo amico" &"' '"&nome&"' '"&cognome&"' '"&"ti invia questa pagina"
miamail.BodyFormat = CdobodyformatHTML
miamail.MailFormat = CdomailformatMime
miamail.contentbase = "http://www.nomesito.it"
miamail.contentlocation = "images/img_medie"
HTML = "<html>"
HTML = HTML & "<head>"
HTML = HTML & "<body>"
HTML = HTML & "<u><div align=""center""></center></div></u><td><u><table border=""0"" width=""108%"" height=""225""><tr>"
HTML = HTML & "<td width=""35%"" height=""219"" valign=""top""><table border=""0"" width=""100%"" height=""252""><TBODY><tr>"
HTML = HTML & " <td width=""100%"" height=""209"" style=""border=""0""; border-width: 0px""> "
HTML = HTML & " <A href=""http://www.nomesito.it/PUBLIC/DETTAGLI.asp?id=id""><p align=""center""><IMG SRC=""&foto_media& ""></A></P></td></tr>"
HTML = HTML & "<tr><td width=""100%"" height=""31"" style=""border-style: solid; border-width: 1px"">"
HTML = HTML & "<table border=""0"" width=""97%""><tr><td width=""49%""><p align=""right""><font color=""#800000""><b>prezzo ?<b>&prezzo&</font></p></td>"
HTML = HTML & " <td width=""51%""><p align=""left""> </p></td></tr></table>"
HTML = HTML & " </td></tr></table></TD><td width=""9%"" height=""219"" valign=""top""><br> </td></TR></TABLE>"
HTML = HTML & " <div align=""center""><center><table border=""0"" width=""102%"" height=""53""><tr><td width=""60%"" height=""47"">"
HTML = HTML & " <table border=""0"" width=""86%"" height=""39""><tr><td width=""41%"" height=""33"">descrizione:</td> &descrizione&"
HTML = HTML & " </tr></table></td></tr></table></center></div>"
HTML = HTML & "<td width=""100%"" height=""33"" align=""center""><p align=""center""> </p>"
HTML = HTML & "</body>"
HTML = HTML & "</html>"
miamail.Body = HTML
miamail.Send
set miamail = nothing
<html>
<body>
<center>
<h4> </h4>
<h4> <span style="font-weight: 400">
<font face="Verdana" style="font-size: 13pt" color="#6600CC">La comunicazione al tuo amico/a-conoscente, è stata
<br>
inoltrata correttamente. <br>
<br>
</center>
</form>
</p>
</body>
</html>
