|
MySQL é o sistema de banco de dados mais popular
atualmente e fazer um script ASP utilizar esse sistema
é simples.
Primeiramente, você precisa estar no servidor
onde está instalado o Driver ODBC que permite
que os scripts ASP se conectem com bases MySQL.
Painel de Administração do MySQL
Oferecemos a você uma interface
amigável e fácil de usar para você
criar suas tabelas e administrar a sua base MySQL de
sua conta Windows.
O endereço de acesso é http://www.seudominio.com.br/mysql.
Substitua o termo "seudominio" para o nome
do seu site.
O acesso ao banco de dados MySQL também pode
ser realizado de forma externa. Neste caso, é
necessário que você tenha um endereço
IP fixo em sua conexão de internet, e este IP
será configurado junto ao seu banco, sem custos
adicionais.
Entre com seu login e senha e usufrua de todas as funcionalidades
desse painel!
Para habillitar o serviço, assim como o acesso externo, basta solicitar
através de nosso formulário
de suporte. É Grátis!
Usando o MySQL com ASP
Abaixo, seguem exemplos de conexão com uma base MySQL usando
DSN, usando uma string de conexão e exemplos de como podemos manipular
dados de uma base MySQL.
Conexão usando DSN
DSN significa Data Source Name e basicamente é um "atalho"
que pode ser criado pelos administradores do servidor para que você use
em seu código.
Para solicitar a criação de um DSN, entre em contato conosco pelo
formulário de suporte, fornecendo o nome do DSN desejado.
Suponhamos que o DSN desejado foi o "mysql_dsn". Uma vez criado, segue
abaixo o código ASP efetuando a conexão e tentando listar os campos
da tabela "Contatos".
<%
on error resume next
dim adoConn
dim adoRS
dim counter
set adoConn = Server.CreateObject("ADODB.Connection")
set adoRS = Server.CreateObject("ADODB.Recordset")
adoConn.Open "DSN=mysql_dsn"
adoRS.ActiveConnection = adoConn
if adoConn.errors.count = 0 then
response.write "<h2>Campos na tabela 'Contatos':</h2>"
adoRS.Open "describe Contatos"
while not adoRS.EOF
response.write adoRS.fields(0).value & "<br>"
adoRS.MoveNext
wend
else
response.write "ERRO: Não foi possível conectar!"
end if
%>
Conexão usando string
Segue abaixo o código ASP efetuando a conexão e tentando
listar os campos da tabela "Contatos". Neste exemplo não é
preciso solicitar a criação do DSN, pois estão sendo informados
na string de conexão os seguintes elementos:
Driver usado: MySQL ODBC 3.51 Driver
Server: localhost
Database: nome da base de dados
Uid: login
Pwd: senha
<%
on error resume next
dim adoConn
dim adoRS
dim counter
set adoConn = Server.CreateObject("ADODB.Connection")
set adoRS = Server.CreateObject("ADODB.Recordset")
adoConn.Open "Driver=MySQL ODBC 3.51 Driver; Server=localhost; Database=banco;
Uid=seulogin;
Pwd=suasenha;"
adoRS.ActiveConnection = adoConn
if adoConn.errors.count = 0 then
response.write "<h2>Campos na tabela 'Contatos':</h2>"
adoRS.Open "describe Contatos"
while not adoRS.EOF
response.write adoRS.fields(0).value & "<br>"
adoRS.MoveNext
wend
else
response.write "ERRO: Não foi possível conectar!"
end if
%>
Manipulando dados em uma base MySQL
Abaixo o código usa o DSN criado anteriormente. Após
a conexão é usada um comando (query) para inserir dados na tabela
"Contatos".
<%
on error resume next
dim adoConn
dim adoRS
dim strQuery
set adoConn = Server.CreateObject("ADODB.Connection")
adoConn.Open "DSN=mysql_dsn"
strQuery = "INSERT INTO Contatos VALUES(0, 'Jill', 'Smith', '20 Santamonica
Parade', 'Beverly
Hills', '555 0303')"
adoConn.Execute strQuery
%>
Pode-se também atualizar um registro, mudando o comando
SQL:
strQuery = "UPDATE Contatos SET firstName = 'Jack'
WHERE firstName = 'Jill'"
E para deletar um registro, pode-se fazer como abaixo:
strQuery = "DELETE FROM Contatos WHERE firstName
= 'Jack'"
Pode-se ainda gerar uma consulta:
SELECT * FROM Contatos
Ainda com dificuldades? Entre em contato conosco através
de nosso Chat!
Voltar
|
