
<select name="boardType" class="inputbox" id="boardType">
              <%
			    
 			    if boardstyle=1 then response.write("<option value=''>ËùÓÐ°æ¿é</opgion>")
			    set RsBoard=GrateRs("select * from H_board order by rootid,orders",1)
				do while not RsBoard.eof
			  %>
			    <option value="<%=RsBoard("boardid")%>"<%if RsBoard("boardid")=defalutboardid then response.write(" selected")%>>
				<%
				  s=""
				  for i=1 to RsBoard("Depth")
				     s=s+"¡¡"
				  next
				  if RsBoard("Depth")=0 then
				    s="©À"+s				   
				  else
				    s=s+"©À" 
				  end if
				  response.write s&RsBoard("BoardType")
				%>
				</option>
			  <%
			      RsBoard.movenext
			    loop
				RsBoard.close
				set Rsboard=nothing
			  %>
              </select>
