Jump to content


Photo

Insert Into


  • Faça o login para participar
1 reply to this topic

#1 Serginho Night

Serginho Night

    Novato no fórum

  • Usuários
  • 1 posts
  • Sexo:Masculino
  • Localidade:Barra Bonita

Posted 29/11/2010, 21:21

Olá galera, queria uma ajuda, estou iniciando estudo sobre asp, e estou com problema em uma coisa que acredito que seja facil para muito mas não consigo resolver, e apenas uma pagina de cadastro que envia as informação para um banco access.
da erro nesta lins "set rsInfo = adoCon.Execute("INSERT INTO cadastro "
acho q ta meio certo, peguei todos os dados do formulario e queria enviar para o banco.


<%
nome = Request.Form("nome")
sobrenome = Request.Form("sobrenome")
email = Request.Form("email")
nascimento = Request.Form("nascimento")
login = Request.Form("login")
senha = Request.Form("senha")
curso = Request.Form("curso")
periodo = Request.Form("periodo")


'Declarando variáveis
Dim adoCon, strCon, rsInfo
Dim caminho_banco

'Definindo caminho do banco
caminho_banco = Server.MapPath("dados/banco.mdb")

'Definindo string de conexão
strCon = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & caminho_banco

'Criando objeto
Set adoCon = Server.CreateObject("ADODB.Connection")

'Abrindo conexão
adoCon.Open strCon

set rsInfo = adoCon.Execute("INSERT INTO cadastro (nome,sobrenome,email,nascimento,login,senha,curso,periodo) VALUES ('"& nome &","& sobrenome &","& email &","& nascimento &","& login &","& senha &","& curso &","& periodo &"')")

'Fechando conexão
adoCon.Close
Set adoCon = Nothing

response.write("enviada com sucesso")

%>

o que ta dando

#2 Loui

Loui

    Novato no fórum

  • Usuários
  • 3 posts
  • Sexo:Masculino

Posted 09/02/2011, 14:34

Olá galera, queria uma ajuda, estou iniciando estudo sobre asp, e estou com problema em uma coisa que acredito que seja facil para muito mas não consigo resolver, e apenas uma pagina de cadastro que envia as informação para um banco access.
da erro nesta lins "set rsInfo = adoCon.Execute("INSERT INTO cadastro "
acho q ta meio certo, peguei todos os dados do formulario e queria enviar para o banco.


<%
nome = Request.Form("nome")
sobrenome = Request.Form("sobrenome")
email = Request.Form("email")
nascimento = Request.Form("nascimento")
login = Request.Form("login")
senha = Request.Form("senha")
curso = Request.Form("curso")
periodo = Request.Form("periodo")


'Declarando variáveis
Dim adoCon, strCon, rsInfo
Dim caminho_banco

'Definindo caminho do banco
caminho_banco = Server.MapPath("dados/banco.mdb")

'Definindo string de conexão
strCon = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & caminho_banco

'Criando objeto
Set adoCon = Server.CreateObject("ADODB.Connection")

'Abrindo conexão
adoCon.Open strCon

set rsInfo = adoCon.Execute("INSERT INTO cadastro (nome,sobrenome,email,nascimento,login,senha,curso,periodo) VALUES ('"& nome &","& sobrenome &","& email &","& nascimento &","& login &","& senha &","& curso &","& periodo &"')")

'Fechando conexão
adoCon.Close
Set adoCon = Nothing

response.write("enviada com sucesso")

%>

o que ta dando


mude essa linha e veja se resolve:
StrCon = "INSERT INTO cadastro (nome,sobrenome,email,nascimento,login,senha,curso,periodo) VALUES ('"& nome &"','"& sobrenome &"','"& email &"','"& nascimento &"','"& login &"','"& senha &"','"& curso &"','"& periodo & "')"
set rsInfo = adoCon.Execute(StrCon)

Você esqueceu de colocar ' nos valores.
Espero ter ajudado




1 user(s) are reading this topic

0 membro(s), 1 visitante(s) e 0 membros anônimo(s)

IPB Skin By Virteq