Ir para conteúdo

POWERED BY:

Arquivado

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

flneves

Erro na conexão ASP ACESS PELO DREAMWEAVER

Recommended Posts

Pessoal é o seguinte:

 

Sou iniciante e criei uma conexão via Banco de dados Acess pelo Dreamweaver, inserindo a DSN tudo como ensinado aqui em outros tutoriais.

 

No entanto quando vou testar através do preview do dw, funciona a 1vez.

 

Já quando vou testar novamente aparece esse erro:

 

HTTP 500.100 - Servidor interno Erro - erro do ASP

Internet Information Services

 

--------------------------------------------------------------------------------

 

Informações técnicas (para a equipe de suporte)

 

Tipo de erro:

Microsoft OLE DB Provider for ODBC Drivers (0x80004005)

[Microsoft][Driver ODBC para Microsoft Access] Não foi possível usar '(desconhecido)'. O arquivo já está em uso.

/admonlinenovo/web/login-adm.asp, line 8

 

 

Tipo de navegador:

Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 5.1; .NET CLR 1.1.4322)

 

 

Tenho a impressão que o banco de dados ta aberto, to certo? como resolvo isso?

 

Segue abaixo o código da página de conexão criada pelo dreamweaver:

 

conex_admonline.asp:

 

CODE
<%

' FileName="Connection_odbc_conn_dsn.htm"

' Type="ADO"

' DesigntimeType="ADO"

' HTTP="false"

' Catalog=""

' Schema=""

Dim MM_conex_admonline_STRING

MM_conex_admonline_STRING = "dsn=admonline;"

%>

 

Abaixo, segue o código da index.asp que utiliza a conexão para o banco de dados e que da o erro na linha 8, destacada abaixo:

 

Como corrigo isso???

 

CODE
<%@LANGUAGE="VBSCRIPT"%>

<!--#include file="../Connections/conex_admonline.asp" -->

<%

Dim Recordset1

Dim Recordset1_numRows

 

Set Recordset1 = Server.CreateObject("ADODB.Recordset")

Recordset1.ActiveConnection = MM_conex_admonline_STRING

Recordset1.Source = "SELECT * FROM usuário"

Recordset1.CursorType = 0

Recordset1.CursorLocation = 2

Recordset1.LockType = 1

Recordset1.Open()

 

Recordset1_numRows = 0

%>

<%

' *** Validate request to log in to this site.

MM_LoginAction = Request.ServerVariables("URL")

If Request.QueryString<>"" Then MM_LoginAction = MM_LoginAction + "?" + Server.HTMLEncode(Request.QueryString)

MM_valUsername=CStr(Request.Form("textfield"))

If MM_valUsername <> "" Then

MM_fldUserAuthorization=""

MM_redirectLoginSuccess="lalala"

MM_redirectLoginFailed="bebebebe"

MM_flag="ADODB.Recordset"

set MM_rsUser = Server.CreateObject(MM_flag)

MM_rsUser.ActiveConnection = MM_conex_admonline_STRING

MM_rsUser.Source = "SELECT nome, senha"

If MM_fldUserAuthorization <> "" Then MM_rsUser.Source = MM_rsUser.Source & "," & MM_fldUserAuthorization

MM_rsUser.Source = MM_rsUser.Source & " FROM usuário WHERE nome='" & Replace(MM_valUsername,"'","''") &"' AND senha='" & Replace(Request.Form("textfield2"),"'","''") & "'"

MM_rsUser.CursorType = 0

MM_rsUser.CursorLocation = 2

MM_rsUser.LockType = 3

MM_rsUser.Open

If Not MM_rsUser.EOF Or Not MM_rsUser.BOF Then

' username and password match - this is a valid user

Session("MM_Username") = MM_valUsername

If (MM_fldUserAuthorization <> "") Then

Session("MM_UserAuthorization") = CStr(MM_rsUser.Fields.Item(MM_fldUserAuthorization).Value)

Else

Session("MM_UserAuthorization") = ""

End If

if CStr(Request.QueryString("accessdenied")) <> "" And false Then

MM_redirectLoginSuccess = Request.QueryString("accessdenied")

End If

MM_rsUser.Close

Response.Redirect(MM_redirectLoginSuccess)

End If

MM_rsUser.Close

Response.Redirect(MM_redirectLoginFailed)

End If

%>

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">

<html>

<head>

<title>Untitled Document</title>

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

</head>

 

<body>

<p> </p>

<p><%=(Recordset1.Fields.Item("Código").Value)%><%=(Recordset1.Fields.Item("matricula").Value)%><%=(Recordset1.Fields.Item("nome").Value)%></p>

<p> </p>

