 |
| |
<%
set rs_2=server.createobject("adodb.recordset")
sql="select distinct top 10 LarCode,LarSeq from bclass order by LarSeq"
rs_2.Open sql,conn,1,1
Do While Not rs_2.eof
response.write " "&rs_2("LarCode")&" |"
rs_2.movenext
if rs_2.eof then exit do
loop
rs_2.close
set rs_2=nothing
%> |
|
