PB程序中的错误处理方法
PB开发中常会用到一些对错误的处理方法,根据错误的不同,处理方式也不相同。
常见的几种错误有系统级错误、数据库错误、数据窗口语法错误等。
1)系统级错误可以通过systemerror事件;
2)数据库错误如果使用嵌入SQL可以通过Transcation属性获得,如果是数据窗口或数据存储可以通过dberror事件获得(要处理数据存储的错误捕捉必须通过继承实现);
3)数据窗口语法错误,例如在DataWindow中使用SetFilter和Find函数时如语法错误就会自动弹出语法错误的提示信息,对于此类错误,可以改用DataStore来处理,因为DataStore使用SetFilter和Find函数时语法错误不会自动弹出而是返回-1。
以上几种方法都是对一些可以预知的错误的处理,实际开发中还会遇到很多不可预知的情况,会使程序错误,严重的使系统崩溃,停止运行。例如,调用外部控件读取设备的信息,会有很多无法预知的错误,导致程序崩溃。
为防止不可预知的异常情况,避免系统崩溃,PB9中提供了处理此类异常的方法:
TRY
trystatements //这里写自己的程序语法段
CATCH ( ThrowableType1 exIdentifier1 )
catchstatements1 //发生ThrowableType1异常时的程序处理
CATCH ( ThrowableType2 exIdentifier2 )
catchstatements2 //发生ThrowableType2异常时的程序处理
...
CATCH ( ThrowableTypeN exIdentifierN )
catchstatementsN //发生ThrowableTypeN异常时的程序处理
FINALLY
cleanupstatements //不论异常发生与否,一定执行的语句放在此处,没有可以不要END TRY
下面是一个简单的例子,供参考:
Oleobject lo_connect
lo_connect = create oleobject
li_rtn = lo_connect.ConnectToNewObject("ADODB.Connection")
//lo_connect.ConnectionString=ls_connstring
if li_rtn<0 then
//error
//-1 Invalid Call: the argument is the Object property of a control //-2 Class name not found
//-3 Object could not be created
//-4 Could not connect to object
/
/-9 Other error
else
try
lo_connect.CursorLocation = 3
lo_connect.ConnectionTimeout = 20
lo_connect.open(ls_connstring)
catch (runtimeerror err)
// runtimeerror 运行时异常的处理
catch (throwable err1)
//其他异常的处理
ls_err=err1.classname()+','+err1.GetMessage()
if isnull(ls_err) then ls_err=''
//messagebox("提示","连接异常!"+"~r~n"+ls_err)
="连接异常!"+"~r~n"+ls_err
return
end try
下面是赠送的团队管理名言学习,
不需要的朋友可以编辑删除谢谢
1、沟通是管理的浓缩。
2、管理被人们称之为是一门综合艺术--“综合”是因为管理涉及基本原理、自我认知、智慧和领导力;“艺术”是因为管理是实践和应用。
3、管理得好的工厂,总是单调乏味,没有任何激动人心的事件发生。
4、管理工作中最重要的是:人正确的事,而不是正确的做事。
5、管理就是沟通、沟通再沟通。
6、管理就是界定企业的使命,并激励和组织人力资源去实现这个使命。界定使命是企业家的任务,而激励与组织人力资源是领导力的范畴,二者的结合就是管理。
7、管理是一种实践,其本质不在于“知”而在于“行”;其验证不在于逻辑,而在于成果;其唯一权威就是成就。
8、管理者的最基本能力:有效沟通。
9、合作是一切团队繁荣的根本。
10、将合适的人请上车,不合适的人请下车。
11、领导不是某个人坐在马上指挥他的部队,而是通过别人的成功来获得自己的成功。
12、企业的成功靠团队,而不是靠个人。
13、企业管理过去是沟通,现在是沟通,未来还是沟通。
14、赏善而不罚恶,则乱。罚恶而不赏善,亦乱。
15、赏识导致成功,抱怨导致失败。16、世界上没有两个人是完全相同的,但是我们期待每个人工作时,都拥有许多相同的特质。17、首先是管好自己,对自己言行的管理,对自己形象的管理,然后再去影响别人,用言行带动别人。18、首先要说的是,CEO要承担责任,而不是“权力”。你不能用工作所具有的权力来界
定工作,而只能用你对这项工作所产生的结果来界定。CEO要对组织的使命和行动以及价值观和结果负责。
系统错误19、团队精神是从生活和教育中不断地培养规范出来的。研究发现,从小没有培养好团队精神,长大以后即使天天培训,效果并不是很理想。因为人的思想是从小造就的,小时候如果没有注意到,长大以后再重新培养团队精神其实是很困难的。
20、团队精神要从经理人自身做起,经理人更要带头遵守企业规定,让技术及素质较高的指导较差的,以团队的荣誉就是个人的骄傲启能启智,互利共生,互惠成长,不断地逐渐培养员工的团队意识和集体观念。
21、一家企业如果真的像一个团队,从领导开始就要严格地遵守这家企业的规章。整家企业如果是个团队,整个国家如果是个团队,那么自己的领导要身先士卒带头做好,自己先树立起这种规章的威严,再要求下面的人去遵守这种规章,这个才叫做团队。
22、已所不欲,勿施于人。
23、卓有成效的管理者善于用人之长。
24、做企业没有奇迹而言的,凡是创造奇迹的,一定会被超过。企业不能跳跃,就一定是(循着)一个规律,一步一个脚印地走。
25、大成功靠团队,小成功靠个人。
版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198,我们将在24小时内删除。
发表评论