Gravação de dados em BD Acess com Asp

[benevhides 0]

Bom dia,

 

Estou tentando gravar os dados de um formulario em um bd no acess. Porém retorna o seguinte erro:

 

Tipo de erro:

Microsoft JET Database Engine (0x80004005)

Erro não especificado

/conexaobd5.asp, line 4

 

 

Esses são os codigos que estou utlizando:

 

arquivo: acessopol.asp

 

<!-- #include file="conexaobd5.asp" -->

<!-- #include file="ADOVBS.inc" -->

<%

 

dim conconexao

 

'Aqui você pode inserir mais dados, siga o exemplo abaixo

 

Session("cod") = Request.Form("cod")

Session("Local") = Request.Form("Local")

Session("Renach") = Request.Form("Renach")

Session("Solicitante") = Request.Form("Solicitante")

Session("Operador") = Request.Form("Operador")

Sub ProcessaPagina

 

Dim rs

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

rs.open "form", conconexao, adOpenDynamic, adlockoptimistic, adcmdtable

 

rs.Addnew

 

'Aqui você pode inserir mais dados, siga o exemplo abaixo

 

rs.fields("Local") = Session("Local")

rs.fields("Renach") = Session("Renach")

rs.fields("Solicitante") = Session("SOlicitante")

rs.fields("Operador") = Session("Operador")

rs.update

end sub

 

processapagina

%>

 

 

arquivo: conexãobd5.asp

 

<%@ Language=VBScript %>

<%

Set conex = Server.CreateObject ("ADODB.Connection")

conex.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("visual1.mdb")&";"

%>

 

Tentei usar o seguinte codigo para o arquivo conexãobd5

 

<%@ Language=VBScript %>

<%

option explicit

 

dim connstring

 

response.expires=-1

 

Set conconexao = Server.CreateObject("ADODB.Connection")

conconexao.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("visual1.mdb")

%>

 

 

o erro que retorna é seguinte:

 

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 0xcf0 Thread 0xa34 DBC 0x14cc7b4 Jet' do Registro.

/conexaobd5.asp, line 10

 

 

neste ultimo caso ja tenho um formulario funcionando no mesmo modelo, mas o novo não funciona. Por favor me ajudem.

[Gutoffline 1]

Você ja verificou as permissões de acesso ao banco de dados? Voc~e está utilizando local em seu computador ou está em um servidor?