asp+js 实现select二级联菜单

<%
connstr="DBQ="+server.mappath("database/database.mdb")+";DRIVER={Microsoft Access Driver (*.mdb)}"
Set conn= Server.CreateObject("ADODB.Connection")
conn.open connstr
sql = "select * from ypxxtwo order by date desc"
set rs=server.createobject("ADODB.Recordset")
rs.open sql,conn,1,1
%>

<%sql = "select * from ypaddtwo order by date desc"
set rs=server.createobject("ADODB.Recordset")
rs.open sql,conn,1,1%>

function changelocation1(addone)
    {
    document.addform.addtwo_id.length = 0;

    var addone_id=addone_id;
    var i;
    document.addform.addtwo_id.options[0] = new Option('请选择市','');
    for (i=0;i < onecount1; i++)
        {
            if (subcat1[i][1] == addone)
            {
                document.addform.addtwo_id.options[document.addform.addtwo_id.length] = new Option(subcat1[i][0], subcat1[i][2]);
            }       
        }
       
    }