Qry_Insert.Close; Qry_Insert.SQL.Clear; Qry_Insert.SQL.Add('insert into tabel (filed1)values(:filed1)'); Qry_Insert.ParamByName(filed1).AsString:=Trim(edit.Text); Qry_Insert.Prepare; Qry_Insert.ExecSQL;
先定义ConnectionString ADOConnection1.Execute('insert into <tablename> values('''+trim(edit1.text)+''')');或者用AdoQuery1.Field[i].AsString:=Trim(Edit1.Text);
Qry_Insert.SQL.Clear;
Qry_Insert.SQL.Add('insert into tabel (filed1)values(:filed1)');
Qry_Insert.ParamByName(filed1).AsString:=Trim(edit.Text);
Qry_Insert.Prepare;
Qry_Insert.ExecSQL;
ADOConnection1.Execute('insert into <tablename> values('''+trim(edit1.text)+''')');或者用AdoQuery1.Field[i].AsString:=Trim(Edit1.Text);
adoquery.post;提交保存。
用ADOTable
Append
xx:=xx
POST搞定http://lysoft.7u7.net
adoquery.append;
.
.
.
adoquery.post
ADOQuery1.FieldByName.AsString('kmdm'):=EDIT1.Text ;
ADOQuery1.Close ;
ADOQuery1.SQL.Clear;
ADOQuery1.Parameters.Clear ;
ADOQuery1.SQL.Text:='insert into 表(字段1, 字段2) values(:m1,:m2)';
ADOQuery1.Parameters.ParamByName('m1').Value:='a';
ADOQuery1.Parameters.ParamByName('m2').Value:='b';
// showmessage(ADOQuery1.SQL.Text);
ADOQuery1.ExecSQL;
ADOQuery1.Close;
方法1:使用TADOTable
1、设置ADOTable1的ConnectionString属性——》链接数据库;
2、设置ADOTable1的TableName属性为student;
3、编写Button组件的单击事件,代码为:
ADOTable1.Append;
ADOTable1.FieldByName('sno').AsString:=Edit1.Text;
ADOTable1.FieldByName('sname').AsString:=Edit2.Text;
ADOTable1.Post;
或
ADOTable1.Append;
ADOTable1.Fields[0].AsString:=Edit1.Text;
ADOTable1.Fields[1].AsString:=Edit2.Text;
ADOTable1.Post;
或
ADOTable1.Append;
ADOTable1.FieldValues['sno']:=Edit1.Text;
ADOTable1.FieldValues['sname']:=Edit2.Text;
ADOTable1.Post;方法2:使用TADOQuery
1、设置ADOQuery1的ConnectionString属性——》链接数据库;
2、编写Button组件的单击事件,代码为:
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.ADD('Insert into student values(:no,:name)');
ADOQuery1.Parameters[0].Value:=Edit1.Text;
ADOQuery1.Parameters[1].Value:=Edit2.Text;
ADOQuery1.Prepared;
ADOQuery1.Open;方法3:使用TADOConnection和TADODataSet
1、设置ADOConnection1的ConnectionString属性——》链接数据库;
2、设置ADODataSet1的Connection为ADOConnection1;
3、设置ADODataSet1的CommandType的值为cmdTable;同时设置ADODataSet1的CommandText为数据库表
Student;
4、编写Button组件的单击事件,代码为:
ADODataSet1.Append;
ADODataSet1.FieldByName('sno').AsString:=Edit1.Text;
ADODataSet1.FieldByName('sname').AsString:=Edit2.Text;
ADODataSet1.Post;
或
ADODataSet1.Append;
ADODataSet1.Fields[0].AsString:=Edit1.Text;
ADODataSet1.Fields[1].AsString:=Edit2.Text;
ADODataSet1.Post;
或
ADODataSet1.Append;
ADODataSet1.FieldValues['sno']:=Edit1.Text;
ADODataSet1.FieldValues['sname']:=Edit2.Text;
ADODataSet1.Post;等等......