西西软件下载最安全的下载网站、值得信赖的软件下载站!

首页编程开发Delphi → delphi中使用ADOQuery时的几个问题解决方案

delphi中使用ADOQuery时的几个问题解决方案

相关软件相关文章发表评论 来源:西西整理时间:2013/3/14 15:51:12字体大小:A-A+

作者:西西点击:0次评论:2次标签: ADOQuery

  • 类型:系统其它大小:440KB语言:英文 评分:7.5
  • 标签:
立即下载

问题1、文参数的支持问题
今天在使用ClientDataSource查询的时候,“divece_name”参数赋值为“%笔记本电脑%”,但是使用sql server Profiler跟踪后发现查询的语句变为:

查询的数据提交到数据库时不完整,当我把N'@P1 varchar(8)', '%笔记本%'就可以正常执行了

我想可能是数据类型不正确,于是这么写:

cdsEquipment.Close;<br>cdsEquipment.Params.ParamByName('divece_name').DateType := ftWideString;
cdsEquipment.Params.ParamByName('divece_name').Value := '%' + txtDevice.Text + '%';
cdsEquipment.Open;

 但是提交到数据库的数据依然不完整:

最后在中间服务端的ADOQuery控件的BeforeOpen事件中加入如下代码就可以了:

adoqEquipment.Parameters.ParamByName('divece_name').Size := Length(adoqEquipment.Parameters.
ParamByName('divece_name').Value);

 重新设置参数长度,据说这是ADOQuery控件的BUG,对中文参数的支持问题

问题2、ADOQuery错误:ADOQuery1:commandtext does not return a result set
程序内容:
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('insert into DBhomework values('+Edit1.Text+','+Edit2.Text+','+ComboBox1.Text+','+Edit3.Text+','+Edit4.Text+')');
ADOQuery1.Open;
解决方法:
ADOQuery1.Open; 這行改成 ADOQuery1.ExecSQL;
Select 之類的 SQL 语句才用 ADOQuery1.Open;
附:
在select中用open方法,是正确的,但是在insert中代码能够执行,只是显示了上面的错误信息:ADOQuery1:CommandText does not return a result set,后来才知道ExecSQL方法是执行,不会要求SQL服务器给一个返回值,而对于select则能够使用open方法,有返回值。

问题3、ADOQuery错误:在此上下问中不允许使用名称"张三"。有效表达式包括常量、常量表达式和变量(在某些上下文中)。不允许使用列名。
程序内容:
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('insert into DBhomework(学号,姓名,性别,手机号码,班级) values('+Edit1.Text+','+Edit2.Text+','+ComboBox1.Text+','+Edit3.Text+','+Edit4.Text+')');
ADOQuery1.ExecSQL;
其中,“姓名”和“性别”的内容是中文。
语法上能够通过编译。SQLserver服务器里面是确定表内属性的是字符类型了,在server2005中也能够直接插入"张三"。在delphi中,把张三等中文换成数字或者字母能够成功插入。
怀疑是ADOQuery组件的问题,所以换成ADOCommand组件,程序内容如下:
Commandtext:='insert into DBhomework values('+Edit1.Text+','+Edit2.Text+','+ComboBox1.Text+','+Edit3.Text+','+Edit4.Text+')';
Execute;
出现一样的错误信息。

解决方法:
'+Edit2.Text+'和'+ComboBox1.Text+'改成'''+Edit2.Text+'''和'''+ComboBox1.Text+'''
其他的'也可以换成'''
附:
错误原因是:对于字符串字段属性没有加上引号,一直以为是SQLserver数据库建表中用的属性的数据类型问题,后来又想过会不会是Delphi数据类型转换问题,因为只要输入中文就会出现问题,曾经找到答案说加上双引号,试过了不对,不知道双引号在Delphi中是否等价于两个单引

    相关评论

    阅读本文后您有什么感想? 已有人给出评价!

    • 8 喜欢喜欢
    • 3 顶
    • 1 难过难过
    • 5 囧
    • 3 围观围观
    • 2 无聊无聊

    热门评论

    最新评论

    发表评论 查看所有评论(2)

    昵称:
    表情: 高兴 可 汗 我不要 害羞 好 下下下 送花 屎 亲亲
    字数: 0/500 (您的评论需要经过审核才能显示)
    推荐文章

    没有数据