Provider erro '80004005'

[Alessancost 0]

Olá pessoal,

 

Estou empolgado, pois finalmente estou fazendo um teste online. E já tenho alguns erros que não aparece em meus testes ofline.

 

Provider erro '80004005'

 

Erro não especificado

 

\\10.0.0.10\S_THIALEWEB.COM.BR\PRINCIPAL\../download/pcp_download.asp, line 5

pcp_download.asp

04 Set rs = Server.CreateObject("ADODB.Recordset")

05 rs.Open Sql, ConStr, 3, 3

06 Sql1 = "SELECT * FROM download_categorias"

 

O que poderia esta ocasionando isso?

 

Obrigado http://forum.imasters.com.br/public/style_emoticons/default/joia.gif

[Twunay 1]

Coloca a linha 5 no lugar da 6 e a 6 no lugar da 5...

 

 

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

Sql1 = "SELECT * FROM download_categorias"

rs.Open Sql1, ConStr, 3, 3

 

 

També estava faltando o Sql1 no

05 rs.Open Sql, ConStr, 3, 3

 

tenta agora... Quem sabe...

Twunay

[Alessancost 0]

Não funcionou

 

Provider erro '80004005'

 

Erro não especificado

 

\\10.0.0.10\S_THIALEWEB.COM.BR\PRINCIPAL\../download/pcp_download.asp, line 6

04 Set rs = Server.CreateObject("ADODB.Recordset")

05 Sql1 = "SELECT * FROM download_categorias"

06 rs.Open Sql1, ConStr, 3, 3

 

O interessante que esse erro não ocorre em off...

Na verdade não faltava nada veja o código completo

 

<% AbreConexao       Sql = "SELECT * FROM download"    Set rs = Server.CreateObject("ADODB.Recordset")            rs.Open Sql, ConStr, 3, 3       Sql1 = "SELECT * FROM download_categorias"    Set rs1 = Server.CreateObject("ADODB.Recordset")            rs1.Open Sql1, ConStr, 3, 3 %>

[dark0 0]

hmmnao acontece off?faz um teste aí..muda a pasta onde está o banco de dados.. coloca ela em algum lugar com permissao de escrita.. e conecta usando o caminho fisico do banco..eu fiz isso uma vez e resolveu..

[Alessancost 0]

muda a pasta onde está o banco de dados.. coloca ela em algum lugar com permissao de escrita.. e conecta usando o caminho fisico do banco..

Mudar para onde? Como seria um lugar com permissao descrita?

[Alessancost 0]

Eu estou desnorteado :wacko: , pois tenho três erros iguais aqui, vejo o próximo...

 

Microsoft OLE DB Provider for ODBC Drivers erro '80004005' [Microsoft][Driver ODBC para Microsoft Access]Erro geral Não é possível abrir a chave 'Temporary (volatile) Jet DSN for process 0x474 Thread 0x299c DBC 0x21e2274 Jet' do Registro. \\10.0.0.10\S_THIALEWEB.COM.BR\PRINCIPAL\../artigo/pcp_artigo.asp, line 14

Esse é o código

<link href="../estilo.css" rel="stylesheet" type="text/css">  <%	'-------------------------------------------------- 	' FUNÇÃO CONTAGEM DE ARTIGOS	'--------------------------------------------------      url_conexao = Server.MapPath("../banco/banco.mdb")     set conexao = Server.CreateObject("ADODB.Connection")     conexao.open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&url_conexao     strSql = "SELECT count (idnot) AS Total FROM artigos"     set totalartigos = conexao.execute(strSql) %><div class="td03dm"><div class="fundo01t" style="float:left;"><a href="../artigo/menu.asp" target="conteudo" onClick="changeTitle('Artigos');"><img src="../img/02_seta_5.gif" width="15" height="10" border="0">Artigos</a></div><div class="fundo04t" align="right">Fizeram um total de <strong><%=totalartigos("total")%></strong> artigos.</div> <div id="artigo1" style="display:block;">     <% 	'-------------------------------------------------- 	' OS 10 ULTIMOS ARTIGOS	'--------------------------------------------------    cnpath="DBQ=" & Server.MapPath("../banco/banco.mdb")    DataSource = "Driver={Microsoft Access Driver (*.mdb)}; " & cnpath      Set Conn = Server.CreateObject("ADODB.Connection")      Conn.Open DataSource     Set RS = Server.CreateObject( "ADODB.Recordset" )   RS.ActiveConnection = conn   RS.open "SELECT TOP 10 titulo, autor, data,idnot FROM artigos order by idnot desc" %>

[adriano 0]

Primeiro de tudo... defina um padrão para seus códigos... Você tem 3 conexões, com nomes diferentes, duas delas em uma única página.

 

ConStr (que eu não vi a definição);

set conexao = Server.CreateObject("ADODB.Connection");

Set Conn = Server.CreateObject("ADODB.Connection");

Escolha uma e mantenha um padrão, lembre-se que não há necessidade de fazer 2 conexões numa mesma página, use somente uma.

 

Na hora de fazer instruções SQL, evite fazer variáveis, assim como você fez no último trecho de código que postou... elas, pelo menos pra mim, atrapalham. Eu sempre faço assim:

 

ASP

[*]SET rs = Server.CreatObject("ADODB.RecordSet")

 

[*]rs.Open "SELECT * FROM tabela ... ", Conn, 3

 

 

Sobre seu erro de conexão... O endereço do bd está certo?

[Alessancost 0]

O endereço do bd está certo! Tanto que testes em offline não aparece nenhum erro... Vou tentar fazer tudo conforme você disse- Obrigado http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif

[dark0 0]

amigo, isso aí, pode ser problemas de permissão.veja em seu servidor, qual pasta tem permissão de escrita.geralmente ela está fora de WWWROOT

[Alessancost 0]

Eu não sei mais o que fazer... :unsure: o desespero tomou conta de mim :wacko: ... Gostaria de uma luz.

Eu isolei o código que apresenta o erro aqui

 

Obrigado

[dark0 0]

not found..

[Mário Monteiro 179]

not found..

exato