Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

alexandroferreira

Erro de conexão!

Recommended Posts

O que está acontecendo com esse código? Pois está dando uma msg de erro.

 

Segue o código:

 

<%@ Language="JavaScript" %>

<%

// Conexao com o Banco de Dados

var Conexao = Server.CreateObject("Adodb.Connection");

var set = Server.CreateObject("Adodb.Recordset");

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

Conexao.Open;

%>

<html>

<head>

<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />

<title>JQuery Cadastrando com ASP</title>

<script language="javascript" src="jquery.js"></script>

<script language="javascript" src="funcao_jquery.js"></script>

</head>

<body>

<h2>JQuery Cadastrando com ASP</h2>

<ul>

<%

var rs = Conexao.Execute("Select * From Teste"); // SQL para listar os dados

if (rs == null) {

Response.Write("NADA ENCONTRADO");

}

else {

while (!rs.EOF) {

Response.Write("<li>"+rs("Nome")+" : "+rs("EMail")+"</li>") // Lista todos os cadastrados do banco

rs.MoveNext();

}

}

%>

</ul>

 

<br><strong>INSIRA DADOS NO BANCO</strong><br>

 

<form action="Cadastro_JQuery.asp?Cadastrar=Ok" method="post">

Nome: <input name="Nome" type="text" id="Nome" />

<br>

E-Mail: <input name="EMail" type="text" id="EMail" />

<input name="btAdd" type="submit" value="adicionar" id="btn_enviar" />

</form>

</body>

</html>

<%

// Função para cadastrar no banco

if (Request.QueryString("Cadastrar") == "Ok") {

 

var nome = Request.Form("Nome");

var email = Request.Form("EMail");

 

Conexao.Execute("Insert Into Newsletter (Nome, EMail) Values ('"+nome+"', '"+email+"')");

Response.Write("");

}

%>

 

 

Mensagem de erro:

 

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

/saulo/fckeditor/teste.asp, line 7

 

 

Abraços e grato desde já.

Compartilhar este post


Link para o post
Compartilhar em outros sites

Ele diz que não está achando a base de dados no local indicado na linha 7 que aparentemente é a linha:

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

 

Antes de mais nada, eu daria um response.write no datasource, para ver se o caminho está correto.

Um outro detalhe é que você abre as aspas mas não as fecha no data source, isso pode ser outra possibilidade de erro.

Compartilhar este post


Link para o post
Compartilhar em outros sites

Cara, tenta usar a sua conexão da seguinte forma:

 

Cria um arquivo chamado conexao.asp

 

Aí vai o código:

 

<%
dim conn

Sub AbreConn()

Set conn = Server.CreateObject("ADODB.Connection") 
conn.Open = "Provider=Microsoft.Jet.OLEDB.4.0;Data source=C:\Inetpub\vhosts\seu_dominio.com.br\httpdocs\dados\nome_da_base.mdb;Jet OLEDB:Database;"


'CONEXÃO COM MYSQL, tire as aspas simples para utilizar, não esqueça de comentar a conexão com Access
'Set conn = Server.CreateObject("ADODB.Connection") 
'conn.Open = "Driver={MySQL ODBC 3.51 Driver}; SERVER=localhost; DATABASE=nome_do_banco; UID=Usuario; PWD=Senha;" 

End Sub

Sub FechaConn()

conn.Close()
Set conn = Nothing

End Sub
%>

Aí toda página que você for usar a conexão apenas faça um include do arquivo conexao na primeira linha da página, assim:

 

<!--#Include File="conexao.asp"-->

E sempre que for abrir a conexão use o código abaixo:

 

Call AbreConn()

Não esquece de fechar a conexão no final do código:

 

Call FechaConn

espero que ajude.

Compartilhar este post


Link para o post
Compartilhar em outros sites

verifique as permissões para arquivo e pasta

Compartilhar este post


Link para o post
Compartilhar em outros sites

dá uma olhada aqui vai te ajudar

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.