[求助] 关于delphi访问数据库发生了错误 !!!急!!!急!!!急!!!

penguin

project project2.exe raised exception class eoleexception with message ''在此上下文中不允许使用''c1999001999001999001999001''。此处只允许使用常量、表达式或变量。不允许使用列名。''.process stopped.use step or run to continue.
     
( B3 b/ k  q  @     while not adoqxiaoban.Eof
' h! M" f; e6 b' [3 s( n; h     do
: ?) M2 t2 a% B0 q. _6 R2 q- u     begin
: s* j% c6 ?" _3 C+ w! L/ v     strxiaoban:=trim(adoqxiaoban.Fields.fieldbyname(''areacode'').AsString );
+ Q6 P- A9 e! ^: E0 x% ]5 T     strcodexia=strlinchang+''999''+stryinglinqu+''999''+strzuoyequ+''999''+strlinban+''999''+strxiaoban;
: m( C1 x9 D6 ~* t" l. K- y     strcode:=strlinban+strxiaoban;
     adoqs.SQL.Clear ;
     adoqs.SQL.Add(''insert into test1 values(''+strcodexiao+'',''+strcode+'')'');
     adoqs.Prepared ;
" }8 z, j% Q/ f     try
+ U6 }0 u9 k6 J# ~( E& {- H     adoqs.Open ;
     adoqxiaoban.Next ;
     except
     showmessage(''出错！'');
( e$ U7 |) b2 ^% X2 y2 y  s, {/ g     exit;
* m# D4 v. s! R- F9 w     end;
     end;
     adoqlinban.Next ;
     
9 k1 Q4 t7 Z1 N3 ]     这是其中的一段代码 好像出错的就是在这 在adoxiaoban.next那 哪位大虾帮帮忙 很急了

ilikenba

varchar和char的区别不大，就是varchar的默认大小是50个字符,而char是10.

ilikenba

<>晕,你的SQL语句写的不对！字符串数据添加是两边要有',否则就按数字处理了！</P><>adoquery1.SQL.Add('insert into test1 values('''+str1+''','''+str2+''')');</P><>这句改成上面的就对了！</P>

penguin

<>那是个实现从数据库中提取各级单位的编码 然后再编成最底一级的单位的编码 以表示它们间的上下级的关系 很简单的 </P><>这个很急 搞了一个5.1  都没弄出来 下面的工作都没法做了 拜托拜托了</P><>至于 001 变为 1的 程序在下面</P><>procedure TForm1.Button1Click(Sender: TObject);
8 e$ k* ~- d8 Nvar
) k5 |8 ^: m! H; h8 N' d  str1,str2:string;
" F" [1 Y- r) }; ^* y7 y' C! \begin
str1:='001';
str2:='002';
! J% t. _& c. e2 {8 ~adoquery1.Close ;
adoquery1.SQL.Clear ;
adoquery1.SQL.Add('insert into test1 values('+str1+','+str2+')');
adoquery1.Prepared ;
adoquery1.ExecSQL ;
6 `% |5 d7 q5 T, Kend;</P><>我觉得我的程序没有错呀 </P><>还有 varchar 和 char 有什么区别亚</P><>万分感谢！！！ </P>[em07][em01][em01][em01]

ilikenba

你确认存入数据库的语句没有问题吗？001变成了1应该当作整型处理的原因，我一般喜欢用varchar的类型！

penguin

<>而且 每次用delphi向sql server里插入字符串时 如 001 到了数据库里面都是 1 </P><>数据库里的数据类型是char型的 </P>

penguin

怎么跟踪亚 因为我的delphi没学多久 [em04] 我开始也以为是sql语句错 但试了下好像没什么问题

ilikenba

你的程序我读起来不太明白，没有数据库我也调试不了，但是从错误看应该是SQL语句的问题，你应该跟踪一下，看看每个生成的SQL语句是不是正确！

penguin

拜托拜托了