asp 程序 代码

来源:百度知道 编辑:UC知道 时间:2024/06/22 09:16:25
<select size="1" name="item">

<option value="全部" selected>全部</option>
<%set rs_lei = server.createobject("adodb.recordset")
sql = "select id,twoid,threeid,name from [china_type] where id<>0 order by id,twoid,threeid"
rs_lei.open sql,conn,1,1
do while not rs_lei.eof
if rs_lei("twoid")=0 and rs_lei("threeid")=0 then%>
<option value="<%=rs_lei("id")%>"><%=rs_lei("name")%></option>
<%elseif rs_lei("twoid")>0 and rs_lei("threeid")=0 then%>
<option value="<%=rs_lei("id")&"a"&rs_lei("twoid")%>">  <%=rs_lei("name")%></option>
<%else%>
<option value="<%=rs_lei("id&quo

从表china_type读取数据,然后根据条件输出给<Option>标签,
在浏览器呈现为下拉列表

<option value="全部" selected>全部</option> <!--类型为下拉列表-->

<%set rs_lei = server.createobject("adodb.recordset")
sql = "select id,twoid,threeid,name from [china_type] where id<>0 order by id,twoid,threeid" '表[CHINA_TYPE]连接
rs_lei.open sql,conn,1,1 '[1.1为读取]
do while not rs_lei.eof '循环读取表信息开始
if rs_lei("twoid")=0 and rs_lei("threeid")=0 then%> <!--判断 表中twoid 和 threeid 是否为=0 -->
<option value="<%=rs_lei("id")%>"><%=rs_lei("name")%></option> <!--为=0的情况下,事件:列表中显示:读取ID,和LEI名称-->
<%elseif rs_lei("twoid")>0 and rs_lei("threeid")=0 then%> <!--这里重复了上面的判断,所以可以去掉-->
<option value="<%=rs_lei("id")&"a"&rs_lei("twoid")%>"> <%=rs_lei("name&