Vbscript ASP经典VB错误800a01a8需要对象

我正在尝试修复公司网站上的一个问题。有问题的那一页是。尝试调用全局选项文件时出现以下错误：

Microsoft VBScript运行时错误“800a01a8” 所需对象：“” /_包括/Callout_Global.asp，第40行

这是/\u Includes/Callout\u Global.asp文件中错误引用的行：

rs_main.open "Select TeamID, FirstName + ' ' + LastName as FullName from team where Category = 'Attorney' and IsActive = '1' Order by OrderNum"

该代码控制应包含律师姓名列表的下拉框

此代码在站点中的其他页面上运行良好（参见示例）

我不是一个程序员，只是想清理一下这个网站。这是一个非常陈旧的代码，但如果您能给我一些建议，我将不胜感激

调用此函数的SiteMap.asp页面上的编码如下所示：

<td width="210" valign="top" class="hideforprint">
<!--#include virtual="/_Includes/Callout_Global.asp" -->
</td>
<td width="20">&nbsp;</td>
</tr>
</table>
<table width="726" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="25"></td>
</tr>
</table>
</td>
<td width="22" valign="top" background="/Images/CommonImages/rightborder.gif">&nbsp;</td>
</tr>
</table>
<!--#include virtual="/_Includes/Footer.asp" -->
</body>
</html>

---

谢谢

该错误表明您尚未创建名为

rs\u main

的对象。看起来它应该是一个记录集对象，所以您应该在代码的前面有一行

Set rs_main = Server.CreateObject("ADODB.Recordset")

你能发布Callout\u Global.asp的前40行吗？可能还有其他东西丢失了？

我是个笨蛋

我想出来了。在SiteMap.asp代码的顶部，缺少一个函数调用。一旦我把它加进去，一切都开始工作了。我只是注意到它与其他正常工作的页面不同

现在来解决一个搜索索引问题

---

谢谢

您将其标记为ASP.NET和VB.NET，但这些技术与vbscript和经典ASP无关。请去掉那些标签。