with cdsSystem do
begin
CommandText:=CommandText+'insert into T_Customer('+
' CustomerID,Code,Name,'+
' PostalCode,CreateDate,AreaID)'+
' values(:p2,'+
' '''+fieldbyname('Code').asstring+''','+
' '''+fieldbyname('Name').asstring+''','+
' :p3,'+
' :p4,'+
' :p5);';
Params.ParamByName('p2').Value:=fieldbyname('CustomerID').asinteger;
Params.ParamByName('p3').Value:=fieldbyname('PostalCode').AsInteger
Params.ParamByName('p4').Value:=fieldbyname('CreateDate').asdatetime;
Params.ParamByName('p5').Value:=fieldbyname('AreaID').asinteger;
end;
现在我想不用参数赋值,直接把值放 到SQL语句的values()中,但引号的问题总困扰着我,对于字符类型
的值我懂了,但对于这些数值型和日期型应当怎么加引号才对呢
比如:
CommandText:=CommandText+'insert into T_Customer('+
' CustomerID,Code,Name,'+
' PostalCode,CreateDate,AreaID)'+
' values(fieldbyname('CustomerID').asinteger,'+
……
……
这里的fieldbyname('CustomerID').asinteger应该怎么使用引号才正确呢?
对于这些字段,我数据库里用的是NUMBER型和date型(oracle)
请问各位大侠,应该如何做呢?
谢谢~~~!~!~!~!~!
[此贴子已经被作者于2007-4-14 17:00:54编辑过]