CDONTS，並從郵件存儲在DB

Question

我有一箇舊的應用程序，使用發送郵件CDONTS在傳統的ASP。

現在，我想存儲在數據庫中發送的每封郵件的to和from地址。

Dim a="' & 'FirstName LastName'<emailaddress>'" 
trixMail.From= a 
Dim b = "anotheremailaddress" 
trixMail.To = b 

a =TrixMail.From 

b= TrixMail.To 
Dim MM_query 
Dim MM_editCmd 
MM_query = "Insert into Logmail(FromEmail,ToEmail) values('"+a+"', '"+b+"')" 

Set MM_editCmd = Server.CreateObject("ADODB.Command") 
MM_editCmd.ActiveConnection = MM_dbConn_STRING 
MM_editCmd.CommandText = MM_query 
MM_editCmd.Execute 
MM_editCmd.ActiveConnection.Close 

所以，這就是我正在做的。不過，我得到一個錯誤說在該行語句

預計年底我聲明變量「a」。

所以，美國可以讓我知道我要去哪裏錯了嗎？

Answer 1

這條線的問題是：

Dim a="' & 'FirstName LastName'<emailaddress>'"

更改爲

Dim a: = """FirstName LastName"" <emailaddress>"

或

Dim a 
a = """FirstName LastName"" <emailaddress>" 

我已刪除您發佈的姓名和電子郵件地址，根據需要更換。