parameters 'AQMPROBLEM_TYPE' notfound

懒蝈蝈 2008-04-21 06:42:21
SqlText := 'UPDATE TABLE_PROBLEM SET PROBLEM_TYPE:= AQMPROBLEM_TYPE,'
+'PROBLEM_CONTENT := AQMPROBLEM_CONTENT,'
+'PROBLEM_CONTENT_TXT := AQMPROBLEM_CONTENT_TXT, '
+'PROBLEM_DIFFCULTY := AQMPROBLEM_DIFFCULTY,'
+'PROBLEM_KEY := AQMPROBLEM_KEY,'
+'PROBLEM_KNOWLEDGE := AQMPROBLEM_KNOWLEDGE'
+'where PROBLEM_ID = '+inttostr(deleteid);
DM.AQWModify.SQL.Clear;
DM.AQWModify.SQL.Add(SqlText);
DM.AQWModify.Parameters.Refresh;
DM.AQWModify.parameters.ParamByName('AQMPROBLEM_TYPE').Value := problemKind;
DM.AQWModify.parameters.ParamByName('AQMPROBLEM_CONTENT').LoadFromStream(streamWord,ftBlob);
DM.AQWModify.parameters.ParamByName('AQMPROBLEM_CONTENT_TXT').value :=problemContentTxt;
DM.AQWModify.parameters.ParamByName('AQMPROBLEM_DIFFCULTY').Value := HardnessToNumber(problemHardness);
DM.AQWModify.parameters.ParamByName('AQMPROBLEM_KEY').Value := MemoToString(answer.Lines);
DM.AQWModify.parameters.ParamByName('AQMPROBLEM_KNOWLEDGE').Value :=listToString(knowledge);
DM.AQWModify.ExecSQL;

运行时总是说parameters 'AQMPROBLEM_TYPE' notfound。
后来加了 DM.AQWModify.Parameters.Refresh;
还是不行,望高手指教,本人是新人没啥分数
...全文
55 7 打赏 收藏 转发到动态 举报
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
阿三 2008-04-22
  • 打赏
  • 举报
回复
[Quote=引用 2 楼 liangpei2008 的回复:]
SqlText := 'UPDATE TABLE_PROBLEM SET PROBLEM_TYPE= :AQMPROBLEM_TYPE,' //冒号写反了
+'PROBLEM_CONTENT =: AQMPROBLEM_CONTENT,'
+'PROBLEM_CONTENT_TXT =: AQMPROBLEM_CONTENT_TXT, '
+'PROBLEM_DIFFCULTY =: AQMPROBLEM_DIFFCULTY,'
+'PROBLEM_KEY =: AQMPROBLEM_KEY,'
+'PROBLEM_KNOWLEDGE = :AQMPROBLEM_KNOWLEDGE'
+'where PROBLEM_ID = '+inttostr(deleteid);
[/Quote]
懒蝈蝈 2008-04-22
  • 打赏
  • 举报
回复
加DM.AQWModify.SQL.Close;
还是出现同样错误
wgej55 2008-04-21
  • 打赏
  • 举报
回复
你那个冒号确实是写反了,你之前是不是用这个DM.AQWModify做过其他的事情啊,在DM.AQWModify.SQL.Clear; 之前写一句

DM.AQWModify.SQL.Close; 试试吧
懒蝈蝈 2008-04-21
  • 打赏
  • 举报
回复
如2楼所说的该了,还是出现同样错误
genispan 2008-04-21
  • 打赏
  • 举报
回复
:= AQMPROBLEM_TYPE 是表示赋值
= :AQMPROBLEM_TYPE 表示引入变量
liangpei2008 2008-04-21
  • 打赏
  • 举报
回复
SqlText := 'UPDATE TABLE_PROBLEM SET PROBLEM_TYPE= :AQMPROBLEM_TYPE,' //冒号写反了
+'PROBLEM_CONTENT =: AQMPROBLEM_CONTENT,'
+'PROBLEM_CONTENT_TXT =: AQMPROBLEM_CONTENT_TXT, '
+'PROBLEM_DIFFCULTY =: AQMPROBLEM_DIFFCULTY,'
+'PROBLEM_KEY =: AQMPROBLEM_KEY,'
+'PROBLEM_KNOWLEDGE = :AQMPROBLEM_KNOWLEDGE'
+'where PROBLEM_ID = '+inttostr(deleteid);
懒蝈蝈 2008-04-21
  • 打赏
  • 举报
回复
同样的语句用于插入就行,郁闷

5,388

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