corregir values con campos date
Publicado por Bernardo Ortiz (1 intervención) el 15/06/2021 23:49:02
quiero insertar el valor que esta en DateTimePicker1 en una base de datos donde el campo es date quien por favor me pueda corregir el la instrucción sera de gran ayuda
1
2
3
4
5
6
7
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('Insert into tblEntradasSalidasDetalle(lngNoDocumento, strIdComprobante, intItem, strIdProducto, strDescripcion, dblValorUnitario, dblValorBruto, dtmCaducidad, intPeso, intIdBodega, strIdUsuario, dtmActualizacion, strIdDebito, strIdCredito, ');
ADOQuery1.SQL.Add('strIdCentroCosto, strIdComprobanteRef, lngIdDocumentoRef, intItemRef, strIdSucursal, dtmCreacion, strIdUsuarioCreacion, strIdComputadorCreacion, strIdComputador, strAplicacion, intCantidad, strDesRef,strIdPrefijo) ');
ADOQuery1.SQL.Add('Values('+''''+lngNoDocumento1+''''+','+''''+strIdComprobante1+''''+','+''''+intItem1+''''+','+''''+strIdProducto1+''''+','+''''+strDescripcion1+''''+','+''''+dblValorUnitario1+''''+','+''''+dblValorBruto1+''''+','+''''+dtmCaducidad1+''''+','+''''+intPeso1+''''+','+''''+intIdBodega1+''''+','+''+strIdUsuario1+''+','+''''+DateToStr(DateTimePicker1.Date)+'''',+''''+strIdDebito1+''''+','+''''+strIdCredito1+''''+','+''''+strIdCentroCosto1+''''+','+''''+strIdComprobanteRef1+''''+','+''''+lngIdDocumentoRef1+''''+','+''''+intItemRef1+''''+','+''''+strIdSucursal1+''''+','+''+DateToStr(DateTimePicker1.Date)+''+','+''''+strIdUsuarioCreacion1+''''+','+''''+strIdComputadorCreacion1+''''+','+''''+strIdComputador1+''''+','+''''+strAplicacion1+''''+','+''''+intCantidad1+''''+','+''''+strDesRef1+''''+','+''''+strIdPrefijo1+''''+')');
ADOQuery1.ExecSQL;
Valora esta pregunta


0