Microsoft VBScript 运行时错误 错误 '800a000d'

类型不匹配: 'mrs'

/news_show.asp，行 57
/news_show.asp代码如下:
<!--#include file="head.asp"-->
<script language="javascript">
function doZoom(size){
    document.getElementById('zoom').style.fontSize=size+'px'
}
</script>
<%
if request.QueryString("id")="" then
    response.Write("<script language='javascript'>window.close();</script>")
    response.End()
end if




set mrs=server.CreateObject("adodb.recordset")
mrs.open"select * from news where id=" & request.QueryString("id"),conn,1,1
%>

<table width="1002" height="496" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td width="228" height="496" valign="top" bgcolor="eaf1fe">
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td height="8" valign="top"><img src="images/shouye_23.jpg" width="231" height="3" alt=""></td>
        </tr>
      </table>
      
      <table width="98%" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td height="27" valign="bottom" background="images/01.jpg">
            <table width="88%" border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td height="17">　　 <span class="14"><strong>新闻中心</strong></span></td>
              </tr>
            </table>
          </td>
        </tr>
      </table>
      <!--#include file="left.asp"-->
      <br>
    </td>
    <td width="774" valign="top"><div align="center"><br>
        <table width="92%" height="20" border="0" cellpadding="0" cellspacing="0" background="images/a2.jpg">
          <tr>
            <td width="5%" height="20"><div align="center"><img src="images/26.gif" width="16" height="16">
              </div></td>
            <td width="95%"><strong>当前位置：新闻中心 &gt;&gt; </strong><font color="#FF3300"><strong>
            
            新闻详细</strong></font></td>
          </tr>
        </table>
        <br>

        <table width="96%" border="0" align="center" cellspacing="0" cellpadding="5" bordercolordark="#FFFFFF" bordercolorlight="#000000" style="word-break:break-all;">
          <tr>
            <td width="100%"><div align="center"><b><%=mrs("title")%></b> <span class="unnamed1"><br />
                </span>
                    <hr size="1" />
        发布时间：<%=mrs("date")%>　　 来源：<%=mrs("zuozh")%>
            </div></td>
          </tr>
          <tr>
            <td><div align="right">文字 〖 <a href="#" class="tt1" onClick="doZoom(16);return false;">大</a> <a href="#" class="tt1" onClick="doZoom(14);">中</a> <a href="#" class="tt1" onClick="doZoom(12);">小</a> 〗
                     </div></td>
          </tr>
          <tr>
            <td width="100%"><font id="zoom" >
              <P align=center><SPAN style="FONT-SIZE: 14pt; FONT-FAMILY: 黑体; mso-hansi-font-family: 宋体; mso-bidi-font-family: 宋体; mso-ansi-language: EN-US; mso-fareast-language: ZH-CN; mso-bidi-language: AR-SA"><FONT face=宋体 size=2>
              <%=mrs("mytext")%>
              
              
              
              
              
              
              
              
              
              <BR>
              </FONT></SPAN></P>
</font>
            <p align='center'><a href="#" onClick="history.go(-1);">[ 返　回 ]</a></p>
              <font >&nbsp;</font>
                <p>&nbsp;</p></td>
          </tr>
          <tr>
            <td class="font1"><p align="right"><img src="Images/printer.gif" width="16" height="14" align="absmiddle" /> <a href="javascript:window.print()">打印本页</a> | <img src="Images/close.gif" width="14" height="14" align="absmiddle" /> <a href="javascript:window.close()">关闭窗口</a> </p></td>
          </tr>
        </table>
        <br>
      </div></td>
  </tr>
</table>
<%mrs.close:set mrs=nothing%>
<!--#include file="foot.asp"-->