4.3.1数据库错误信息

下面我们先来研究数据库的错误信息。在这里,用一个Access文件DbCon.accdb作为目标数据库,在集算器中,新建一个ODBC数据源,直接使用这个文件中的数据,连接串填入:DRIVER=Microsoft Access Driver (*.mdb, *.accdb);DBQ=D:\\files\\DbCon.accdb

 

Access文件DbCon.accdb中,建立了空表CityBak

 

其中ID为主键,特别的,POPULATION设定了限制,要求其中的数据>1,000,000

现在,准备将demo数据库中,CITIES中的数据,填入CityBak表中:

 

A

1

=demo.query("select * from CITIES")

2

=connect("DbCon")

3

=A2.query("select * from CityBak")

4

>A2.update(A1,CityBak,ID:CID,CITY:NAME,POPULATION,STATE:STATEID)

5

>A2.close()

 

A1demo数据库中,取出CITIES表中的数据:

A2连接DbCon数据库。A3中,取出CityBak表中的数据,由于是新建的表,里面原本没有记录:

 

当执行到A4时,就出现了错误,这是由于限定了POPULATION>1000000,当试图填入第10条记录Detroit的信息时,不符合要求。在默认情况下,在数据库运算出现错误时,会中断执行。

在这个时候,我们可以在另一个dfx中,查询数据的填写情况:

 

A

1

=connect("DbCon")

2

=A1.query("select * from CityBak")

3

>A1.close()

 

A2中的查询结果如下:

可以看到,虽然由于CityBak表中对数据的限制,致使第1个网格中的程序未能执行成功,但是仍然有部分数据被填入了目标表中,直到出现了无法填入目标表的第1条数据为止。

在批量更新数据库时,一旦出现数据库错误,就会终止程序的运行。为了避免这样的情况,我们可以在产生连接时,使用@e选项,用代码来自行处理数据库错误,而不中断。如:

 

A

B

1

=demo.query("select * from CITIES")

 

2

=connect@e("DbCon")

 

3

>A2.execute("delete from CityBak")

 

4

>A2.update(A1,CityBak,ID:CID,CITY:NAME,POPULATION,STATE:STATEID)

=A2.error()

5

=A2.query("select * from CityBak")

 

6

>A2.close()

 

 

A2中,生成数据库连接时使用了@e选项,这样在出错时将可以由代码自行处理,而不会中断程序。为了保持与前面的一致,先在A2中将CityBak表中已有的记录清空。运行后,A5中查询到的结果和前面是一致的:

 

A4执行更新CityBak表中数据时,由于在更新数据时出现了不符合数据要求的操作,因此可以在B4中看到错误代码:

 

说明,在批量更新中,一旦出现数据库错误,就会中断更新数据库,同时记录错误。我们也可以将B4中的表达式修改为=A2.error@m(),此时可以查看到错误信息:

 

我们继续探索:

 

A

B

1

=demo.query("select * from CITIES")

 

2

=connect@e("DbCon")

 

3

>A2.update@a(A1.select(CID<6), CityBak,ID:CID,CITY:NAME, POPULATION,STATE:STATEID)

=A2.error()

4

=A2.query("select * from CityBak")

 

5

>A2.close()

 

 

A3db.update()中使用@a选项,可以在执行更新前将数据库表中的数据先清除,就不必再添加语句去删除记录。在A3中,仅取出前5条记录,填入CityBak中,此时记录均满足数据要求,A3中的语句执行正常,因此在B3中的错误代码为0

 

而从A5中也可以看到,记录存入正常: