这段代码 我是真的需要高手 给我详解一下 每一段都解释一下

<%
zc_bid=bigclassid
zc_sid=0
zc_brow="news_view.asp" '子页地址
zc_num=10 '新闻条数
zc_wordnum=10 '新闻文字个数
zc_isdate=0
set rs1=server.CreateObject("adodb.recordset")
sql1="SELECT top "&zc_num&" * FROM News order by listorder desc,ID DESC"
if zc_bid<>0 then
sql1="SELECT top "&zc_num&" * FROM News where bigclassid="&zc_bid&" order by listorder desc,ID DESC"
end if
if zc_sid<>0 then
sql1="SELECT top "&zc_num&" * FROM News wheresmallclassid="&zc_sid&" order by listorder desc,ID DESC"
end if
rs1.open sql1,conn,1,1
if rs1.eof then
' response.Write("<li>没有信息！</li>")
else
while not rs1.eof
Response.Write(" <li>")
if int(rs1("id"))=int(id) then
sel=" class=sel"
else
sel = " "
end if
Response.Write("<a "&sel&" href="""&zc_brow&"?id="&rs1("id")&""" >"&cutstr(RS1("title"),zc_wordnum)&"</a>")
if zc_isdate=1 then
Response.Write("<span class=""date"">["&rs1("infotime")&"]</span>")
end if
Response.Write(" </li>"&chr(10))
rs1.movenext
wend
rs1.close
end if
%>