请问javascript和vbscript高手

这里面有你要得东西，我自己编的，你漫漫看吧！
<html>
<head>
<title>Untitled Document</title>
<!-- #include file="../include/lcz.inc" -->
<!-- #include file="../include/mousedown.txt" -->
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<SCRIPT LANGUAGE=javascript>
<!--
function select2_onchange() {
var tmp;
tmp=form1.select2.selectedIndex+1 ;//取当前选择项
if(tmp<9){
if(tmp % 2==1 )
dayd(31);
else
if (tmp !=2)
{if(tmp!=8)
dayd(30);
else
dayd(31);
}
else
{
var d =new Date()
//alert(d.getYear())
if (d.getYear() % 4==0)
dayd(29);
else
dayd(28);
}
}
else
{
if(tmp % 2==1 )
dayd(30);
else
dayd(31);
}
}
function dayd(j){
var i,leng;
leng=form1.select3.length;
for(i=1;i<=leng;i++)  
form1.select3.remove(leng-i);  
for(i=1;i<=j;i++)
{var opt=document.createElement("OPTION");
if (i<10)
{opt.text="0" + i;
opt.value=i;
}
else
{opt.text=i;
opt.value=i;
}
form1.select3.add (opt); 
}
return 0;
}
//-->
</SCRIPT>
</head><body bgcolor="#ffffff" text="#000000" background=../picture/bg.gif>
<center>
<table border=0 width=100%>
<FORM action="left.asp" method=POST id=form1 name=form1 target=leftFrame>
<TR><td align=center>请选择一个准确的日期：<SELECT id=select1 name=selectyear style="HEIGHT: 22px; WIDTH: 75px"><%for i=2000 to year(date)%><OPTION selected><%=i%></OPTION><%next%></SELECT>年
<SELECT id=select2 name=selectmonth style="HEIGHT: 22px; WIDTH: 60px" LANGUAGE=javascript onchange="select2_onchange()"><%for i=1 to 12%><OPTION selected><%if len(i)=1 then%>0<%=i%><%else%><%=i%><%end if%></OPTION><%next%></SELECT>月
<SELECT id=select3 name=selectday style="HEIGHT: 22px; WIDTH: 60px"></SELECT><%session("tmp")="1"%>
<input type=image src="../picture/submit.gif" border=0 name=enter class="img" width="40" height="20" hspace="5">
</td></tr>
</FORM>
</table>
</center>
</body>
</html>

解决方案 »

  1.   

    'set year options
      len(yearIs)=10
        
    此一句可改为
    if en(yearIs)>10 then
       yearIs=left(yearIs,10)
    end if
      

  2.   

    关键在于 len 在VBSCRIPT 里是取字符串变量的长度。
    不像length在javascript里是有很多意义，它是一个可以读和写的属性，对于字符串是取长度，你这里是设置的select的大小。可以试着换个方法：
        var oOption = document.createElement("OPTION");
            oOption.text=currentYear + i+j;
            oOption.value=oOption.text;
            year.add(oOption);我VBSCRIPT不是很熟，不过我想用这个办法应该可以解决你的问题。
    可以查查MSDN，都是上面的例子，我改了一下而已。
      

  3.   

    我记得VB的数组长度好像有个叫setlength的函数用吧。反正这样len(array)肯定不行。