使用經典ASP發送電子郵件

Question

我很喜歡通過asp頁面發送電子郵件。 我在互聯網上照顧它，發現了一些東西。

<%
    sch = "http://schemas.microsoft.com/cdo/configuration/" 

    Set cdoConfig = CreateObject("CDO.Configuration") 

    With cdoConfig.Fields 
        .Item(sch & "sendusing") = 2 ' cdoSendUsingPort 
        .Item(sch & "smtpserver") = "smtp.gmail.com" 
        .update 
    End With 

    Set cdoMessage = CreateObject("CDO.Message") 

    With cdoMessage 
        Set .Configuration = cdoConfig 
        .From = Request.Form("From")
        .To = Request.Form("To") 
        .Subject = Request.Form("Subject")
        .TextBody = Request.Form("Body") 
        .Send 
    End With 

       Set cdoMessage = Nothing 
       Set cdoConfig = Nothing 
   %>

但是它沒有向我發送電子郵件，卻說“流量無法連接到服務器”，我應該在代碼中更改什么？

非常感謝你。

Answer 1

我認為您必須為smtp服務器設置用戶名和密碼，並將“ smtpauthenticate”屬性設置為true：

.item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
.item("http://schemas.microsoft.com/cdo/configuration/sendusername") = usrName
.item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = pwd