<p><%=(Recordset1.Fields.Item("nome").Value)%><%=(Recordset1.Fields.Item("sobrenome").Value)%><%=(Recordset1.Fields.Item("endereco").Value)%></p>

<p></p>

<p> </p>

<p><%=(Recordset1.Fields.Item("periodo2").Value)%><%=(Recordset1.Fields.Item("experiencia1").Value)%><%=(Recordset1.Fields.Item("periodo1").Value)%><%=(Recordset1.Fields.Item("escreve").Value)%></p>

<p> </p>

<form ACTION="<%=MM_LoginAction%>" name="form1" method="POST">

<p>

<input type="text" name="textfield">

</p>

<p>

<input type="text" name="textfield2">

</p>

<p>

<input type="submit" name="Submit" value="Submit">

</p>

</form>

<p> </p>

</body>

</html>

<%

Recordset1.Close()

Set Recordset1 = Nothing

%>

 

 

 

Obrigado a todos!!!!

Compartilhar este post


Link para o post
Compartilhar em outros sites

É.....

 

É exatamente por isso que não uso dreamweaver.

Insere tanto lixo no código que fica dificil ver onde está o problema.

 

eu faço assim:

crio um arquivo chamado connect.asp que ten apenas o seguinte:

 

dsn="DBQ=" & Server.Mappath("../bd/meubd.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};"

 

nas páginas que uso a conexão, faço isto logo na primeira linha:

 

<!--#include file="connect.asp"-->

 

e depois faço o que é necessário no bd:

 

stql = "Select * from minhatabela"

Set rs = conn.Execute(stql)

 

Acho que já deu para pegar a ideia.

 

Tenta isso, primeiro, algo BEEEEMMMM básico e depois vai refinando.

 

Abraços,

Vinicius Ianni

Compartilhar este post


Link para o post
Compartilhar em outros sites

Apesar de ter informado a DSN, você não declarou o objeto de conexão e não informou o driver.

 

Deveria ser algo assim:

<%
strConexao = "DRIVER={Microsoft Access Driver (*.mdb)}; DSN=admonline;"
Set ObjConexao = Server.CreateObject("ADODB.Connection")
ObjConexao.Open strConexao
%>

Compartilhar este post


Link para o post
Compartilhar em outros sites

Apesar de ter informado a DSN, você não declarou o objeto de conexão e não informou o driver.

 

Deveria ser algo assim:

<%
strConexao = "DRIVER={Microsoft Access Driver (*.mdb)}; DSN=admonline;"
Set ObjConexao = Server.CreateObject("ADODB.Connection")
ObjConexao.Open strConexao
%>

 

 

Cara adicionei o codigo mas nao rodou!!!!

 

Como chamo o banco de dados nas páginas?

Compartilhar este post


Link para o post
Compartilhar em outros sites

Qual a mensagem de erro?

Compartilhar este post


Link para o post
Compartilhar em outros sites

Ae galera consegui resolver o erro acima, mas começou a dar esse abaixo:

 

CODE

Microsoft JScript compilation error '800a03f7'

 

Unterminated string constant

 

/admonline/Connections/conn_teste.asp, line 9

 

MM_conn_teste_STRING = "Driver={Microsoft Acess Driver (*.mdb)};

----------------------------------------------------------------^

O código dessa page está abaixo, e a linha grifada é a que apresenta o erro:

 

 

CODE
<%

// FileName="Connection_odbc_conn_dsn.htm"

// Type="ADO"

// DesigntimeType="ADO"

// HTTP="true"

// Catalog=""

// Schema=""

// Dim MM_conn_teste_STRING

MM_conn_teste_STRING = "Driver={Microsoft Acess Driver (*.mdb)};

DBQ=D:\wwww40\admonline\dados\teste.mdb"

%>

 

O servidor que to testando é o websamba.

 

Alguma super dica???

 

 

Vlw!

Compartilhar este post


Link para o post
Compartilhar em outros sites

Você quebrou linha... não pode.

MM_conn_teste_STRING = "Driver={Microsoft Acess Driver (*.mdb)};

DBQ=D:\wwww40\admonline\dados\teste.mdb"

 

 

Tem que ser:

MM_conn_teste_STRING = "Driver={Microsoft Acess Driver (*.mdb)}; DBQ=D:\wwww40\admonline\dados\teste.mdb"

Compartilhar este post


Link para o post
Compartilhar em outros sites

Putzzzzzz.....

 

 

 

 

Quase deu certo!!!!

 

 

 

Olha só, acho que ta faltando so um detalhe!

 

 

CODE
aaaaaa

 

Microsoft OLE DB Provider for ODBC Drivers error '80004005'

 

[Microsoft][ODBC Driver Manager] Data source name not found and no default driver specified

 

/admonline/web/index.asp, line 8

 

 

 

Ajuda ae!

Compartilhar este post


Link para o post
Compartilhar em outros sites

O caminho e o nome do banco estao certos?

Compartilhar este post


Link para o post
Compartilhar em outros sites

usei aquele código para descobrir o caminho real do site. O nome do BD tb, mas não funcionou. O que devo fazer???

 

 

Vale ressaltar que estou testando no websamba!

 

 

O código ta assim:

 

 

<%
// FileName="Connection_odbc_conn_dsn.htm"
// Type="ADO"
// DesigntimeType="ADO"
// HTTP="true"
// Catalog=""
// Schema=""
// Dim MM_conn_teste_STRING
MM_conn_teste_STRING = "Driver={Microsoft Acess Driver (*.mdb)};
DBQ=D:\wwww40\admonline\dados\teste.mdb"
%>

 

Mas acho que esse problema e no servidor, uso o websamba pra teste! http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif

Compartilhar este post


Link para o post
Compartilhar em outros sites

usei aquele código para descobrir o caminho real do site. O nome do BD tb, mas não funcionou. O que devo fazer???

 

 

Vale ressaltar que estou testando no websamba!

 

 

O código ta assim:

 

 

<%

// FileName="Connection_odbc_conn_dsn.htm"

// Type="ADO"

// DesigntimeType="ADO"

// HTTP="true"

// Catalog=""

// Schema=""

// Dim MM_conn_teste_STRING

MM_conn_teste_STRING = "Driver={Microsoft Acess Driver (*.mdb)};

DBQ=D:\wwww40\admonline\dados\teste.mdb"

%>

 

 

Mas acho que esse problema e no servidor, uso o websamba pra teste! http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif

 

Alguem consegue me ajudar a resolver esse problema???

Compartilhar este post


Link para o post
Compartilhar em outros sites

Brother... vamos manter a ordem aí.

 

Ontem você já infringiu uma regra do fórum e foi "relevado". Hoje está fazendo a mesma coisa.

 

Deixa o tópico aí que quando alguém tiver disponibilidade vai lhe ajudar.

Compartilhar este post


Link para o post
Compartilhar em outros sites

Brother... vamos manter a ordem aí.

 

Ontem você já infringiu uma regra do fórum e foi "relevado". Hoje está fazendo a mesma coisa.

 

Deixa o tópico aí que quando alguém tiver disponibilidade vai lhe ajudar.

 

 

Não entendi bem sua colocação. O que fiz ontem?

Compartilhar este post


Link para o post
Compartilhar em outros sites

Bom Dia !

 

Flneves, olha só:

 

MM_conn_teste_STRING = "Driver={Microsoft Acess Driver (*.mdb)};

DBQ=D:\wwww40\admonline\dados\teste.mdb"

 

A linha onde está o dbq tem que ser assim :

 

MM_conn_teste_STRING = "Driver={Microsoft Acess Driver (*.mdb)}; DBQ=D:\wwww40\admonline\dados\teste.mdb"

 

O Hargon já disse isso.

 

Se o problema é no servidor, leia as regras deles.

Qualquer coisa, seleciona o texto com as regras e cola no translate.google.com e manda traduzir.

 

Abraços,

Vinicius Ianni

Compartilhar este post


Link para o post
Compartilhar em outros sites

Fala rapaziada, beleza?

 

Se o seu banco não tiver senha e se você tiver configurado sua DSN corretamente sua conexão estava certa. O erro "[Microsoft][Driver ODBC para Microsoft Access] Não foi possível usar '(desconhecido)'. O arquivo já está em uso." ocorre devido a falta de permissões no diretório onde está o seu .mdb. Verifique se o usuário configurado para acessar o seu site no IIS possui permissão de leitura e escrita no diretório onde está o banco de dados.

 

Qualquer problema poste aí q eu tento ajudar.

 

Abraços,

Jonas

Compartilhar este post


Link para o post
Compartilhar em outros sites

Fala rapaziada, beleza?

 

Se o seu banco não tiver senha e se você tiver configurado sua DSN corretamente sua conexão estava certa. O erro "[Microsoft][Driver ODBC para Microsoft Access] Não foi possível usar '(desconhecido)'. O arquivo já está em uso." ocorre devido a falta de permissões no diretório onde está o seu .mdb. Verifique se o usuário configurado para acessar o seu site no IIS possui permissão de leitura e escrita no diretório onde está o banco de dados.

 

Qualquer problema poste aí q eu tento ajudar.

 

Abraços,

Jonas

 

 

Jonas,

 

 

Liberei as permissões, vou testar cara assim que possível te respondo.

 

 

Obrigado pela sua ajuda!

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.