Devo trasformare un vecchio codice con CDONTS in questo; io ho riscritto il tutto per CDOSYS ma dato che per alcuni giorni non posso testare in locale, voelvo chiedervi se per voi poteva essere tutto giusto. La parte del mail attach.url vi sembra corretta?
Graziecodice:Dim mail Set mail = Server.CreateObject("CDO.Message") mail.From = "simone@dominio.com" mail.To = destinatario mail.AttachURL Server.MapPath("http://www.dominio.com/cartella/nomefile.gif"), "nomefile.gif" mail.Subject = "Proposta: " & nome sBodyTemp = "<!DOCTYPE HTML PUBLIC ""-//IETF//DTD HTML//IT"">" & NL sBodyTemp=sBodyTemp & "<HEAD>" sBodyTemp=sBodyTemp & "<meta http-equiv=""Content-Type""" sBodyTemp=sBodyTemp & "content=""text/html; charset=iso-8859-1"">" sBodyTemp=sBodyTemp & "<title>Proposta di locale per MilanoPleasure</title>" sBodyTemp=sBodyTemp & "</HEAD>" sBodyTemp=sBodyTemp & "<BODY><TABLE BGCOLOR=""006699""><TR><TD>[img][/img]<TD></TR>" sBodyTemp=sBodyTemp & "<TR><TD><align=""center""><FONT FACE=""Verdana"" COLOR=#FFFFFF>PROPOSTA DI LOCALE</font></TD></TR>" .... .... sBodyTemp=sBodyTemp & "</TABLE></BODY></HTML>" mail.Body = sBodyTemp mail.MailFormat = 0 mail.BodyFormat = 0 mail.Send() Set mail = Nothing
Rispondi quotando
