H
hhwang
Unregistered / Unconfirmed
GUEST, unregistred user!
sql语句如下,fdm.tbl与一foxpro表关联,下面的sql语句对于源表中的一部分记录成功执行,
另外一些记录失败,执行前showmessage(str)看到的结果有一个字符类型字段只有一边单
引号,不知为何?
str:='insert into ['+t_name+'] values(' ;
for i:=0 to fdm.tbl.Fields.Count-2 do
if fdm.tbl.Fields.asstring<>'' then str:=str+''''+trim(fdm.tbl.Fields.text)+''','
else str:=str+'NULL,' ;
if fdm.tbl.Fields[fdm.tbl.Fields.Count-1].asstring<>'' then str:=str+''''+fdm.tbl.Fields[fdm.tbl.Fields.Count-1].asstring+''')'
else str:=str+'NULL)' ;
另外一些记录失败,执行前showmessage(str)看到的结果有一个字符类型字段只有一边单
引号,不知为何?
str:='insert into ['+t_name+'] values(' ;
for i:=0 to fdm.tbl.Fields.Count-2 do
if fdm.tbl.Fields.asstring<>'' then str:=str+''''+trim(fdm.tbl.Fields.text)+''','
else str:=str+'NULL,' ;
if fdm.tbl.Fields[fdm.tbl.Fields.Count-1].asstring<>'' then str:=str+''''+fdm.tbl.Fields[fdm.tbl.Fields.Count-1].asstring+''')'
else str:=str+'NULL)' ;