************************ (1) เปิดชุดบันทึกสร้างอาร์เรย์และกำหนดค่าของบันทึกที่ตั้งค่าให้กับอาร์เรย์
-
ลดน้อยลง
setRs = server.createObject ("adodb.recordset"))
SQL = "SELECT*FRONBOOKBOARDYBYCLASSIDDESC"
Rs.opensql, CN, 1,1%>
<scriptLanguage = "JavaScript">
Varonecount;
onecount = 0;
subcat = newarray ();
<%count = 0
dowhilenotrs.eof%>
subcat [<%= count%>] = newArray ("<%= trim (rs (" boardname "))%>", "," <%= trim (rs ("classid"))%> ");
<%count = นับ+1
Rs.Movenext
วง
Rs.close%>
oneCount = <%= นับ%>;
FunctionChangelocation (locationId)
{document.form1.boardIid.length = 0;
varlocationId = locationId;
Vari;
สำหรับ (i = 0; i <onecount; i ++)
{ถ้า (subcat [i] [1] == locationId)
{document.form1.boardIid.options [document.form1.boardId.length] = newOption (subcat [i] [0], subcat [i] [2]);
-
</script>
************************ (ii) แสดงการจัดกลุ่มและเขียนเหตุการณ์ onchange ของกล่องรายการ
<%setRs = server.createObject ("adodb.recordset"))
sql = "เลือก*frombookclassorderbyclassiddesc"
Rs.opensql, CN, 1,1
ifrs.eofandrs.bofthen
Response.write "โปรดเพิ่มคลาสทั้งหมดก่อน"
Response.end
Else%>
<selectName = "classID" onChange = "changelocation (document.form1.classid.options [document.form1.classid.selectedIndex] .Value)">
<optionSelectedValue = "> == โปรดเลือกหมวดหมู่หลัก == </petion>
<%dountilrs.eof%>
<aptoviveValue = "<%= trim (rs (" classId "))%>"> <%= trim (rs ("classname"))%> </opovie>
<%Rs.Movenext
วง
endif
Rs.close
setrs = ไม่มีอะไร%>
</เลือก>
<selectName = "beardId"> <opopthelectedValue = ""> == โปรดเลือก subcategory == </petion>
</เลือก>