求助:delphi访问数据库时出错!!!

                            
project   project2.exe   raised   exception   class   eoleexception   with   message   ''在此上下文中不允许使用''c1999001999001999001999001''。此处只允许使用常量、表达式或变量。不允许使用列名。''.process   stopped.use   step   or   run   to   continue.   
             
            while   not   adoqxiaoban.Eof  
            do  
            begin  
            strxiaoban:=trim(adoqxiaoban.Fields.fieldbyname(''areacode'').AsString   );  
            strcodexia=strlinchang+''999''+stryinglinqu+''999''+strzuoyequ+''999''+strlinban+''999''+strxiaoban;  
            strcode:=strlinban+strxiaoban;  
            adoqs.SQL.Clear   ;  
            adoqs.SQL.Add(''insert   into   test1   values(''+strcodexiao+'',''+strcode+'')'');  
            adoqs.Prepared   ;  
            try  
            adoqs.Open   ;  
            adoqxiaoban.Next   ;  
            except  
            showmessage(''出错!'');  
            exit;  
            end;  
            end;  
            adoqlinban.Next   ;  
             
            这是其中的一段代码   好像出错的就是在这   在adoxiaoban.next那   帮帮忙   很急了  
 

查看回复