Problemas com "provedor nao encontrado"...

[Eletrohoo 0]

Pessoal estou tentando acessar uma pagina ASP, e esta dando o seguin te erro:

 

ADODB.Connection error '800a0e7a'

 

Provedor não encontrado. É possível que ele não esteja instalado corretamente.

 

/WWW/blog/admin/conexao.asp, line 18

 

Que provedor é esse que eu nao tenho instalado?

Segue codigo completo:

<%'Declaração de Variavel de conexãoDim ConnDB Sub AbreBanco ()	Dim strConexao	'Recebe String de Conexão	strConexao = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& _ 			 Server.MapPath ("../blog/dados.mdb")&";Persist Security Info=False"'Cria Objeto de Conexão	Set ConnDB = Server.CreateObject ("ADODB.Connection")	'Abre Banco	ConnDB.Open (strConexao)End Sub Sub FechaBanco ()	'Verifica Se o Banco está aberto	if ConnDB.State = 1 then		'Fecha o banco de dados		ConnDB.Close		'Destroi o Objeto		Set ConnDB = Nothing	End if	End Sub%>

[Alexandre B. 0]

Bom eu tenho uma sugestão...Porque ao inves de function você não usa include?Normalmente os bancos de dados são configurados para derrubar uma conexão inativa em 30s para não sobrecarregar o servidor