Ir para conteúdo

POWERED BY:

Arquivado

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

Celso Design

Configurar ODBC

Recommended Posts

E ae galera bem eu nem sei mexer em asp tava dando uma fuçada aki esses dias e eh o seguinte peguei uma loja virtual do locaweb ..... e esta acontecendo este erro aki abaixo:

 

 

 

Tipo de erro:

Microsoft OLE DB Provider for ODBC Drivers (0x80004005)

[Microsoft][Driver ODBC para Microsoft Access]Erro geral Não é possível abrir a chave 'Temporary (volatile) Jet DSN for process 0xb9c Thread 0x380 DBC 0x1055024 Jet' do Registro.

/loja/incfaq.asp, line 11

 

 

 

Bem eu naum entendo disso acho q eu tenho q configurar o ODBC para acessar o BD do access acho q eh issu se tiver errado me falem.

 

Bem o global asa esta assim

 

  <!--Caminhos dos arquivos -->	REM -- Deste ponto para baixo não é realmente necessario modificacoes       'Caminhos padrões utilizados pela loja     Application("ServidorSMTP") = "smtp2.locaweb.com.br"     Application("BancoDeDados") = "e:\home\" & Application("Nome") & "\dados\loja51.mdb"     If Application("DBAccess") = 1 Then        Application("StringConexaoODBC") = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Application("BancoDeDados") & ";"     Elseif Application("DBAccess") = 0 Then        Application("StringConexaoODBC") = "PROVIDER=SQLOLEDB.1;DATA SOURCE=" & Application("ServidorSQLServer") & ";DATABASE=" &       Application("Nome") & ";UID=" & Application("Nome") & ";PWD=" & Application("SenhaSQLServer") & ";"     Elseif Application("DBAccess") = 2 Then	Application("StringConexaoODBC") = "DSN=" & Application("DSNInterbase") & ";UID="& Application("UserInterbase") &";PWD=" & Application("SenhaInterbase")     End If     If Application("DirComplementar") = "" Then        Application("URLCompleta") = "http://" & Application("URLdaLoja")        Application("DiretorioRaiz") = "e:\home\" & Application("Nome") & "\web\"         If Instr(Application("SiteSeguro"), "https:") <> 0 Then           Application("CaminhoSeguro") = Application("SiteSeguro") & "/" & Application("Nome")        Else           Application("CaminhoSeguro") = Application("SiteSeguro")        End If     Else        Application("URLCompleta") = "http://" & Application("URLdaLoja") & "/" & Application("DirComplementar")        Application("DiretorioRaiz") = "e:\home\" & Application("Nome") & "\web\" & Application("DirComplementar") & "\"        If Instr(Application("SiteSeguro"), "https:") <> 0 Then           Application("CaminhoSeguro") = Application("SiteSeguro") & "/" & Application("Nome") & "/" & Application("DirComplementar")        Else           Application("CaminhoSeguro") = Application("SiteSeguro") & "/" & Application("DirComplementar")        End If       End If

 

Por favor me ajudemmmmmmmmmmmmmmm

 

 

valeu

Compartilhar este post


Link para o post
Compartilhar em outros sites

faz uma busca no forum que tem muita coisa explicando sobre conexão com o bd!

verifique se você deu permisão para gravar no bd nas propriedades da pasta. verifique se o caminho que esta seu bd é o mesmo que esta no script da loja

 

Application("BancoDeDados") = "e:\home\" & Application("Nome") & "\dados\loja51.mdb"

 

mas faz a busca pq tem muita coisa!!!

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.