如何创建具有"To"属性的ASP类(如CDONTS.NewMail)？

Question

CDONTS.NewMail类让我发送这样的电子邮件:

Set MailObj = Server.CreateObject("CDONTS.NewMail")
MailObj.To = someone@example.com
' set other properties of MailObj
MailObj.Send

我可以在ASP中创建自己的类,但它不会让我定义名为"To"的属性.

有没有办法在我定义的类中创建一个名为"To"的属性的类？

class MyMail
  Public To          ' this doesn't work!
  Public From        ' this works great!
end class

Answer 1

应该可以用[]标记标识符.如:

Option Explicit

Class cC
  Public [To]
End Class

Dim oC : Set oC = New cC
oC.To = 4711
Dim i
For i = 0 To 1
    WScript.Echo oC.To
Next

输出:

cscript 36585334.vbs
4711
4711

(在此处和此处查看另一种基本方言中的'转义名称'/ [].)