Vbscript VBS中的日期格式

我想在我的邮箱里找到一个完整的日期。例如，我把

DateParam=FormatDateTime（Date（）-1,2）

但它又回来了

3/8/2012

我需要函数返回

2012年8月3日

---

有人知道如何解决这个问题吗？

FormatDateTime函数是无用的，因为它取决于用户特定的和全局区域设置

ThisDate = Date()

MyDate = Right("0" & CStr(Month(ThisDate)), 2) & "/" & _
         Right("0" & CStr(Day(ThisDate)), 2) & "/" & CStr(Year(ThisDate))

最好的（最少努力获得最多收益）解决方案——接入.NET——在日期方面存在缺陷；再次是因为对区域设置的依赖

如果您想要/需要使用自己的函数，请从类似fmtDate（）的内容开始

输出：

Yesterday: 08.03.2012 1033
sprintf (silly)  => 03.08.2012
sprintf (clumsy) => 03/08/2012
fmtDate          => 03/08/2012

sprintf (silly me)  => 03/08/2012

再三考虑：

转义“/”有助于使sprintf（）可用：

输出：

Yesterday: 08.03.2012 1033
sprintf (silly)  => 03.08.2012
sprintf (clumsy) => 03/08/2012
fmtDate          => 03/08/2012

sprintf (silly me)  => 03/08/2012

---

因此，不用费心处理fmt*函数，只需使用.NET格式。

有没有列出哪些.NET库暴露于VBScript的资源？这可能是我发现的处理VBScript中日期的最优雅的解决方案。