Erro estranho que aparece de vez em quando...

[Davidmg 0]

Olá galera,

 

Em meu site as vezes quando faço login aparece o seguinte erro:

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 0x530 Thread 0x43c DBC 0x10604c1c Jet' do Registro. /vendas/config.asp, line 7

Linha 7:MyConn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.Mappath("../../databases/vendas.mdb")

As vezes funciona normal, as vezes começa a dar esse erro e demora pra voltar.

OBS:. Não fiz nenhuma alteração nos códigos e sempre funcionou certinho....de uns dias pra cá começou com esse erro.

 

Hospedo os arquivos na Hostnet: www.hostnet.com.br

 

Será que é problrma no servidor deles?

 

Me ajudem...é um site de vendas de combustiveis...não posso ficar com esse problema, o patrão tá bravo já.

 

Valew amigos...

David

[Salgado 4]

Como está o seu banco de dados? Não está grande demais?

[nostrinkes 0]

Uma vez tive este erro ao tentar acessar uma informação no banco eu tinha enviado caracters tipo um (´) apostrofe que era lido como comentário no codigo.

Mais veja se não foi enviado algo para o banco que está atrapalhando na visualizãção das tabelas.

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

veja este link pode ajudar achei aqui no forum mesmo

Temporary (volatile)

[Davidmg 0]

Como está o seu banco de dados? Não está grande demais?

<{POST_SNAPBACK}>

O banco de dados está com 1.700 kb

 

Bem pequeno....

[Davidmg 0]

Acabei de testar o site em outro servidor e não apresenta nenhum erro, acho que o problema é na Hostnet.Vou fazer mais alguns teste....

[Mário Monteiro 179]

cara você tem o bom costume fechar e destruir suas conexoes e recordsets???

[dark0 0]

pode ser o servidor sim..experimente comunicar este erro à eles..explique que em outro servidor nao acontece..

[Davidmg 0]

cara você tem o bom costume fechar e destruir suas conexoes e recordsets???

<{POST_SNAPBACK}>

Sou novato em asp ainda, meu config é assim:

 

ASP

[*] <%

 

[*]Session.TimeOut = 200

 

[*]

 

[*]Set MyConn=Server.CreateObject("ADODB.Connection")

 

[*]MyConn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.Mappath("../../database/vendas.mdb")

 

[*]

 

[*]Sub CleanUp(RS)

 

[*] RS.Close

 

[*] MyConn.Close

 

[*] Set RS = Nothing

 

[*] Set MyConn = Nothing

 

[*]End Sub

 

[*]

 

[*]Sub CleanUp2()

 

[*] MyConn.Close

 

[*] Set MyConn = Nothing

 

[*]End Sub

 

[*]%>

 

David

[dark0 0]

pq 2 funcoes?se a primeira já faz tudo que a segunda faz ..?

[Mário Monteiro 179]

cara mas você usa estas subs sempre?? senão o que pode ter havido é um acumulo de chamadas ao db que não foram destruidas...

[Davidmg 0]

pq 2 funcoes?

se a primeira já faz tudo que a segunda faz ..?

<{POST_SNAPBACK}>

Não sei, peguei pronto e deixei achando que fosse necessário.

[Davidmg 0]

cara mas você usa estas subs sempre?? senão o que pode ter havido é um acumulo de chamadas ao db que não foram destruidas...

<{POST_SNAPBACK}>

Sei que na página de login tem:

 

ASP

[*]CleanUp(RS)

 

Essa acima....

[Davidmg 0]

Várias pessoas acessam o site ao mesmo tempo....entram e saem a todo momento....pode ser isso?

[Mário Monteiro 179]

sub não precisa de um call??? não tou afirmando tou perguntando pois sempre uso assimcall CleanUp(RS)

[Davidmg 0]

sub não precisa de um call??? não tou afirmando tou perguntando pois sempre uso assim

 

call CleanUp(RS)

<{POST_SNAPBACK}>

Sinceramente não sei, mas vou colocar pra fazer um teste.

Mas você acha que não pode ser o servidor mesmo? Pq joguei os arquivos em outro agora e funciona perfeito.

 

David

[Mário Monteiro 179]

cara se você não fechar corretamente as conexoes e recordset vai a acontecer denovo...vai acumulando isso no servidor até que... boom... para de funfar...por isso funcionou normal quando você mudou assim como funcionava normal ou não??

[Davidmg 0]

cara se você não fechar corretamente as conexoes e recordset vai a acontecer denovo...

 

vai acumulando isso no servidor até que... boom... para de funfar...

 

por isso funcionou normal quando você mudou assim como funcionava normal ou não??

<{POST_SNAPBACK}>

Isso mesmo, funcionava normal no outro, depois que começou a fazer isso.

 

Pra fechar as conexões e recordset é só colocar no final RS.close ?

 

Sou fraco em asp ainda...

David

[Mário Monteiro 179]

isso mesmotodo recordset que abrir você fecha e tb set ele como nothingRS.closeSET RS = nothinge faz o mesmo com as conexoes com o db

[Davidmg 0]

isso mesmo

 

todo recordset que abrir você fecha e tb set ele como nothing

 

RS.close

SET RS = nothing

 

e faz o mesmo com as conexoes com o db

<{POST_SNAPBACK}>

Tenho que colocar em todas as páginas?

 

Veja a página que valida o login no site:

ASP

[*]<%

 

[*]Usuario = Replace(Trim(Request.Form("usuario")), "'", "''")

 

[*]Senha = Replace(Trim(Request.Form("senha")), "'", "''")

 

[*]

 

[*]'If Usuario = "" OR Senha = "" Then Response.Redirect "login.asp"

 

[*]

 

[*]SQL = "Select * From Vendedores Order By Codigo"

 

[*]Set RS = MyConn.Execute(SQL)

 

[*]

 

[*]While Not RS.EOF

 

[*] If Usuario = RS("Usuario") And Senha = RS("Senha") Then

 

[*] If RS("ExpireDate") > Now() Then

 

[*] Session("allow") = True

 

[*] Session("clearance") = RS("Clearance")

 

[*] Level = RS("Clearance")

 

[*] Session("id") = RS("Id")

 

[*] Id = RS("Id")

 

[*] Session("codigo") = RS("Codigo")

 

[*] Codigo = RS("Codigo")

 

[*] Session("nome") = RS("Nome")

 

[*] Nome = RS("Nome")

 

[*] Else

 

[*] Response.Redirect "utility.asp?method=expired"

 

[*] End If

 

[*] End If

 

[*] RS.MoveNext

 

[*]Wend

 

[*]

 

[*]CleanUp(RS)

 

[*]

 

[*]If Session("allow") = True Then

 

[*] If Level >= 3 Then Response.Redirect "direciona.asp"

 

[*] If Level = 2 Then Response.Redirect "painel.asp"

 

[*] If Level = 1 Then Response.Redirect "direciona.asp"

 

[*]Else

 

[*] Response.Redirect "login.asp"

 

[*]End If

 

[*]%>

 

David

[Mário Monteiro 179]

a pargunta que não quer calar é se esteCleanUp(RS)esta fazendo o trabalho dele...