数据库里是这些数据

  （rq)       (sj)      （jcj）

2013.03.13	15:45      男

2013.03.13	17:00      男

2013.03.13	18:56      男

2013.03.13	19:12      男

2013.03.13	20:01      男

2013.03.13	23:06      女

2013.03.14	01:06      男

2013.03.14	03:06      男

2013.03.14	04:10      男

2013.03.14	06:06      男

2013.03.14	10:06      男

2013.03.14	14:06      女

2013.03.14	15:59      男





<FORM  name="myform86" method="post"   action="js_1.asp" target=xxx>

<%

set conn=server.createobject("adodb.connection")

conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("jihua.mdb")

exec="select distinct rq from xueshengku"

set rs=server.createobject("adodb.recordset")

rs.open exec,conn,1,1

if rs.eof then

end if

%>

 <select name="kr">

   <option value="">请选择开始日期</option>  '1111111我这里选择开始日期2013.03.14时

我下面2222222的位置怎么让它出现

01:06

03:06

04:10

06:06

10:06

14:06

15:59

  <%

do while not rs.eof

%>

<option value="<%=rs("rq")%>"><%=rs("rq")%></option>

<%

rs.movenext

loop

%></select>

 <%

set conn9=server.createobject("adodb.connection")

conn9.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("tongbao.mdb")

exec9="select distinct fsj  from shuisheng"

set rs9=server.createobject("adodb.recordset")

rs9.open exec9,conn9,1,1

if rs9.eof then

end if

%>

 <select name="ks"> 

   <option value="">请选择开始时间</option> '2222222的位置怎么让它出现

01:06

03:06

04:10

06:06

10:06

14:06

15:59

<%

do while not rs9.eof

%>

<option value="<%=rs9("sj")%>"><%=rs9("sj")%></option>



<%

rs9.movenext

loop

%></select>



&nbsp;</p>

  <input name="" type="submit"  value="开始统计"/>

</form>

  

<td>

  </td></tr>

  </table>

</center>

</form>

kr=request.form("kr")

set conn=server.createobject("adodb.connection")

conn.open "驱动字符串"

set rs=conn.execute("select sj from 表名称 where rq='"&kr"'")

while not rs.eof

  response.write "<option value='"&rs(0)&"'>"&rs(0)&"</option></option>"

  rs.movenext

wend

rs.close:set rs=nothing<