给公司做了个简单的报表程序，用了很长时间一直不错。最近打印时弹出“加载打印驱动程序时发生错误”。把程序安装到另一台电脑上也出现这个问题.请前辈指教怎么解决。

补充：输出报表时用了循环语句，自动打印出3张相同的报表。弹出上述错误提示后，只能打印出1张。

以前用的是XP?WIN7?还是？
现在用的是XP?WIN7?WIN10?

一直都是xp

那就只能把打印部分放上来测试了。

打印驱动程序是不是不存在了

换过打印机了吗？

在打印语句前加一句试试：
SET PRINTER TO NAME GETPRINTER()
REPORT FORM ......

SET PRINTER TO NAME GETPRINTER() &&吹水版主
yfnRecn=recn()
set filt to recn()=yfnRecn
SET PROCEDURE TO publprg.PRG &&调用子程序，为了截取"情况"字段 分行
for iiii=1 to 3
REPORT FORM wfzzm TO PRINT NOCONSOLE
endfor
SET PROCEDURE TO
set filt to
GO yfnRecn

这个是打印部分。之前一直好用。不知道是电脑系统的事还是程序的问题？

报表数据源表换成一个叫“dy.dbf”的。用以下方式试试

sele 表单的数据源表
yfnRecn=recn()
sele * from 表单的数据源表 where recn()=yfnRecn into table dy  &&& 将要打印的记录单独存放到一个表中
sele dy
for iiii=1 to 3
  REPORT FORM wfzzm TO PRINT NOCONSOLE
endfor
sele dy
use
sele 表单的数据源表
GO yfnRecn
***********************

[此贴子已经被作者于2016-8-10 14:12编辑过]