Fórum Qual a Sintaxe Correta? ( ADO ) #179636
04/09/2003
0
ADOConnection1.Connected := true;
ADOQuery1.Active := true;
ADOQuery1.Append;
ADOQuery1.FieldValues[´NomeDoCampo1´]:= edit1.text
ADOQuery1.FieldValues[´NomeDoCampo2´]:= edit2.text
ADOQuery1.FieldValues[´NomeDoCampo3´]:= edit3.text
ADOQuery1.Post;
ADOQuery1.Active := false;
ADOConnection1.Connected := false;
Valeu mesmo.
t +
ADOQuery1.Active := true;
ADOQuery1.Append;
ADOQuery1.FieldValues[´NomeDoCampo1´]:= edit1.text
ADOQuery1.FieldValues[´NomeDoCampo2´]:= edit2.text
ADOQuery1.FieldValues[´NomeDoCampo3´]:= edit3.text
ADOQuery1.Post;
ADOQuery1.Active := false;
ADOConnection1.Connected := false;
Valeu mesmo.
t +
Shuljenko
Curtir tópico
+ 0
Responder
Posts
04/09/2003
Okama
Seguindo esse conseito eu usaria table...
...
Com Query use SQL.
...
AdoTable1.Insert; AdoTable1.FieldByName(´NomedoCampo´).Value := Edit1.text; bla bla bla AdoTable1.Post;
Com Query use SQL.
Responder
Gostei + 0
04/09/2003
Shuljenko
Era isso mesmo Obrigado!
Responder
Gostei + 0
04/09/2003
Adriano Santos
Eu usaria assim:
AdoTable1.FieldByName(´NomedoCampo´).AsString := Edit1.text;
AdoTable1.FieldByName(´NomedoCampo´).AsInteger := 100;
etc
já tive problemas com o .Value.
AdoTable1.FieldByName(´NomedoCampo´).AsString := Edit1.text;
AdoTable1.FieldByName(´NomedoCampo´).AsInteger := 100;
etc
já tive problemas com o .Value.
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)