0

我有一个旧应用程序,它在经典 ASP 中使用 CDONTS 发送邮件。

现在,我想将发送的每封邮件的地址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'的行的预期语句结束。

那么,你能告诉我哪里出错了吗?

4

1 回答 1

0

这条线是问题所在:

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

改成

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

或者

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

我已删除您发布的姓名和电子邮件地址,根据需要替换。

于 2011-09-02T02:22:03.900 回答