请问where xxx like ''%'+xxx+'%'' 这样的格式对吗？用adodataset作数据源。

Question

'where xxxxx like '+''''+'%'+xxxxx+'%'+'''' 

Answer 1

if  RBManager.Checked=true then begin
            MainForm.ADOman.Close;                if age='30以下' then begin
                mainForm.Adoman.CommandText:='Select * from manAger where  manager_name like ''%'+ Username +'%'' and Manager_Sex like ''%'+ sex +'%'' and manager_status like ''%'+ shenfen +'%'' and manager_country like ''%'+ outcountry +'%'' and manager_culture like ''%'+ wenhua +'%'' and manager_office like ''%'+ office +'%'' and manager_age <= 30';
                end                else if age='30-50&Euml;ê' then begin
                mainForm.Adoman.CommandText:='Select * from manAger where  manager_name like ''%'+ Username +'%'' and Manager_Sex like ''%'+ sex +'%'' and manager_status like ''%'+ shenfen +'%'' and manager_country like ''%'+ outcountry +'%'' and manager_culture like ''%'+ wenhua +'%'' and manager_office like ''%'+ office +'%'' and manager_age > 30  and manager_age < 50';
                end                else if age='50&Euml;ê&Ograve;&Ocirc;&Eacute;&Iuml;'  then begin
                mainForm.Adoman.CommandText:='Select * from manAger where  manager_name like ''%'+ Username +'%'' and Manager_Sex like ''%'+ sex +'%'' and manager_status like ''%'+ shenfen +'%'' and manager_country like ''%'+ outcountry +'%'' and manager_culture like ''%'+ wenhua +'%'' and manager_office like ''%'+ office +'%'' and manager_age >= 50 ';
                end                else  begin
                mainForm.Adoman.CommandText:='Select * from manAger where  manager_name like ''%'+ Username +'%'' and Manager_Sex like ''%'+ sex +'%'' and manager_status like ''%'+ shenfen +'%'' and manager_country like ''%'+ outcountry +'%'' and manager_culture like ''%'+ wenhua +'%'' and manager_office like ''%'+ office +'%''  ';
                end;
            MainForm.AdoMan.Open;
            MainForm.TabMan.show;
        end
        else if RBFamily.Checked=True Then Begin            MainForm.AdoFam.Close;
                if age='30&Euml;ê&Ograve;&Ocirc;&Iuml;&Acirc;' then begin
                MainForm.AdoFam.CommandText:='select * from Family where  family_name like ''%'+ username +'%'' and family_sex like ''%'+ sex +'%''  and family_status like ''%'+ shenfen+'%''  and family_office like ''%'+ office +'%'' and family_age<30  ';
                end                else if age='30-50&Euml;ê' then begin
                MainForm.AdoFam.CommandText:='select * from Family where  family_name like ''%'+ username +'%'' and family_sex like ''%'+ sex +'%''  and family_status like ''%'+ shenfen+'%''  and family_office like ''%'+ office +'%'' and family_age < 50 and family_age > 30  ';
                end                else if age='50&Euml;ê&Ograve;&Ocirc;&Eacute;&Iuml;'  then begin
                MainForm.AdoFam.CommandText:='select * from Family where  family_name like ''%'+ username +'%'' and family_sex like ''%'+ sex +'%''  and family_status like ''%'+ shenfen+'%''  and family_office like ''%'+ office +'%''  and family_age > 50 ';
                end                else  begin
                MainForm.AdoFam.CommandText:='select * from Family where  family_name like ''%'+ username +'%'' and family_sex like ''%'+ sex +'%''  and family_status like ''%'+ shenfen+'%''  and family_office like ''%'+ Office +'%''   ';
                end ;
            MainForm.Adofam.Open;
            MainForm.Tabfam.show;        end
问题就出在office上，如果familm_office为空的话就搜索不到，不管office作不作为搜索条件，但是在manager_office中就可以，都是变量office，我实在不明白了，高手救救我吧，，，