[Resolvido] Erro conexão

[alexandroferreira 0]

Pessoal, tenho o seguinte código, mas não estou conseguindo fazer a conexão com o BD.

O que pode ser? Segue o código e mensagem de erro:

 

<%@ Language="JavaScript" %>

<%
Set Conexao = Server.CreateObject("ADODB.Connection")
conexao.Open = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("./base/dados_bd.mdb")
%>
%>
<table width="407" border="1" cellspacing="0" cellpadding="0" id="tabela">
<tr>
<td width="164"><strong>NOME</strong></td>
<td width="159"><strong>EMAIL</strong></td>
<td width="76"><strong>Acionar</strong></td>
</tr>
<%
var rs = Conexao.Execute("Select * From Teste");
if (rs == null) {
Response.Write("NADA");
}
else {
while (!rs.EOF) {
%>
<tr>
<td><%=rs("Nome")%></td>
<td><%=rs("EMail")%></td>
<td><a href="#" onClick="apagar('<%=rs("Codigo")%>', this.parentNode.parentNode.rowIndex);">deletar</a></td>
</tr>
<%
rs.MoveNext();
}
}
%>
</table>

 

Mensagem de erro:

Erro de compilação do Microsoft JScript (0x800A03EC)

';' esperado

/teste/fckeditor/ler.asp, line 4, column 4

Set Conexao = Server.CreateObject("ADODB.Connection")

---^

[xanburzum 169]

olha o exemplo de uma conexao em Jscript

 

<%@ Language=”JavaScript” %>

<%

var Conexao = Server.CreateObject(“Adodb.Connection”); // Criando o objeto de Conexão

Conexao.ConnectionString = “Driver=MySQL ODBC 3.51 Driver; DataBase=#########; Server=localhost; Uid=#########; PassWord=#########;”;

Conexao.Open; // Abrindo a Conexão

var Rs = Conexao.Execute(“Select * From Cadastro”); // SQL para selecionar e imprimir na tela todos os Cadastros

[alexandroferreira 0]

olha o exemplo de uma conexao em Jscript

 

<%@ Language=”JavaScript” %>

<%

var Conexao = Server.CreateObject(“Adodb.Connection”); // Criando o objeto de Conexão

Conexao.ConnectionString = “Driver=MySQL ODBC 3.51 Driver; DataBase=#########; Server=localhost; Uid=#########; PassWord=#########;”;

Conexao.Open; // Abrindo a Conexão

var Rs = Conexao.Execute(“Select * From Cadastro”); // SQL para selecionar e imprimir na tela todos os Cadastros

O problema está aí, pois eu quero transformar a conexão utilizando o access e não o mysql.

[xanburzum 169]

é só mudar de MySQL para Access, você esta programando em Jscript no ASP e não em VBS, por isso ele dá erro no código

 

conexao.Open = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("./base/dados_bd.mdb")

 

<%@ Language=”Javascript” %>

<%

var Conexao = Server.CreateObject(“Adodb.Connection”); // Criando o objeto de Conexão

Conexao.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("./base/dados_bd.mdb");

Conexao.Open; // Abrindo a Conexão

var Rs = Conexao.Execute(“Select * From Cadastro”); // SQL para selecionar e imprimir na tela todos os Cadastros

[alexandroferreira 0]

O erro agora é este:

 

Tipo de erro:

Microsoft OLE DB Provider for ODBC Drivers (0x80004005)

[Microsoft][ODBC Driver Manager] Nome da fonte de dados não encontrado e nenhum driver padrão especificado

/teste/ler.asp, line 6

[xanburzum 169]

verifique se o caminho do bd esta correto, e coloque as permissoes no arquivo e pasta

[alexandroferreira 0]

Resolvido

[xanburzum 169]

OK, amigo... beleza...