Objeto necessário: ''

Pessoal, já estou neste código a algumas horas e ainda não consegui depurar...

Tenho o home.asp com um include para acesso ao BD...

Erro:

Objeto necessário: ''

home.asp, line 21

------------------home.asp--------------------------

<!--#include file="conexao.asp"-->

<%

Call AbreConexao

	sql = "SELECT TOP 5 * FROM artigos"

	sql_noticia= "SELECT * FROM noticias WHERE destaque='true'"

	sql_cursos= "SELECT TOP 5 id, titulo, data FROM eventos WHERE tipo='curso' ORDER BY data DESC"

linha 21 Set rsnoticia = conexao.execute (sql_noticia)

Set rscursos = conexao.execute (sql_cursos)

Set rs = conexao.execute (sql)

%>

<link href="style.css" rel="stylesheet" type="text/css">

 

<table width="100%" border="0" cellspacing="0" cellpadding="0">

------------------home.asp--------------------------

------------------conexao.asp--------------------------

<%

Sub AbreConexao

Dim caminho

caminho="C:\Inetpub\eejhp.mdb"

set conexao=server.createobject("ADODB.Connection")

conexao.open "Provider=Microsoft.Jet.OleDB.4.0;Data Source=" & caminho

End Sub

Sub FechaConexao

conexao.close

set conexao=nothing

End Sub

%>

------------------conexao.asp--------------------------