回复 2楼 吹水佬
CLOSE ALL
SET SAFETY off
USE xxb ALIAS a
USE bmddm ALIAS b IN 0
SELECT b
SCAN
i=ALLTRIM(bmddm)
j="d:\pdf\"+ALLTRIM(bmddm)+".pdf"
SELECT * FROM a WHERE bmddm=i INTO TABLE ls.dbf
REPORT FORM D:\2022年\座次表\报表1.frx TO PRINTER
!ren d:\pdf\报表1.pdf to &j
ENDSCAN
SET SAFETY ON
说明:xxb为所有学生的信息数据表;
bmddm为5所学校的代码表;
报表虚拟打印输出文件默认为“报表1.pdf”,并存放在“d:\pdf”文件夹里
目的:想让5所学校输出为5个PDF文件,并自动命名为以学校代码为名的PDF文件
问题:执行完报名输出后,VFP窗口还显示输出PDF文件的最后一页,无法关闭,后续也就无法进行重命名。
请高手指点一下问题