SQL的时间问题
火龙岛主 2003-03-06 10:06:12 我是用的是D6+sql server 2000,不知道为什么每次添加记录的时候,日期总是1905-05-06,还有就是如何使用sql server 2000取得系统的单独日期,也就是说在sql server2000中有DateTime 类型,我需要的是只要日期类型中的日期部分,不要时间的那一部分;
插入的语句如下:
procedure TfrmMaterialIn.Material_In_Ins();
var
qrIns:TADOQuery;
begin
try
qrIns:=TADOQuery.Create(Self); //构造TADOQuery组件
with dmoMain do
begin
qrIns.Connection:=ADOcnn;
qrIns.Close;
qrIns.SQL.Clear;
qrIns.SQL.Add('Insert into Material (Name,Type,LbId,Number,Unit,Price,DDate,Sign,Company,Remark)');
qrIns.SQL.Add('Values ('+''''+cboName.Text+''''+','+''''+cboType.Text+''''+','+''''+copy(cboLb.Text,1,3)+''''+',');
qrIns.SQL.Add(edtNumber.Text+','+''''+cboUnit.Text+''''+','+edtPrice.Text+','+dtpDate.Text+',');
qrIns.SQL.Add(''''+'1'+''''+','+''''+cboCompany.Text+''''+','+''''+edtRemark.Text+''''+')');
try
qrIns.ExecSQL;
except
raise exception.Create('数据无法添加到数据库!');
end; //try end
end; //with end
finally
qrIns.Free;
end; //try end
end;