Avendo il codice riportato di seguito è possibile ampliarlo in modo da ricevere una conferma di lettura?

codice:
	Set eMail = Server.CreateObject("CDO.Message")
	Set iConf = CreateObject("CDO.Configuration")
	Set Flds = iConf.Fields

	Flds(cdoSendUsingMethod) = cdoSendUsingPort
	Flds(cdoSMTPServer) = "mio smtp" 
	Flds(cdoSMTPServerPort) = 25
	Flds(cdoSMTPAuthenticate) = cdoAnonymous
	Flds.Update
	
	Set eMail.Configuration = iConf
	
	eMail.From = varMittente
	eMail.To = "mail mittente"
	eMail.Subject = "oggetto"
	eMail.HtmlBody = "testo mail"
	eMail.Send()
	Set eMail = Nothing
Grazie