代码如下:
<SELECT style="WIDTH: 180px;" name=DepartID>
                <OPTION value=ALL>全部门店</OPTION>
              <%
                TempSQL = "Select * From Sys_Depart Order By DepartID"
             Set TempRS = Server.CreateObject("ADODB.Recordset") 
             TempRS.Open TempSQL,conn,1,1                 
             Do While Not TempRS.eof
               vID   = TempRS("DepartID")
               vName = TempRS("DepartName")
              %>              <%if vID = vDepartID then %>
                <OPTION value=<%=vID%> selected ><%=vName%></OPTION>
              <%else %>
                <OPTION value=<%=vID%>><%=vName%></OPTION>
              <%end if %>              <%
                  TempRS.MoveNext
             Loop              
              %>
               </SELECT>
请问一下,如何修改才能实现下拉列表里面的选项前面出现复选框?
另外如何实现树形结构了?(treeview)