当前位置:首页 > Windows程序 > 正文

00937错误,记录解决它的思路和方法

2021-03-26 Windows程序

  首先需要说明,这个问题的出现需要几个前提:使用微软的Oracle驱动(使用Oracle自己的驱动不会出现这个问题)、使用绑定变量法,使用Format等方式拼接SQL也不会出现这个问题,还有一些诡异的规律我还没有发现原因,将会在文中说明。

  这个问题是工作中的一个功能模块出现的问题,但是我会在本文中通过一个程序重现这个问题,然后进行分析。

首先给出重现这个问题的简单的程序          

  首先为了重现这个问题,在程序开发时候配置TADOConnection,必须选择微软的驱动,如下图红框标记的第一个驱动就是微软的Oracle驱动

  程序打开时候的图形界面如下

  点击Ms-Format按钮,执行的SQL是使用Format拼接的SQL,这个能够正常执行,显示结果如下

  但是点击 Ms-绑定变量,执行的是使用绑定变量法的SQL,就会出现异常,如下图

  具体的代码是下面这样的

unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, DB, ADODB; type TForm1 = class(TForm) con1: TADOConnection; btn1: TButton; btn2: TButton; procedure FormCreate(Sender: TObject); procedure btn1Click(Sender: TObject); procedure btn2Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; adoquery: TADOQuery; implementation {$R *.dfm} procedure TForm1.FormCreate(Sender: TObject); begin con1.Open; adoquery:= TADOQuery.Create(Application); //这样的Create方式,,adoquery会在程序关闭的时候销毁 adoquery.Connection:= con1; //这个例子中的adoquery是一个全局变量 end; procedure TForm1.btn1Click(Sender: TObject); //这个按钮是使用Format拼接的SQL,然后执行 var count: Integer; no, name: string; begin adoquery.Close; no:= ‘testno‘; name:= ‘testname‘; adoquery.SQL.Text:= Format(‘select count(*) icount from practice where uno = ‘‘%s‘‘ and uname = ‘‘%s‘‘ ‘, [no, name]); try //注意因为可能会出现异常,所以最好是在这里捕捉一下异常,保证程序的稳健性 adoquery.Open; adoquery.First; count:= adoquery.FieldByname(‘icount‘).AsInteger; ShowMessage(‘共有‘ + IntToStr(count) + ‘ 条记录‘); except on e:Exception do ShowMessage(e.Message); end; end; procedure TForm1.btn2Click(Sender: TObject); //这个按钮是使用绑定变量的方法的SQL var count: Integer; no, name: string; begin adoquery.Close; no:= ‘testno‘; name:= ‘testname‘; adoquery.SQL.Text:= ‘select count(*) icount from practice where uno = :no and uname = :name‘; adoquery.Parameters.ParamByName(‘no‘).Value:= no; adoquery.Parameters.ParamByName(‘name‘).Value:= name; //注意里面的绑定变量法的使用规范,这样的方式使用微软的Oracle驱动会报错 //但是使用Oracle自己的驱动是OK的 try //注意因为可能会出现异常,所以最好是在这里捕捉一下异常,保证程序的稳健性 adoquery.Open; adoquery.First; count:= adoquery.FieldByName(‘icount‘).AsInteger; ShowMessage(‘一共有‘ + IntToStr(count) + ‘ 条记录‘); except on e:Exception do ShowMessage(e.Message); end; end; end.

  

然后根据出现的问题去逐步进行理性的分析      

首先当然是看这个ORA-00937错误是什么错误

  在网上搜索了Oracle的错误信息,大概的解释就是下面这样的

select 列表项中除了包含聚合函数(比如count、avg等)外,还包含了表的某些列,那么你将必须使用group by语句,否则语法通不过。

例如这样的SQL:select deptno,job,avg(sal)  from emp;

  ERROR 位于第 1 行:   ORA-00937: 非单组分组函数

其实这里也非常容易理解,你既然指定了聚合函数,又同时制定了其他列,还想不按照指定的列来分组,你到底想让oracle怎么做呢?

这根本就得不出结果。就像你需要统计班上男女生的人数,但是又不能分组,只能在一条数据里表示出来,怎么能办得到呢?

所以这里的group by是必须的。

上面的错误纠正为: select deptno,job,avg(sal) from emp group by deptno,job;

就OK了

  既然找到了错误的解释,就可以进行下一步了。

接着是看看使用Format方式拼接的SQL和使用绑定变量法的SQL的具体格式是什么样的

  当然最先想到的办法就是在程序中加断点,然后看看

温馨提示: 本文由Jm博客推荐,转载请保留链接: https://www.jmwww.net/file/67922.html