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 0x938 Thread 0xa90 DBC 0x20a3ca4 Jet' do Registro.
/hpgoal/excluir.asp, line 5
To fazendo um código q num funciona nem a pau, por favor deem uma olhada e me falem o q ta errado!!
Pergunta
Guest Daniel Peron
alguém sabe q erro é esse:?
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 0x938 Thread 0xa90 DBC 0x20a3ca4 Jet' do Registro.
/hpgoal/excluir.asp, line 5
To fazendo um código q num funciona nem a pau, por favor deem uma olhada e me falem o q ta errado!!
<html>
<head>
<title>Pega IP!</title>
<%
'Procedimentos utilizados no Site Busca Ip
'Variáveis
Dim ConStr 'String de conexão
Dim Conexao 'Objeto de conexão
Dim Sql 'Limpa e Grava Ip
Dim rs 'Resultado do Select
Set Conexao = CreateObject("ADODB.CONNECTION")
conStr ="DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("bdIpAdress")
Sub AbreConexao()
conexao.Open (conStr)
end sub
sub fechaconexao()
conexao.close
end sub
AbreConexao
Sql = "DELETE ipadress FROM ipadress"
conexao.execute(Sql)
Sql = "INSERT INTO ipatual(ipadress) VALUES ('" & Request.QueryString("ip") & "')"
conexao.execute(Sql)
Sql = "SELECT IpAdress FROM ipatual"
set rs = server.createobject("ADODB.RecordSet")
rs.Open Sql,conexao,3,1
if not rs.eof then
response.Write rs("ipadress")
end if
rs.close
set rs=nothing
set conexao=nothing
%>
</head>
<body>
</body>
</html>
Valeu!!!
Link para o comentário
Compartilhar em outros sites
7 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.