Board index » delphi » Command Executes but No Record Inserted
Rhea Grason
Delphi Developer |
Command Executes but No Record Inserted2004-09-18 04:27:05 AM delphi232 I am new to ADO and SQL Server. I am trying to insert a record into a table in a SQLServer database. Here is what I have in code: with ADOCommand2 do begin Parameters[0].Value := Query_GetLastImportIDT5MAXimport_dataimpdata_id.value + 1; Parameters[1].Value := 'ORDERs'; Parameters[2].Value := 'U'; Parameters[3].Value := Query_OrdersOrdernum.newvalue + ',' + IntToStr(Query_ItemsItem.newvalue) + ',' + Query_ItemsProdcode.newvalue + ',' + Query_GetRoutingRouting.AsString + ',' + Query_CustsCompany1.AsString + ',' + FloatToStr(Query_ItemsQuantity.newvalue) + ',' + sRevQty + ',' + sReqdate + ',' + sOrderdate + ',' + sCurDateTime + ',' + sDeliverTo + ',' + sOrderCode; Execute; showmessage('after executed ' + IntToStr(Query_GetLastImportIDT5MAXimport_dataimpdata_id.value + 1)); end; The showmessage line is executed therefore I am assuming the 'Execute' line before it runs. However there is no record inserted into the table. Am I missing something? Thanks. |