ADOQuery1.ExecSQL;//执行~~ADOQuery1.ExecSQL用于对数据库的修改删除更新等操作~~没有返回集
ADOQuery1.Open;//打开~~ADOQuery1.Open用于对数据库的查询等操作~~有返回集 所以~~改为下面的~~ ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add(
'insert into sudent(sudent_ID,name,CREATE_TIME)'+
'values(sudent_ID_GEN.NEXTVAL,'+
''''+Edit2.Text+''''+','+InttoStr(1)+','+'SYSDATE)'
);
ADOQuery1.ExecSQL;
ADOQuery1.Open;//打开~~ADOQuery1.Open用于对数据库的查询等操作~~有返回集 所以~~改为下面的~~ ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add(
'insert into sudent(sudent_ID,name,CREATE_TIME)'+
'values(sudent_ID_GEN.NEXTVAL,'+
''''+Edit2.Text+''''+','+InttoStr(1)+','+'SYSDATE)'
);
ADOQuery1.ExecSQL;
ADOQuery1: missing sql property
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add(
'insert into sudent(sudent_ID,name,XXX,CREATE_TIME)'+
// ~~~差一个字段名
'values(sudent_ID_GEN.NEXTVAL,'+
''''+Edit2.Text+''''+','+InttoStr(1)+','+'SYSDATE)'
);
ADOQuery1.ExecSQL;
师弟这人太马虎了