为什么TADOCommand总是提示" update()语法错误!"

[xiaoping04408]

Cmd := TADOCommand.Create(nil);
Cmd.Connection := dataform.conn;
if dataform.conn.InTransaction then dataform.conn.RollbackTrans;
dataform.conn.BeginTrans;

user_id := trim(edit3.Text );
user_name := trim(edit1.Text );
pass_word := trim(edit2.Text );
memo_1 := trim(Memo1.Text );

cmd.CommandText := 'update tbuse set password =:pass_word
' where userid =:user_id;
cmd.Parameters.ParamByName('pass_word').Value := pass_word;

cmd.Parameters.ParamByName('user_id').Value := user_id;
cmd.Execute ;

为什么总是提示" update()语法错误!"

[NicolasCage]

cmd.CommandText := 'update tbuse set password =:pass_word' where userid =:user_id;

-->

cmd.CommandText := 'update tbuse set password =:pass_word where userid =:user_id';

[阿三]

[Quote=引用 1 楼 NicolasCage 的回复:]
cmd.CommandText := 'update tbuse set password =:pass_word' where userid =:user_id;

-->

cmd.CommandText := 'update tbuse set password =:pass_word where userid =:user_id';

[/Quote]
同意

[starluck]

cmd.CommandText := 'update tbuse set password =:pass_word +
' where userid =:user_id;

[frankie_24]

如果是字符串的拼接,应该连编译都过不去,
Passwrod是关键字....

[xiaoping04408]

Cmd := TADOCommand.Create(nil);
Cmd.Connection := dataform.conn;
if dataform.conn.InTransaction  then dataform.conn.RollbackTrans;
dataform.conn.BeginTrans;

        user_id := trim(edit3.Text );
        user_name := trim(edit1.Text );
        pass_word := trim(edit2.Text );
        memo_1 := trim(Memo1.Text );

        cmd.CommandText := 'update tbuse set [password] =:pass_word where [userid] =:user_id';
        cmd.CommandType := cmdText;
        cmd.Parameters.ParamByName('pass_word').Value := pass_word;
        cmd.Parameters.ParamByName('user_id').Value := user_id;
        cmd.Execute ; 

关键字,要记得加[]中括号哦,这才是正解.....

[火龙岛主]

Cmd := TADOCommand.Create(nil);
Cmd.Connection := dataform.conn;
if dataform.conn.InTransaction  then dataform.conn.RollbackTrans;
dataform.conn.BeginTrans;

        user_id := trim(edit3.Text );
        user_name := trim(edit1.Text );
        pass_word := trim(edit2.Text );
        memo_1 := trim(Memo1.Text );

        cmd.CommandText := 'update tbuse set password =:pass_word where userid =:user_id';
        cmd.CommandType := cmdText;
        cmd.Parameters.ParamByName('pass_word').Value := pass_word;
        cmd.Parameters.ParamByName('user_id').Value := user_id;
        cmd.Execute ; 

[coolwx]

楼上的正解，
楼主怎么不看清楚引号呢。。。

[skyno1]

SmallHand 正确，楼主要多练语法

[provokes]

就两个变量也不一定要用参数啊，可以直接赋值构造SQL语句。

找问题最好的办法是在执行之前showmessage一下SQL语句

还有就是，开始了事务别忘了了提交

[kye_jufei]

1.showmessage看一下sql語句:看是否少了引號等;
2.像password或userid這是關鍵字,字段應該盡量避免,如果一定要使用,記得加[]括號!