GARANTIR DESCONTO

Fórum ParamByName #181890

12/09/2003

0

Oi Pessoal minha aplicação é composta por um DataModule(DM) que contém um ADOConnection, ADOQuery(Qaux2) e etc... a base de dados é MS Access. Estava tentando realizar este insert só que na hora de compilar, ele reclama do ParamByName. Este código tirei de um livro de SQLServer. Gostaria de saber se com o Access posso realizar o insert utilizando essa estrutura? Se sim, quais são os procedimentos que tenho que seguir?.


With DM.Qaux2 do
begin
Sql.Clear;
Sql.Add(´ INSERT INTO tbCLIENTES´);
Sql.Add(´ VALUES( :nome, :endereco , :cidade, :bairro, :cep, :uf, :nascimento, :dddt, :telefone, :dddc, :celular, :email, :sexo, :vip)´);
ParamByName(´nome´).value:=ENome.Field.AsString;
ParamByName(´endereco´).value:=EEndereco.Field.AsString;
ParamByName(´cidade´).value:=ECidade.Field.AsString;
ParamByName(´bairro´).value:=EBairro.Field.AsString;
ParamByName(´cep´).value:=ECep.Field.AsString;
ParamByName(´uf´).value:=EUf.Field.AsString;
ParamByName(´nascimento´).value:=ENascimento.Field.AsString;
ParamByName(´dddt´).value:=EDddt.Field.AsString;
ParamByName(´telefone´).value := ETelefone.Field.AsString;
ParamByName(´dddc´).value := EDddc.Field.AsString;
ParamByName(´celular´).value := ECelular.Field.AsString;
ParamByName(´email´).value := EEmail.Field.AsString;
ParamByName(´sexo´).value := ESexo.Field.AsString;
ParamByName(´vip´).value := EVip.Field.AsString;
ExecSQL;
End;
OBS: os campos são TDBEDIT

Obrigada pela atenção


Angela

Angela

Responder

Posts

13/09/2003

Joilson_gouveia

O Componente ADOQuery tem a propriedade [b:5e48ee94f5]ParamByName[/b:5e48ee94f5] ligada à propriedade [b:5e48ee94f5]Parameters[/b:5e48ee94f5]:

ADOQuery1.[b:5e48ee94f5]Parameters.ParamByName[/b:5e48ee94f5](´CAMPO1´).Value := ....


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar