Ir para conteúdo

POWERED BY:

Arquivado

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

xhelton

inserir dados na tabela

Recommended Posts

Alguem sabe oque ta errado no meu codigo para inserir dados no banco de dados?

 

dim anodim ano2ano=mid(Request.FORM("ano"), 3, 4)+"0"ano2=Request.FORM("dia")+"/"+Request.FORM("mes")+"/"+Request.FORM("ano")Set Conexao = Server.CreateObject("ADODB.Connection")Conexao.Open "DBQ=d:\www\colegioservosdemaria.com.br\db\colegio.mdb;Driver={Microsoft Access Driver (*.mdb)}"ComandoSQL = "INSERT INTO cadastro (ano, ano2, nome, telefone, cidade, estado, descricao, mail)"ComandoSQL = ComandoSQL & " VALUES ("ComandoSQL = ComandoSQL & "" & ano & ", "ComandoSQL = ComandoSQL & "" & ano2 & ", "ComandoSQL = ComandoSQL & "" & (Request.FORM("nome")) & ", "ComandoSQL = ComandoSQL & "" & (Request.FORM("telefone")) & ", "ComandoSQL = ComandoSQL & "" & (Request.FORM("cidade")) & ", "ComandoSQL = ComandoSQL & "" & (Request.FORM("estado")) & ", "ComandoSQL = ComandoSQL & "" & (Request.FORM("descricao")) & ", "ComandoSQL = ComandoSQL & "" & (Request.FORM("mail")) & ", "ComandoSQL = ComandoSQL & ")"Set bd = Conexao.Execute(ComandoSQL)Conexao.CloseSet bd = NothingSet Conexao = Nothing

Obrigado

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.