Close;
SQL.Clear;
SQL.Add('INSERT Operater(Department,Right_1,Right_2,Right_3,PassWord,Stamp) VALUES(:Department,:right_1,:right_2,:right_3,:PassWord,GETDATE())');
Parameters.ParamByName('Department').Value := edt2.Text; //不能是中文
Parameters.ParamByName('right_1').Value := right_1;
Parameters.ParamByName('right_2').Value := right_2;
Parameters.ParamByName('right_3').Value := right_3;
Parameters.ParamByName('PassWord').Value := edt2.Text;
ExecSQL;
注释的地方如果是中文会报:应用程序在当前操作中使用了错误类型的值. 这个错,如果是数字的话就能顺利插入
修改语句的话此处输入任何字符都能成功修改
如下:
Close;
SQL.Clear;
SQL.Add('UPDATE Operater SET PassWord=:PassWord,Right_1=:right_1,Right_2=:right_2,Right_3=:right_3,Department=:Department,stamp=GETDATE() where Id=' + Form2.edt1.Text);
Parameters.ParamByName('PassWord').Value := Trim(edt2.Text);
Parameters.ParamByName('right_1').Value := Trim(right_1);
Parameters.ParamByName('right_2').Value := Trim(right_2);
Parameters.ParamByName('right_3').Value := Trim(right_3);
Parameters.ParamByName('Department').Value := Trim(edt3.Text);
ExecSQL;
用的是Sqlserver数据库,数据类型是varchar
SQL.Clear;
SQL.Add('INSERT Operater(Department,Right_1,Right_2,Right_3,PassWord,Stamp) VALUES(:Department,:right_1,:right_2,:right_3,:PassWord,GETDATE())');
Parameters.ParamByName('Department').Value := edt2.Text; //不能是中文
Parameters.ParamByName('right_1').Value := right_1;
Parameters.ParamByName('right_2').Value := right_2;
Parameters.ParamByName('right_3').Value := right_3;
Parameters.ParamByName('PassWord').Value := edt2.Text;
ExecSQL;
注释的地方如果是中文会报:应用程序在当前操作中使用了错误类型的值. 这个错,如果是数字的话就能顺利插入
修改语句的话此处输入任何字符都能成功修改
如下:
Close;
SQL.Clear;
SQL.Add('UPDATE Operater SET PassWord=:PassWord,Right_1=:right_1,Right_2=:right_2,Right_3=:right_3,Department=:Department,stamp=GETDATE() where Id=' + Form2.edt1.Text);
Parameters.ParamByName('PassWord').Value := Trim(edt2.Text);
Parameters.ParamByName('right_1').Value := Trim(right_1);
Parameters.ParamByName('right_2').Value := Trim(right_2);
Parameters.ParamByName('right_3').Value := Trim(right_3);
Parameters.ParamByName('Department').Value := Trim(edt3.Text);
ExecSQL;
用的是Sqlserver数据库,数据类型是varchar