这里边的是什么意思帮看看，谢谢

<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
                  <TBODY>
                    <TR> 
                      <TD width=204> 
                        <%

    response.write "<table width='204' height=208  border='0' align='center' cellpadding=0 cellspacing=0 bgcolor=#eef8ff>"
    sqllar="select Distinct LarCode,LarSeq from bclass where larseq=6"
    Set rsprodtree=Server.CreateObject("ADODB.RecordSet") 
    rsprodtree.Open sqllar,conn,1,1 

        
        i=0
        Do While Not rsprodtree.eof    
        i=i+1
        larcode(i)=rsprodtree("LarCode")
        rsprodtree.movenext    
        if i>0 then exit do
        Loop
    set rsprodtree=nothing
    set sqllar=nothing


    
    FOR t=1 to i
    response.write "<tr bgcolor=#89bcdd><td width='204'  class='dfont' height=29 colspan=3 valign=middle><B>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<a href='class.asp?LarCode="&LarCode(t)&"'><font color=#ffffff>"&LarCode(t)&"</font></a></B></td></tr>"
    response.write "<tr  >"

if viewmidclass<>0 then           '是否显示中类
    '以下是根据前面读取的大类名称，读取各个大类下的中类
    sqllar="select MIDCode,MIDSeq from bclass where larcode='"&larcode(t)&"' order by MIDSeq"
    Set rsprodtree=Server.CreateObject("ADODB.RecordSet") 
    rsprodtree.Open sqllar,conn,1,1 
        m=0
        Do While Not rsprodtree.eof    
        m=m+1
        midcode(m)=rsprodtree("midCode")
        rsprodtree.movenext    
        if rsprodtree.eof then exit do
        Loop

    set rsprodtree=nothing
    set sqllar=nothing

        for n=1 to m
        if n mod 2<>0 then
        response.write "<td width=100 align=right   class='dfont'><a href='class.asp?LarCode="&LarCode(t)&"&MidCode="&MidCode(n)&"'>"&MidCode(n)&"</a>&nbsp;&nbsp;</TD>"
        else
        response.write "<td align=center width=4>|</td><td  width=100 align=left class='dfont'>&nbsp;&nbsp;<a href='class.asp?LarCode="&LarCode(t)&"&MidCode="&MidCode(n)&"'>"&MidCode(n)&"</a></TD></tr><tr>"
        end if
        next
            response.write "<tr><td width=175 colspan=3 height=10 ></td></tr>"

end if

    next
            response.write "</table>"

%>
                      </TD>
                      <TD align=middle> <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
                          <TBODY>
                            <TR> 
                              <TD width="10" valign="middle">&nbsp;</TD>
                              <TD width="700" valign="middle"> 
                                <% call lar6() %>
                              </TD>
                            </TR>
                          </TBODY>
                        </TABLE></TD>
                    </TR>
                  </TBODY>
                </TABLE>