update = erro
o comando eh esse:
e o erro é esse:
q q tem de errado?
dm.qryClientes.Close; dm.qryClientes.SQL.Clear; dm.qryClientes.SQL.Add(´update clientes set nome = :nome, data = :data, sexo = :sexo,tipo = :tipo, cpfcnpj = :cpf, rg = :rg, endereco = :ende, numero = :n, bairro = :bairro, cidade = :cidade, telefone = :telefone, ´); dm.qryClientes.SQL.Add(´cep = :cep, estado = :estado, email = :email where codigocliente := :codigo´); dm.qryClientes.ParamByName(´codigo´).AsString := edtCodigo.Text; dm.qryClientes.ParamByName(´nome´).AsString := edtNome.Text; dm.qryClientes.ParamByName(´data´).AsDate := edtData.Date; dm.qryClientes.ParamByName(´sexo´).AsString := cmbSexo.Text; dm.qryClientes.ParamByName(´tipo´).AsString := cmbTipo.Text; dm.qryClientes.ParamByName(´cpf´).AsString := mskCPF.Text; dm.qryClientes.ParamByName(´rg´).AsString := edtRG.Text; dm.qryClientes.ParamByName(´ende´).AsString := edtEndereco.Text; dm.qryClientes.ParamByName(´n´).AsString := edtNumero.Text; dm.qryClientes.ParamByName(´bairro´).AsString := edtBairro.Text; dm.qryClientes.ParamByName(´cidade´).AsString := edtCidade.Text; dm.qryClientes.ParamByName(´telefone´).AsString := edtTelefone.Text; dm.qryClientes.ParamByName(´cep´).AsString := mskCEP.Text; dm.qryClientes.ParamByName(´estado´).AsString := cmbEstado.Text; dm.qryClientes.ParamByName(´email´).AsString := edtEmail.Text; dm.qryClientes.ExecSQL;
e o erro é esse:
Incorrect token followed by ":"
q q tem de errado?
Linhares
Curtidas 0
Respostas
Paulo
11/03/2004
vc fez assim
where codigocliente := :codigo´);
e é assim
where codigocliente = :codigo´);
where codigocliente := :codigo´);
e é assim
where codigocliente = :codigo´);
GOSTEI 0