求助：关于搜索查询的问题。谢谢

原来的代码是

  <%
t = request.QueryString("t")
Key = request.QueryString("key")
If t = "" Then
  exec = "select * from [product] where title like '%"&Key&"%' order by id desc "
End If
If Key = "" Then
  Response.Write("<script>alert('请输入关键词!');history.back();</script>")
  Response.End()
End If
Set rs = server.CreateObject("adodb.recordset")
If t = "" Then
  exec = "select * from [product] where title like '%"&Key&"%' order by id desc "
End If
rs.Open exec, conn, 1, 1
If rs.EOF Then
  response.Write "&nbsp;没有搜索到相关内容！"


只是查询title这个表里的标题
我想再加个顺便查询body这个表里的内容

随改成

  <%
t = request.QueryString("t")
Key = request.QueryString("key")
If t = "" Then
  exec = "select * from [product] where title like '%"&Key&"%' or body like '%"&Key&"%' order by id desc "
End If
If Key = "" Then
  Response.Write("<script>alert('请输入关键词!');history.back();</script>")
  Response.End()
End If
Set rs = server.CreateObject("adodb.recordset")
If t = "" Then
  exec = "select * from [product] where title like '%"&Key&"%' or body like '%"&Key&"%' order by id desc "
End If
rs.Open exec, conn, 1, 1
If rs.EOF Then
  response.Write "&nbsp;没有搜索到相关内容！"



结果搜索以后出现了错误
错误类型：
Microsoft OLE DB Provider for ODBC Drivers (0x80040E21)
ODBC 驱动程序不支持所需的属性。
/search.asp, 第 44 行


第44行的代码是
rs.Open exec, conn, 1, 1



请教，如何修改呢，谢谢各位高手，大冷的天来麻烦你们了。

看一下数据库中body的属性吧

body的属性和title是一样的，都是属于备注的

我晕，我给body改成文本以后，可以查询了，但是最多字符是255个，太少了点。。