Gravar no Banco

[hy0ga 0]

Olá,

 

criei um formulario de pesquisa com RADION BOTTON e TEXT AREA e quero gravar os dados dessa pesquisa no meu banco de dados com ACESS.

 

bom eu quero saber como posso gravar os dados quando o usuario clicar em ENVIAR.

 

essa conexão q fiz para meu banco esta certa:

 

ASP

[*]

 

[*]set conexao=server.createobject("adodb.connection")

 

[*]dados.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + ";"

 

 

se alguem puder da uma luz pra mim..

 

abraços

[ASP a ASP 0]

Dá uma olhada sobre INSERT aí no forum...

[hy0ga 0]

olha o erro q ta dando quanto tento conectar no banco:[ASP]Microsoft OLE DB Provider for ODBC Drivers (0x80004005)[Microsoft][ODBC Driver Manager] Nome da fonte de dados não encontrado e nenhum driver padrão especificado/carretas/site/grava.asp, line 6[ASP]

[Mário Monteiro 179]

cade o caminho do banco??

[hy0ga 0]

cade o caminho do banco??

<{POST_SNAPBACK}>

estou tentando conectar assim:

 

ASP

[*]

 

[*]set cn=server.createobject("ADODB.Connection")

 

[*]

 

[*]stringconexao="driver={Microsoft Access Driver (*.mdb)};DBQ=" &

 

[*]server.mappath("dados.mdb") & ";"

 

[*]

 

[*]cn.open stringconexao

 

[*]

[Mário Monteiro 179]

o banco esta na mesma pasta onde ta o arquivo asp em questão??

[hy0ga 0]

o banco esta na mesma pasta onde ta o arquivo asp em questão??

<{POST_SNAPBACK}>

sim na mesma pasta dos arquivos ASP..

[hy0ga 0]

Consegui conectar no Banco de Dados:" Set conconexao = Server.CreateObject("ADODB.Connection")conconexao.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("dados.mdb")"agora como posso gravar os dados no banco?!estou com duvida porque meu formulario esta em RADION BOTTON...to precisando urgente...vlws pela força....

[Mário Monteiro 179]

ele vai passar só o que ta marcado...como voce esta pegando e gravando??

[hy0ga 0]

ele vai passar só o que ta marcado...

 

como voce esta pegando e gravando??

<{POST_SNAPBACK}>

eu criei uma tabela pra cada pergunta e gravando assim:

 

'TABELA 1 ///*

Ate20 = request.form("Ate20")

 

Ate30 = request.form("Ate30")

 

Ate40 = request.form("Ate40")

'TABELA 1

 

conconexao.execute("INSERT INTO Tab('Ate20','Ate30','Ate40') VALUES(" & Ate20 & "," & Ate30 & "," & Ate40 & ")")

 

 

mas deu erro no INSERT

 

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 0xe78 Thread 0xfac DBC 0x107ef94 Jet' do Registro.

/carretas/site/grava.asp, line 6

[Marcelo Barcellos 0]

Tá com cara de erro no caminho do Banco.Este erro não ocorre ao abrir a conexão não ?

[hy0ga 0]

Tá com cara de erro no caminho do Banco.

Este erro não ocorre ao abrir a conexão não ?

<{POST_SNAPBACK}>

quando eu conecto ao banco esta normal....

ja fiz o teste

o codigo de conexão q testei e funciono e esse ae:

 

<%

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

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

 

response.write "conexão concluida"

 

%>

[Mário Monteiro 179]

tente selecionar algo pra ver se não dá o mesmo erro

[hy0ga 0]

tente selecionar algo pra ver se não dá o mesmo erro

<{POST_SNAPBACK}>

olha como estou fazendo pra você ter uma noção, vou em partes:

 

1 - olha como esta no meu FORMULARIO, o Radion Botton

 

<form name="form1" method="post" action="grava.asp">

<input name="at20" type="radio" value="">

Ate 20 anos

<input name="at30" type="radio" value="">

de 21 ate 30 anos

<input name="at40" type="radio" value="">

