漯河丽天科技有限公司:代码有错误，请高手来指点

无法显示网页
试图访问的网页出现问题，无法显示。

--------------------------------------------------------------------------------

请尝试执行下列操作：

单击刷新按钮，或稍后重试。

打开 127.0.0.1 主页，然后查找与所需信息相关的链接。
HTTP 错误 500.100 - 内部服务器错误 - ASP 错误
Internet 信息服务

--------------------------------------------------------------------------------

技术信息（用于支持人员）

错误类型：
(0x80020009)
发生意外。
/admin/usershop_edit.asp, 第 211 行

浏览器类型：
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; TencentTraveler ; (R1 1.5))

网页：
GET /admin/usershop_edit.asp

时间：
2006年7月5日, 10:09:26

详细信息：
Microsoft 支持

具体代码如下：

210行 %>
211行 <OPTION <%if trim(shi)=cstr(rs("id")) then%>selected<%end if%> value="<%=trim(rs("id"))%>"><%=trim(rs("shi"))%></OPTION>
213行 <%rs.close%>
214行 </SELECT></td>
问题补充：代码如下：
</SELECT>
<SELECT name="shi">
<%
sql = "select id,shi from shi where id="&cstr(shi)
rs.open sql,conn,1,1
%>
<OPTION value="<%=trim(rs("id"))%>" <%if sctr(shi)=cstr(rs("id")) then response.write("selected")%>><%=trim(rs("shi"))%></OPTION>
<%rs.close%>
</SELECT></td>
</tr> <tr>
<td height="25" bgcolor="#EEEEEE" width="103">
<p>店铺内容：</td>
<td height="25" bgcolor="#EEEEEE" colspan="3">
<textarea rows="4" name="memo" cols="53"><%=memo%></textarea></td>
</tr>