紧急？Calendar，有代码，

[qing_zb]

<%
dim Calendar12
dim dtCalendar
set Calendar12=server.createobject("Calendar")//这里怎样定义？
dtCalendar = DateSerial(Calendar12.Year, Calendar12.Month, Calendar12.Day)


response.write "这是月份："&dtCalendar%>

[tripofdream]

set Calendar12=server.createobject("MSCAL.Calendar.7")

[qing_zb]

多谢tripofdream(梦之旅)　：


/Calenda.asp，行77 即set Calendar12=server.createobject("MSCAL.Calendar.7")

找不到元素

why？？

[tripofdream]

可能是没有Calendar控件,查找一下有没有MSCAL.OCX文件(安装ACCESS2000后会有),如果有则可能是版本不对,你可以到注册表中去查"Calendar",结果位置下的子项ProgID里就是你要的了

[qing_zb]

我是win2000 server，ACCESS2000也安装了的！

再问一下，在JavaScript中怎么也读不出来？？
<script language="JavaScript">
function setCalendar() {

var
dtCalendar;
aa = new ActiveXObject("MSCAL.Calendar.7");
//aa.Month="12";
alert("ok"+aa.Month);

}

</script>

[qing_zb]

我的ProgID是
MSACAL.MSACALCtrl.7
但还是同样的错？？？