asp-classic - 従来の ASP では、CDOSYS を使用してスパムの代わりに受信トレイにメールを送信しますか?

Question

これはクラシック ASP の私のコードであり、完全に機能しますが、このコードによって送信されたメールは受信トレイではなくスパムに送られます。受信トレイにメールを送信するにはどうすればよいでしょうか?

Dim iMsg
Dim iConf
Dim Flds
Dim smtpServer
Dim smtpServerPort
Set iMsg = Server.CreateObject("CDO.Message")
Set iConf = Server.CreateObject("CDO.Configuration")
Set Flds = iConf.Fields
set iMsg.Configuration=iConf
With Flds
    smtpServer = "127.0.0.1"
    If Len(smtpServer) > 0 Then
        .Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 1 
        .Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = smtpServer
        smtpServerPort = 25
       .Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = smtpServerPort
        .Item("http://schemas.microsoft.com/cdo/configuration/smtpserverpickupdirectory") = "C:\inetpub\mailroot\Pickup" 
        .Item("urn:schemas:mailheader:X-Priority") = 2 '*** 0=Low,1=Normal,2=High ***'  
        .Item("urn:schemas:mailheader:X-MSMail-Priority") = 2  
        .Item("urn:schemas:httpmail:importance") = "High"  
    End If

    .Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
    .update
End With
    ' Apply the settings to the message.
With iMsg
    Set .Configuration = iConf
    .From = sFrom
    .To = sTo
    .TextBody="This is a message."
    .Subject = sSubject

end with
iMsg.Send
set iMsg = nothing`

私のコードは完全に動作しますが、このメールは受信トレイではなく迷惑メールに分類されます。どうすれば受信トレイにメールを送信できますか?