Um simples e muito útil meio de efetuar conexão em um Banco de Dados Access protegido por senha.
DICA: Muitos usuários optam por colocar o código de conexão em cada página em que é necessário estabelecer conexão com o banco, porém o meu conselho é que o código seja apenas um em uma determinada pasta, e que nas paginas que necessitam de comunicação com o banco, seja feito apenas um include.
'EXEMPLO DO INCLUDE
==========================================================================================
'EXEMPLO DA CONEXÃO
<%
'1
dim objConn, strSQL, objRs, strBanco, strConn
'2
set objConn = Server.CreateObject("ADODB.Connection")
'3
strBanco = Server.MapPath("../db/banco.mdb")
'4
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data source=" & strBanco &";Jet OLEDB:Database Password=suasenhadobanco;"
'5
objConn.Open(strConn)
%>
'EXPLICAÇÕES
1 - Declaração das Variáveis
2 - Cria o objeto ADODB
3 - Informa o caminho do banco de dados
4 - Monta a conexão com o caminho do banco já informado
5 - Abre a conexão
Salve o arquivo na pasta que desejar com a extensão (.asp)
*´¨) AN-ICE
¸.´¸.*´¨) ¸.*¨)
(¸.´ (¸.` * ANGELO JÚNIOR (.)(.)
