conexao ASP + MySQL
Galera...
Estou tentando conectar banco de dados MySQL, tenho a instrução abaixo, porém, não consigo EXIBIR os dados, como se o banco não conectasse ou não estivesse ativo:
CODIGO:
<%
servidor = "localhost"
banco = "db_verdesmares"
usuario = "root"
senha = "marmmc"
porta = "3307"
opcao = "3"
provedor = "DRIVER={MYSQL ODBC 5.3 UNICODE Driver};SERVER="&servidor&";PORT="&porta&";DATABASE="&banco&";UID="&usuario&";PWD="&senha&";OPTION="&opcao&";"
SET cnnDB = Server.CreateObject("ADODB.Connection")
cnnDB.Open provedor
SET strRS = Server.CreateObject("ADODB.Recordset")
strRS.Open "SELECT * FROM vm_noticias ORDER BY id DESC", cnnDB
response.write "conectou ao banco sem problemas, pois passou por aqui.."
response.write provedor
DO WHILE NOT strRS.EOF%>
<div class="row" style="padding-bottom: 15px; padding-top: 15px;">
<div id="noticia_data" class="text-center"><%=strRS("vmares_data")%></div>
<div class="col-md-12">
<p style="font-size: 22px;"><%=strRS("vmares_titulo")%></p>
</div>
<div class="col-md-12 text-muted"><%=strRS("vmares_descricao")%>
</div>
<div id="noticia_link" class="col-md-12 pull-right">+ detalhes</div>
<%
strRS.MoveNext
Loop
response.write "passou pelo laço, funcionou..."
%>
Acredito que meu código está correto, só se não estou enchergando algo que pode estar errado.
Se conseguirem me dar uma luz, seria ótimo..
Tentei trocar o DRIVER 5.3 para ANSI e UNICODE, porém de nenhum jeito vai.
Tentei criar um DSN pelo ODBC também não...
Ajuda, agradeço.
Obrigado.
Discussão (1)
Carregando comentários...