Conexao ADODB em Servidor WEB

Olá Pessoal, sempre desenvolvi aplicações para uso em rede locais ou VPN´s, mas agora preciso hospedar uma aplicação na WEB. Sempre conecto o banco utilizando esse codigo:

<%
' Esta é a conexao original
sub abre_conexao
Set Conexao = Server.CreateObject("ADODB.Connection")
Conexao.Open "DBQ=c:\inetpub\wwwroot\bdinfo.mdb;Driver={Microsoft Access Driver (*.mdb)}"
end sub

sub fecha_conexao
Conexao.close
Set Conexao =nothing
end sub
%>

E chamo via include, sempre funcionou. Agora no UOLHOST isso não funciona foi passado o seguinte exemplo:

<%

'Declarando variáveis
Dim adoCon, strCon
Dim caminho_banco

'Definindo caminho do banco
caminho_banco = Server.MapPath("../dados/arquivo.mdb")

'Definindo string de conexão
strCon = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & caminho_banco

'Criando objeto
Set adoCon = Server.CreateObject("ADODB.Connection")

'Abrindo conexão
adoCon.Open strCon

Aqui coloque o código desejado

'Fechando conexão
adoCon.Close
Set adoCon = Nothing
%>

Mas com isso teria que alterar todos os codigos da aplicação. Tentei adaptar para a minha conexao padrao dessa forma:

<%
' esta é a do servidor
sub abre_conexao
Set Conexao = Server.CreateObject("ADODB.Connection")
Conexao.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= Server.MapPath("../dados/bdinfo.mdb") "
end sub

sub fecha_conexao
Conexao.close
Set Conexao =nothing
end sub
%>

Mas não funciona mesmo assim, alguem tem como dar uma mão? O suporte do UOL simplesmente ignora o chamado em aberto! Agradeço qualquer informação!