Veja exemplos de conexão com o banco Access via script ASP.
Windows 2008
Use o exemplo abaixo para realizar uma conexão sem utilizar uma DSN.
ConnString="Provider=Microsoft.ACE.OLEDB.12.0;Data Source=E:/home/LOGIN_DE_FTP/dados/bancoAccess.accdb;Persist Security Info=False;" Set Conexao = Server.CreateObject("ADODB.Connection") Conexao.Open ConnString Set Registros = Server.CreateObject("ADODB.Recordset") Registros.Open "Clientes", Conexao
Note acima que Data Source=E:/home/LOGIN_DE_FTP/dados/bancoAccess.accdb; representa o caminho de seu site dentro do servidor, que está sob o diretório e:/home/LOGIN_DE_FTP .
O diretório será: e:/home/LOGIN_DE_FTP/dados
Windows 2012
No ambiente Windows 2012 o driver utilizado é o mesmo, porém o caminho físico setado é diferente, neste caso o caminho a ser utilizado deve ter sempre o formato:
//windows-pd-0001.fs.locaweb.com.br/WNFS-0001/Loginftp/CaminhodoBanco
Veja um exemplo utilizando este caminho:
<% 'Declarando variáveis Dim adoCon, strCon 'Conectando com o banco strCon = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=//windows-pd-0001.fs.locaweb.com.br/WNFS-0001/Loginftp/Dados/NomedoBanco" 'Criando objeto Set adoCon = Server.CreateObject("ADODB.Connection") 'Abrindo conexão adoCon.Open strCon '##Tratamento de erro. Caso ocorra problemas na conexão, exibe esta informação e apresenta detalhes. If Err.Number <> 0 Then response.write "<b><font color='red'> Falha na conexão !</font></b>" response.write "<BR><BR>" response.write "<b>Erro.Description:</b> " & Err.Description & "<br>" response.write "<b>Erro.Number:</b> " & Err.Number & "<br>" response.write "<b>Erro.Source:</b> " & Err.Source & "<br>" Else '##Caso a conexão seja bem sucedida, mostra mensagem de confirmação. response.write "<b><font color='blue'> Conexão OK !</font>" End If 'Fechando conexão adoCon.Close Set adoCon = Nothing %>
Sempre deve-se colocar os bancos de dados access dentro da pasta dados, pois ela não está exposta na web, garantindo assim a segurança do conteúdo contra downloads diretos.
Fechando a conexão
Com o comando Registros.Open a conexão foi criada. Você pode fechá-la com os seguintes comandos:
Registros.Close Set Registros = Nothing
ìåéä złożoną teza dostępną Dużą pracę|To zarejestruj się to klejnot Więc zadowolony jak poncz znalazłem to|Ty ojciec zadziwiające zdolność wydziału do ustawiania otwarta treść|To pismo na najwyższym poziomie zdobyłeś fresh obserwującego|Twój kolekcja był zarówno wnikliwy, jak i pięknie napisany|Jestem zdumiony przeszłość jak wiele dobrze wykształcony z tego posta|wykonujesz świetną pracę To dispatch jest ratyfikacją o tym} {https://kredytero.pl|kredytero.pl|kredyt|kredyty|kredyt online|kredyty online|kredyt przez internet|kredyty przez internet}!
ìåéä złożoną teza dostępną Świetną pracę|To zarejestruj się to klejnot Więc uszczęśliwiony konfigurowałem to|Ty był uderzony zadziwiające zdolność do ustawiania atrakcyjna treść|To pismo na najwyższym poziomie zdobyłeś new obserwującego|Twój usługa pocztowa był zarówno wnikliwy, jak i uroczo napisany|Jestem zdumiony by jak wiele nauczyłem się z tego posta|wykonujesz adept pracę To wysłanie jest ratyfikacją o tym} {pożyczki online|pożyczki|pożyczki pozabankowe|http://pozyczkaland.pl/|pozyczkaland.pl/|pożyczka online|pożyczka|pożyczka pozabankowa}!
You be struck by an astonishing adeptness to set open content.
I’m amazed past how much I well-educated from this post play crypto gambling game.
You’ve outdone yourself with this post Well impressive.
Your post is both instructive and entertaining A rare find.