标题:Microsoft VBScript 运行时错误 错误 '800a000d'
只看楼主
smjxbyl
Rank: 1
等 级:新手上路
帖 子:1
专家分:0
注 册:2010-11-16
 问题点数:0 回复次数:0 
Microsoft VBScript 运行时错误 错误 '800a000d'
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"-->
搜索更多相关主题的帖子: Microsoft VBScript 运行 
2010-11-16 12:19



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-325912-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.024241 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved