如何创建具有“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

（请参阅here和here了解另一种基本方言中的'转义名称'/ []。）