//itemerror事件里出错处理
string ls_colname,ls_datatype
Boolean ab_msg = true
ls_colname = dwo.name
ls_datatype = dwo.coltype
if trim(data) = "" or isnull(data) then
ab_msg = false //之前这里使用return 3,所以出现这个问题
end if
string datatype
datatype = left(trim(ls_datatype),4)
CHOOSE CASE datatype
CASE "long"
long null_num
SetNull(null_num)
if ab_msg then messagebox("ERROR","数据类型不匹配!请输入数值型数据,如:1,2,3,4...")
This.SetItem(row,ls_colname,null_num)
RETURN 3
CASE "numb"
int null_num1
SetNull(null_num1)
if ab_msg then messagebox("ERROR","数据类型不匹配!请输入数值型数据,如:1,2,3,4...")
This.SetItem(row,ls_colname,null_num1)
RETURN 3
CASE "deci"
decimal lde_num
SetNull(lde_num)
if ab_msg then messagebox("ERROR","数据类型不匹配!请输入数值型数据,如:1.00,3.14,6.89...")
This.SetItem(row,ls_colname,lde_num)
RETURN 3
CASE "real"
real null_num3
SetNull(null_num3)
if ab_msg then messagebox("ERROR","数据类型不匹配!请输入数值型数据,如:1,2,3,4...")
This.SetItem(row,ls_colname,null_num3)
RETURN 3
CASE "int"
integer null_num4
SetNull(null_num4)
if ab_msg then messagebox("ERROR","数据类型不匹配!请输入数值型数据,如:1,2,3,4...")
This.SetItem(row,ls_colname,null_num4)
RETURN 3
CASE "date"
date null_date
SetNull(null_date)
if ab_msg then messagebox("ERROR","数据类型不匹配!请输入日期型数据,如:2010-8-11 或者 2011/8/18")
This.SetItem(row,ls_colname,null_date)
RETURN 3
END CHOOSE
转自
http://topic.youkuaiyun.com/u/20110617/15/5c7dff4d-6852-4d89-9c81-4662425251f7.html
PB错误处理
最新推荐文章于 2021-12-27 20:33:09 发布
本文详细阐述了在数据处理过程中遇到数据类型不匹配时的错误处理策略,通过判断数据类型并进行相应的转换操作,确保数据一致性。同时,提供了一个错误处理流程,包括判断数据是否为空或为null、数据类型匹配检查以及相应的错误提示与数据设置。
3735

被折叠的 条评论
为什么被折叠?



