js，html和asp代码的混合使用

<%>    Dim rs,sql,title,uname,k
    set rs=server.createobject("adodb.recordset")
    sql="select top 20 * from sjsj order by id desc"
    rs.open sql,conn,1,1
    if rs.bof and rs.eof then
        response.write "error!"
    else
        k=1
        response.write "ID第一项第二项"
        do while not rs.eof
            response.write ""
            k=k+1
            rs.movenext
        loop
        response.write "


"&k&"
"&rs("id")&"
"&rs("kid")&"
OK!"
    end if
    rs.close
    set rs=nothing
%>