Utilizzo questo codice per l'invio di e-mail:
C'è una proprietà per far richiedere al destinatario una richiesta di lettura come outlook? l'unica che ho trovato e che non è supportata è:theSchema="http://schemas.microsoft.com/cdo/configuration/"
Set cdoConfig=server.CreateObject("CDO.Configuration")
cdoConfig.Fields.Item(theSchema & "sendusing")=2
cdoConfig.Fields.Item(theSchema & "smtpserver")="smtp.milettotrasporti.it"
cdoConfig.Fields.Update
set cdoMessage=Server.CreateObject("CDO.Message")
cdoMessage.Configuration=cdoConfig
cdoMessage.From=mittente
cdoMessage.To=arr_email(iloop)
cdoMessage.Subject="ciclo prova email"
cdomessage.HtmlBody="prova invio email a più destinatari da database"
'inserisce allegato
cdomessage.AddAttachment server.mappath("doc1.doc")
cdoMessage.Send
.confirmRead = true

Rispondi quotando


