页面错误。
    提示为：错误 '80020009'
/index.asp，行 25

代码是：
<%
set ab=server.CreateObject("adodb.recordset")
sql="select * from cms_about where title='关于我们'"
ab.open sql,conn,1,1
cn=left(ab("cont"),400)
response.Write(cn&"......阅读全文>>")
%>

在这里请教各位老师，看我这一段代码哪里有错？先谢谢了！！！



[ 本帖最后由 工人 于 2012-8-19 23:24 编辑 ]

听说这里的朋友真诚善良，乐于助人，我就来了。

应该是没查到记录或者记录数据太大溢出了！

[ 本帖最后由 cnfarer 于 2012-8-20 07:29 编辑 ]

在网上查一下：asp 80020009
有几种情况，你自己判断一下。

问好楼上两位，虽然问题没有解决也要谢谢你们的热心。
<%
set ab=server.CreateObject("adodb.recordset")
sql="select * from cms_about where title='关于我们'"
ab.open sql,conn,1,1
cn=left(ab("cont"),400)
response.Write(cn&"......阅读全文>>")
%>

  这段代码可能存在问题，1，页面显示略文后，后面是“&nb......阅读全文>> ”其中的“阅读全文”并不含链接；
2，就是被提示：错误 '80020009'
/index.asp，行 25

   而这行25正是这段代码中的“cn=left(ab("cont"),400)”这一行，想请教老师们，看我这段代码哪里存在问题？我该如何修正？

谢谢各位了。

<%
   if len(ab("cont")) > 399 then
      cn=left(ab("cont"),400)
      response.write cn&"...阅读全文>> "
   else
      response.write ab("cont")
   end if
注意符号。""  和“”是不一样的。
%>

谢谢版主，我用你的代码：
<%
   if len(ab("cont")) > 399 then
      cn=left(ab("cont"),400)
      response.write cn&"...阅读全文>> "
   else
      response.write ab("cont")
   end if
%>
替换了我原来的代码：
<%
set ab=server.CreateObject("adodb.recordset")
sql="select * from cms_about where title='关于我们'"
ab.open sql,conn,1,1
cn=left(ab("cont"),400)
response.Write(cn&"......阅读全文>>")
%>

   结果却是页面提示：
Microsoft VBScript 运行时错误 错误 '800a000d'

类型不匹配: 'ab'

/index.asp，行 22

    是我理会错了你的意思吗？还望不吝赐教，谢谢！

你发来的代码在22行和23行分别是：
 if len(ab("cont")) > 399 then
      cn=left(ab("cont"),400)

ab 你看是是不是 ab.open"",conn,1,1
的。