Используя классический ASP, возможно ли установить конверт SMTP с адреса с помощью CDO? - PullRequest
3 голосов
/ 21 февраля 2011

Я отправляю почту, используя классический ASP с объектами CDOSYS, но мне бы хотелось, чтобы конверт с адреса, то есть тот, который указан в MAIL FROM во время SMTP, был по-разному установлен на адрес заголовка From в сообщении.

Цель этого - реализовать VERP .Например, я ожидал бы, что диалог SMTP будет выглядеть примерно так:

220 mail.example.com ESMTP
[...]
MAIL FROM: <info+test=example.com@mydomain.test>
250 2.0.0 OK
RCPT TO: <test@example.com>
250 2.0.0 OK
DATA
354 Start mail input; end with <CRLF>.<CRLF>
From: Company1 <info@mydomain.test>
To: test@example.com
[...]

. В приведенном выше примере конверт от "info+test=example.com@mydomain.test", но заголовок From"info@mydomain.test".

Надеюсь, это имеет смысл.Есть идеи?

1 Ответ

0 голосов
/ 21 февраля 2011

хорошо, я понял это, проволочился и вижу команды так, как вы хотите ...

Извините за ужасный ответ, который я дал вам раньше. Это сделает это ... это "ОТПРАВИТЕЛЬ", который вы хотите получить по почте: конверт

Const cdoSendUsingPort = 2
StrSmartHost = "localhost"

set iMsg = CreateObject("CDO.Message")
set iConf = CreateObject("CDO.Configuration")

With iConf.Fields 
.item("http://schemas.microsoft.com/cdo/configuration/sendusing") = cdoSendUsingPort 
.item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = strSmartHost 
.Update 
End With 




With iMsg
Set .Configuration = iConf
.To = "test@example.com"
.Sender = "info+test=example.com@mydomain.test"
.From="Company1 <info@mydomain.test>"
.Subject = "This is a test CDOSYS message (Sent via Port 25)..."
.HTMLBody = strHTML
.Send
End With
...