连编出现以下情况,请高手指点下
1.找不到过程/函数 end2.找不到未知的data
这两种情况,我应该从哪里入手呢
PARAMETERS NERROR,CMESSAGE,CMESSAGE1,CPROGRAM,NLINENO SET TEXTMERGE ON TEXT TO messageinfo noshow 错误编号 <<TRANSFORM(NError)>> 错误信息 <<CMESSAGE>> 错误代码 <<CMESSAGE1>> 程序名称 <<CPROGRAM>> 错误行号 <<TRANSFORM(NLINENO)>> 错误日期 <<DATETIME()>> ENDTEXT STRTOFILE(MESSAGEINFO+CHR(13)+CHR(10)+REPLICATE([-],80)+CHR(13)+CHR(10),[.\DATAS\ERR.TXT],.T.) &&此处文本文件的路径,改为你自己的路径 MESSAGEBOX(messageinfo,16,"错误信息")在主程序MAIN.PRG中加入下面一行代码:
ON ERROR DO .\PRGS\ERR.PRG WITH ERROR(), MESSAGE(), MESSAGE(1), PROGRAM(), LINENO(1) &&此处.PRG的路径,可以改为你自己的路径运行后,查看ERR.TXT文件的内容