INSERT SQL
Olá amigos, como inserir registros nas tabelas ?
estou fazendo assim, mas esta dando erro no cmd.execute! Em access eu fazia assim e dava certo!
cAdd = "INSERT INTO clientes ( " & _
"id , " & _
"nome , " & _
"endereco , " & _
"nascimento , " & _
"observacao ) VALUES ("
cAdd = cAdd & _
txtId.Text & "," & _
txtNome.Text & "," & _
txtEndereco.Text & "," & _
txtTelefone.Text & "," & _
txtobs.Text & ")"
MsgBox cAdd
Set cmd = New ADODB.Command
With cmd
.ActiveConnection = db
.CommandText = cAdd
End With
cmd.Execute (cAdd)
estou fazendo assim, mas esta dando erro no cmd.execute! Em access eu fazia assim e dava certo!
cAdd = "INSERT INTO clientes ( " & _
"id , " & _
"nome , " & _
"endereco , " & _
"nascimento , " & _
"observacao ) VALUES ("
cAdd = cAdd & _
txtId.Text & "," & _
txtNome.Text & "," & _
txtEndereco.Text & "," & _
txtTelefone.Text & "," & _
txtobs.Text & ")"
MsgBox cAdd
Set cmd = New ADODB.Command
With cmd
.ActiveConnection = db
.CommandText = cAdd
End With
cmd.Execute (cAdd)
Qual Banco de Dados vc esta usando ? Qual é a mensagem de erro ? Repare tambem que depois de
VALUES ("
cAdd = cAdd & _
vc não esta abrindo aspas(") de novo ...
VALUES ("
cAdd = cAdd & _
vc não esta abrindo aspas(") de novo ...
ta faltando aspas simples em tudo, veja o exemplo corrigido
cAdd = "INSERT INTO clientes ( " & _
"id , " & _
"nome , " & _
"endereco , " & _
"nascimento , " & _
"observacao ) VALUES ("
cAdd = cAdd & _
txtId.Text & ",'" & _
txtNome.Text & "','" & _
txtEndereco.Text & "','" & _
txtTelefone.Text & "','" & _
txtobs.Text & "')"
cAdd = "INSERT INTO clientes ( " & _
"id , " & _
"nome , " & _
"endereco , " & _
"nascimento , " & _
"observacao ) VALUES ("
cAdd = cAdd & _
txtId.Text & ",'" & _
txtNome.Text & "','" & _
txtEndereco.Text & "','" & _
txtTelefone.Text & "','" & _
txtobs.Text & "')"
qual o banco de dados querida?
Tópico encerrado , respostas não são mais permitidas