一个关于SQL字符串的问题,在线等,很急,请高手帮帮忙.

Question

Lkp_hs_type.CommandText := 'SELECT tbl_detail_type.detailtype_name '
           + ' FROM Tbl_detail_type '
           + ' Where tbl_detail_type.Acc_id = ' + QuotedStr(Dm_Frm.sAcc_id)
           +'and tbl_detail_type.detailtype_code in (select tbl_account_itemtype_hs.detailtype_code from tbl_account_itemtype_hs,tbl_trans_kmxxdyb'
           +'where tbl_account_itemtype_hs.acc_id= '+ QuotedStr(DM_Frm.sAcc_id)
           +' and tbl_account_itemtype_hs.account_code ='+QuotedStr(DM_Frm.kmcode)+')'

Answer 1

放到查询分析器里,把 QuotedStr(Dm_Frm.sAcc_id)值改成我要的就没问题.

Answer 2

//注意空格
Lkp_hs_type.CommandText := 'SELECT tbl_detail_type.detailtype_name '
           + ' FROM Tbl_detail_type '
           + ' Where tbl_detail_type.Acc_id = ' + QuotedStr(Dm_Frm.sAcc_id)
           +' and tbl_detail_type.detailtype_code in (select tbl_account_itemtype_hs.detailtype_code from tbl_account_itemtype_hs,tbl_trans_kmxxdyb'
           +' where tbl_account_itemtype_hs.acc_id= '+ QuotedStr(DM_Frm.sAcc_id)
           +' and tbl_account_itemtype_hs.account_code ='+QuotedStr(DM_Frm.kmcode)+')'

Answer 3

数据库中是什么类型的呢?字符串的?这样写试试看:把QuotedStr函数用这种方法来写
'''+dm_Frm.sAcc_id+'''

Answer 4

'号后面最好空一两个格,不然会粘在一起了,你调试一下SQL就明白了~~