[Resolvido] Tutorial - banco de dados com asp

<font color='#000000'>Conexão com vários tipos de banco de dados a partir de uma página ASP


Há muitas maneiras de conectar-se a um banco de dados. Este artigo passo a passo fornece exemplos de seqüências de conexão para vários tipos de bancos de dados e conexões de banco de dados.

Conectando um banco de dados do Microsoft Access
Sem DSN
<%
Set Cnn = Server.CreateObject("ADODB.Connection")
Cnn.open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=c:\mydatabase.mdb"
%>


Banco de dados OLE sem DSN:
<%
Set Cnn = Server.CreateObject("ADODB.Connection")
Cnn.open "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=c:\mydatabase.mdb"
%>

DSN do arquivo
<%
Set Cnn = Server.CreateObject("ADODB.Connection")
Cnn.open "FILEDSN=ADSN"
%>

Com DSN e sem identificação do usuário/senha
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.open "DSNname"
%>

Com DSN e identificação do usuário/senha
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.open "DSNname","username","password"
%>

Sem DSN, usando um caminho físico como referência
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSNtest="DRIVER={Microsoft Access Driver (*.mdb)}; "
DSNtest=dsntest & "DBQ=c:\mydatabase.mdb"
Conn.Open DSNtest
%>

Sem DSN, usando Server.MapPath
OBS.: Server.MapPath é o caminho proveniente da raiz do servidor Web. Por padrão, é C:\Inetpub\Wwwroot.
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSNtest="DRIVER={Microsoft Access Driver (*.mdb)}; "
DSNtest=dsntest & "DBQ=" & Server.MapPath("/databases/mydatabase.mdb")
Conn.Open DSNtest
%>

Conectando um banco de dados do Microsoft SQL Server
OLE DB
<%
Set cnn = Server.CreateObject("ADODB.Connection")
cnn.open "PROVIDER=SQLOLEDB;DATA SOURCE=sqlservername;UID=username;PWD=password;DAT ABASE=mydatabase "
%>

Com DSN
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.open "DSN=MyDSN;UID=user;PWD=password;DATABASE=mydataba se"
%>

Sem DSN
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSNtest="DRIVER={SQL Server};SERVER=ServerName;UID=USER;PWD=password;DA TABASE=mydatabase"
Conn.open DSNtest
%>

Conectando um banco de dados do Microsoft Visual FoxPro
sem DSN
<%
Set Conn = Server.CreateObject("ADODB.Connection")
ConnStr= "Driver=Microsoft Visual Foxpro Driver; UID=userID;SourceType=DBC;SourceDB=C:\databases\my database.dbc"
Conn.Open ConnStr
%>



Conectando um banco de dados do Oracle
ODBC com DSN
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.cursorlocation=adUseClient
' requer o uso de adovbs.inc; o valor numérico é 3
Conn.open "DSN=test;UID=name;PWD=pass"
%>

Banco de dados OLE
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.cursorlocation=adUseClient
' requer o uso de adovbs.inc; o valor numérico é 3
DSNTest="Provider=MSDAORA.1;Password=pass;User ID=name;Data Source=data.world"
Conn.open DSNtest
%>

Conectando um banco de dados MySQL
ODBC com DSN
<%
Set cnnDB = Server.CreateObject("ADODB.Connection")
cnnDB.ConnectionString = "DSN=bancodedados"
cnnDB.Open
%>

ODBC sem DSN
<%
Set cnnDB = Server.CreateObject("ADODB.Connection")
cnnDB.ConnectionString = "driver=MySQL;server=127.0.0.1;uid=usuario;pwd=sen ha;database=banco_de_dados"
cnnDB.Open
%>


UPDATE: Para acessar BD MySQL pelo ASP

Os códigos necessários já foram passados no post anterior, mas para conseguir isso você vai precisar:

MySQL Server: http://www.mysql.com/Downloa....win.zip
MySQL-Front: http://superdownloads.ubbi.com.br/download/i10499.html
MyODBC Win9x: http://www.mysql.com/Downloads/MyODBC/myod...50.39-win95.zip
MyODBC WinNT/2K/XP: http://www.mysql.com/Downloads/MyODB...2.50.39-nt.zip

*O MySQL-Front é um programa visual para a manipulação de bases MySQL. Eu recomendo!

Fonte: www.superasp.com.br