程序2.prg

来自「实现了视窗化管理,并且能够进行本地asp查询功能」· PRG 代码 · 共 6 行

set classlib to ffc\_app.vcx
err1=createobject("_ERROR")
err1.clogdbf="错误信息日志.dbf"	&&指定保存错误信息的日志文件
on error err1.handle(error(),program(),lineno())
use xyz.dbf		&&打开不存在的表，产生错误