Registros não aparecem

[alexandroferreira 0]

Pessoal,

 

 

Estou migrando do access para o Mysql. Efetuei a instalação do MySQL Workbench, instalei o MySQL, criei o banco e suas respectivas tabelas, criei a conexão ODBC, mas quando eu rodo o código ASP os registros não aparecem. O que pode está acontecendo já que não gera nenhuma mensagem de erro de script? A tela simplesmente fica sem dados, completamente branca.

 

Segue o código:

 

<%
Dim conexao
Dim recordset
Set conexao = Server.CreateObject("ADODB.Connection")

conexao.Open "Driver={MySQL ODBC 5.2 Driver};Server=localhost;Database=compras;User=root; Password=root;Option=3;"
Set recordset = conexao.Execute("SELECT * FROM tabela")
%>
<table border="1">
<%
Do While Not recordset.EOF
%>
<tr>
<td><%= recordset.Fields("cod_fn").Value %></td>
<td><%= recordset.Fields("nome_fn").Value %></td>
</tr>
<%
recordset.MoveNext
Loop
%>
</table>
<%
'Não esquecer de fechar a conexão
recordset.Close
Set recordset = Nothing
conexao.Close
Set conexao = Nothing
%>

 

[Mário Monteiro 179]

Nenhuma mensagem de erro?

[alexandroferreira 0]

Não aparece nenhuma mensagem de erro. Estranho isso.

[Mário Monteiro 179]

Imprima algo dentro do loop para ver ser está pelo menos entrando nele

[alexandroferreira 0]

Sim.

Response.write date aparece a data normalmente.

Estas configurações no Mysql Workbench fazem diferença?

 

Host: hp-HP

Socket: MySQL

Port: 3306

Version: 5.6.16-log MySQL Community Server (GPL)

Compiled For: Win64 (x86_64)

[xanburzum 169]

dê um response.write na sua string SQL, mas antes faça uma busca simples, colocando

 

SELECT * FROM tabela WHERE cod_fn='1'

 

E veja se retorna registros

[alexandroferreira 0]

Resolvido. Uffa!!!

 

Eu coloquei o nome do drive de conexão completo, igualzinho como está no ODBC. Ao invés de "MySQL ODBC 5.2 Driver" eu coloquei "MySQL ODBC 5.2 Unicode Driver".

 

Os dados apareceram normalmente.

 

Obrigado pela atenção.