这个问题怎么解决啊？高手帮忙！

<table width="94%" border="0" align="right" cellpadding="0" cellspacing="0">
                <tr>
                <%
set rs=server.CreateObject("adodb.Recordset")
sql="select  * from kh "
rs.open sql,conn,1,1
if rs.eof then%>
                  
    <tr>
                              <td height="8" align="center"><strong>暂无客户信息!</strong></td>
                            </tr>
                            <%else
do while not rs.eof
%>
                            <tr>
                              <td height="22"><img height="5" src="image/icon_dot01.gif" width="5">
                                <%if len(rs("name")) > 100 then Response.write left(rs("nema"),100)&"..." else Response.write rs("name") end if%>
                              </td>
<%
rs.movenext
if rs.eof then
%>
<td height="22"></td>
<%else%>
<td height="22"><img height="5" src="image/icon_dot01.gif" width="5">
                                <%if len(rs("name")) > 100 then Response.write left(rs("nema"),100)&"..." else Response.write rs("name") end if%>
                              </td>
<%   
rs.movenext
end if
%>
                            <td>
                            <% loop
rs.close
set rs=nothing
end if%>
</td>                  
</tr>                  
               
              </table>