de 31 ate 40 anos

<input name="at50" type="radio" value="">

de 41 ate 50 anos

<input name="ac50" type="radio" value="">

acima de 51 anos

</form>

 

Obs. no Value esta vazio não sei os dados para colocar http://forum.imasters.com.br/public/style_emoticons/default/cry.gif

 

2 - no meu arquivo GRAVA.ASP esta assim:

 

<% Response.Buffer=True %>

 

<%

 

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

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

 

'TABELA 1

At20 = request.form("at20")

At30 = request.form("at30")

At40 = request.form("at40")

at50 = request.form("at50")

ac50 = request.form("ac50")

'TABELA 1

 

conconexao.execute("INSERT INTO perfil('at20','at30','at40','at50','ac50') VALUES(" & at20 & "," & at30 & "," & at40 & "," & at50 & "," & ac50 &")")

 

Conexao.Close

Set Conexao = Nothing

 

%>

 

Obs. esta dando erro no INSERT, o erro segue embaixo:

 

Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)

[Microsoft][Driver ODBC para Microsoft Access] Erro de sintaxe na instrução INSERT INTO.

/carretas/site/grava.asp, line 17

 

 

 

se puder me ajudar.....

ja to ficando doido.. huhuhuh

 

mas ae ja agradecendo pela força..

 

http://forum.imasters.com.br/public/style_emoticons/default/joia.gif

[Mário Monteiro 179]

tente assimconconexao.execute("INSERT INTO perfil (at20,at30,at40,at50,ac50) VALUES (" & at20 & "," & at30 & "," & at40 & "," & at50 & "," & ac50 &")")

[hy0ga 0]

tente assim

 

conconexao.execute("INSERT INTO perfil (at20,at30,at40,at50,ac50) VALUES (" & at20 & "," & at30 & "," & at40 & "," & at50 & "," & ac50 &")")

<{POST_SNAPBACK}>

Não funcionou tb..

da o mesmo erro no INSERT INTO

 

esse erro pode esta acontecendo porque eu não defini o campo dos Value no meu FORM no Radion Botton. Olha como esta o codigo abaixo:

 

form name="form1" method="post" action="grava.asp">

<input name="at20" type="radio" value="">

Ate 20 anos

<input name="at30" type="radio" value="">

de 21 ate 30 anos

<input name="at40" type="radio" value="">

de 31 ate 40 anos

<input name="at50" type="radio" value="">

de 41 ate 50 anos

<input name="ac50" type="radio" value="">

acima de 51 anos

</form>

[hy0ga 0]

Agora começou a dar um monte de pau...o selct funciona normalmente, mas o Insert sempre da erro...olha o codigo q estou usando:<% Response.Buffer=True %><%Set conconexao = Server.CreateObject("ADODB.Connection")conconexao.Open "Driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("dados.mdb")'TABELA 1at20 = Request.form("at20")at30 = Request.form("at30")at40 = Request.form("at40")at50 = Request.form("at50")ac50 = Request.form("ac50")'TABELA 1if at20 = "" thenat20=0end ifif at30 = "" thenat30=0end ifif at40 = "" thenat40=0end ifif at50 = "" thenat50=0end ifif ac50 = "" thenac50=0end ifconconexao.execute("INSERT INTO PERFIL(AT20,AT30,AT40, AT50,AC50) VALUES(1,0,0,0,0)")fazendo testes no values e nda...ja to de cabeça quente...

[Salgado 4]

Que erro aparece no insert?

[hy0ga 0]

Que erro aparece no insert?

<{POST_SNAPBACK}>

Tipo de erro:

Microsoft OLE DB Provider for ODBC Drivers (0x80004005)

[Microsoft][Driver ODBC para Microsoft Access] A operação deve usar uma consulta atualizável.

/carretas/site/grava.asp, line 35

 

 

http://forum.imasters.com.br/public/style_emoticons/default/yay.gif

[Salgado 4]

Erro de permissão, verifique se a pasta e o arquivo de seu BD estão com permissão de escrita.