Ir para conteúdo

POWERED BY:

Arquivado

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

chacalAM

Que erro é esse?

Recommended Posts

O que é esse erro?--------------------------------------------------------------------------------------------------Microsoft OLE DB Provider for ODBC Drivers error '80004005' [Microsoft][ODBC Driver Manager] Data source name not found and no default driver specified /teste/teste.asp, line 7

Compartilhar este post


Link para o post
Compartilhar em outros sites

você pode colocar o código da "teste.asp"? Esse erro é referente à conexão com o BD.

 

 

Valeu?

Compartilhar este post


Link para o post
Compartilhar em outros sites
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"><html><head><title>Testando</title><meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"></head><body><%DIM conlinkDIM recbuscarconst cntCaminho="link.mdb"Set conlink=Server.CreateObject("ADODB.Connection")Set recbuscar=Server.CreateObject("ADODB.Recordset")conlink.Open "driver={Microsoft Acess Driver (*.mdb)};dbq=" &cntCaminhorecbuscar.Open "busca",conlinkDo While Not recbuscar.EofResponse.Write"Linkado: " & recbuscar.Fields("link")recbuscar.MoveNextlooprecbuscar.closecomlink.close%></body></html>

Compartilhar este post


Link para o post
Compartilhar em outros sites

Aqui:

cntCaminho="link.mdb"
Você indicou somente o nome do banco, é nescessário indicar o caminho completo e o nome para efetuar a conexão, você pode tentar com essa:
cntCaminho=server.mappath("link.mdb")

Nesse caso o BD está na mesma página do ASP!

O Server.MapPath serve para pegar o caminho real do arquivo no servidor.

 

Valeu?

Compartilhar este post


Link para o post
Compartilhar em outros sites

Aparentemente sim, está correto.

Para gravar existem algumas maneiras, usando SQL ou por ADO, como você está usando um RecordSet vou lhe passar um exemplo por ADO

Para adicionar:

recbuscar.addnew
recbuscar.Fields("link")=valor
recbuscar.update

Para atualizar:

recbuscar.Find "link"=valor
recbuscar.Fields("link") = valor
recbuscar.update

Só para acrescentar: nunca se esqueça de fechar e depois destruir os RecordSets e as Conexões com o bd para liberar memória do servidor.

recbuscar.close
set recbuscar= nothing
comlink.close
set comlink= nothing

 

Valeu?

Compartilhar este post


Link para o post
Compartilhar em outros sites

Salgado olhe o q deu agora

 

Microsoft VBScript compilation error '800a0415' Expected literal constant /teste/teste.asp, line 12 const cntCaminho=server.mappath("link.mdb")-------------------------------------------^

Compartilhar este post


Link para o post
Compartilhar em outros sites

O código todo esta assim

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"><html><head><title>Testando</title><meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"></head><body><%DIM conlinkDIM recbuscarconst cntCaminho=server.mappath("link.mdb")Set conlink=Server.CreateObject("ADODB.Connection")Set recbuscar=Server.CreateObject("ADODB.Recordset")conlink.Open "driver={Microsoft Acess Driver (*.mdb)};dbq=" &cntCaminhorecbuscar.Open "busca",conlinkDo While Not recbuscar.EofResponse.Write"Linkado: " & recbuscar.Fields("link")recbuscar.MoveNextlooprecbuscar.closecomlink.close%></body></html>

Valeu pela força q vocÊ esta me dando!!!

Compartilhar este post


Link para o post
Compartilhar em outros sites

Tire esse "const", e testa

Compartilhar este post


Link para o post
Compartilhar em outros sites

deu esse erro agora

Microsoft OLE DB Provider for ODBC Drivers error '80004005' [Microsoft][ODBC Driver Manager] Data source name not found and no default driver specified /teste/teste.asp, line 15

Compartilhar este post


Link para o post
Compartilhar em outros sites

O arquivo "link.mdb" está na mesma pasta que o "teste.asp"?

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.