如何创建 ASP class 和 "To" 属性（如 CDONTS.NewMail）？

Question

CDONTS.NewMail class 让我这样发送电子邮件：

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

我可以在 ASP 中创建自己的 class，但它不允许我定义名为 "To" 的属性。

有什么方法可以在我定义的 class 中创建一个 class 和一个名为 "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

（另一种基本方言中的 'escaped names'/[] 参见 here and here。）

How can I create ASP class with "To" property (like CDONTS.NewMail)?