100急分求三级连动菜单，大哥们救命啊~~

这个是二级的！<%
if application("SelectSchool")="" then
dim oRs
dim sQuery
set oRs=server.CreateObject("adodb.recordset")
i=0
sRow = "<script language=""JavaScript"">"&vbcrlf
sRow = sRow & "var aSchool = new Array();"&vbcrlf
sRow = sRow & "var iSchoolCount;"&vbcrlf
sQuery = "select * from school"
oRs.open sQuery,conn,1,1
i=0

while not oRs.eof
sRow = sRow & "aSchool["&i&"] = new Array("""&oRs("school_name")&""","""&oRs("section_id")&""","""&oRs("school_id")&""");" &vbcrlf
i = i + 1
oRs.movenext
wend
oRs.close
sRow = sRow & "iSchoolCount="&i&";"&vbcrlf
set oRs = nothing

sRow = sRow & "function GetSchoolList(locationid)"&vbcrlf
sRow = sRow & "{"&vbcrlf
sRow = sRow & "document.RecordPaper.school.length = 1; "&vbcrlf
sRow = sRow & "var i;"&vbcrlf
sRow = sRow & "for (i=0; i < iSchoolCount; i++)"&vbcrlf
sRow = sRow & "{"&vbcrlf
sRow = sRow & "if (aSchool[i][1] == locationid)"&vbcrlf
sRow = sRow & "{ "&vbcrlf
sRow = sRow & "document.RecordPaper.school.options[document.RecordPaper.school.length] = new Option(aSchool[i][0], aSchool[i][2]);"&vbcrlf
sRow = sRow & "}"&vbcrlf        
sRow = sRow & "}"&vbcrlf      
sRow = sRow & "}</script>"&vbcrlf
application.Lock()
application("SelectSchool")=sRow
application.UnLock()
end if
response.write application("SelectSchool")
%>
  <script language="JavaScript">
   function check(){
if(document.RecordPaper.school.value ==""){
window.document.all.IfSelectSchool.innerHTML="请选择学校！";
return false;
}
   if(document.RecordPaper.Paper.value ==""){
window.document.all.disKemu.innerHTML="请输入试卷名！";
document.RecordPaper.Paper.focus();
return false;
}
}
  </script>
<p>&nbsp;</p><p>&nbsp;</p>
<table width="600" border="0" align="center" cellpadding="3" cellspacing="0" bgcolor="#81BCC9">
  <form action="IfHavePaper.asp" method="post" name="RecordPaper">
    <tr> 
      <td width="116" align="right"> 学校 ：</td>
      <td> <select name="section" size="1" onChange="GetSchoolList(this.options[this.selectedIndex].value)" style="border-style: solid; border-width: 1">
          <option value="" selected>大学所在的地区</option>
          <option value="19">安徽高校</option>
          <option value="38">北京地区科研所</option>
          <option value="36">北京高校</option>
          <option value="10">福建高校</option>
          <option value="24">甘肃高校</option>
          <option value="11">广东高校</option>
          <option value="34">广西高校</option>
          <option value="35">贵州高校</option>
          <option value="30">海南高校</option>
          <option value="23">河北高校</option>
          <option value="37">河南高校</option>
          <option value="14">黑龙江高校</option>
          <option value="12">湖北高校</option>
          <option value="13">湖南高校</option>
          <option value="15">吉林高校</option>
          <option value="5">江苏高校</option>
          <option value="29">江西高校</option>
          <option value="16">辽宁高校</option>
          <option value="26">内蒙古高校</option>
          <option value="25">宁夏高校</option>
          <option value="8">其他科研单位</option>
          <option value="28">青海高校</option>
          <option value="18">山东高校</option>
          <option value="27">山西高校</option>
          <option value="22">陕西高校</option>
          <option value="4">上海高校</option>
          <option value="7">社科院研究单位</option>
          <option value=ā"20">四川高校</option>
          <option value="17">天津高校</option>
          <option value="32">西藏高校</option>
          <option value="33">新疆高校</option>
          <option value="31">云南高校</option>
          <option value="9">浙江高校</option>
          <option value="6">中科院研究单位</option>
          <option value="21">重庆高校</option>
        </select> <select name="school" style="border-style: solid; border-width: 1" onchange="document.RecordPaper.schoolname.value=this.options[this.selectedIndex].text">
          <option selected value="">选择学校</option>
        </select>
        <input name="schoolname" type="hidden" value=""> 
        <table width="100%" border="0" cellspacing="0" cellpadding="0">
          <tr> 
            <td id="IfSelectSchool" style="color: #ff0000">&nbsp;</td>
          </tr>
        </table> </td>
    </tr>
    <tr> 
      <td height="28" align="right">输入科目：</td>
      <td> 
        <table width="100%" border="0" cellspacing="0" cellpadding="0">
          <tr>
            <td width="35%"><input type="text" name="Paper" title="注意：请输入试卷名!" value=""></td>
            <td width="65%" id="disKemu" style="color: #ff0000">&nbsp;</td>
          </tr>
        </table> </td>
    </tr>
    <tr align="center"> 
      <td colspan="2"><input type="submit" name="Submit" value="转到科目选择页面" onClick="return check();"></td>
    </tr>
  </form>
</table>
</body>
</html>要是不行，把你的email留下，给你发个完整的