当VFP报表最后不满一页时，在总结区写入页脚内容（满一页时在页脚区写入页脚内容）。不知代码如何书写，请高手赐教，万分感谢！！！

下列代码不能将页脚内容写入总结区，不知为何？请高手赐教。多谢！

LOCATE   FOR  OBJTYPE=9 AND OBJCODE=8 AND TOP
* 在总结区添加左页脚
IF   !EMPTY(LeftFooter)
    L_页脚宽度=LEN(LeftFooter)*L_表体_字符宽度
    EXPR= ["]+LeftFooter+["]
    VPOS=L_总结区VPOS+208.333  && 加上横线的高度
    HPOS=0
    WIDTH =L_页脚宽度
    HEIGHT=L_表体_字符高度
    FONTSIZE=L_表体字号
    FONTFACE=L_表体字体
    FONTSTYLE=0
    OBJTYPE=5
    SUPEXPR="recno()=reccount()"
    APPEND BLANK
    SCATTER   MEMV   MEMO           
ENDIF
* 在总结区添加右页脚
IF   !EMPTY(RightFooter)
     L_页脚宽度=LEN(RightFooter)*L_表体_字符宽度
     EXPR =["]+RightFooter+["]
     VPOS =L_总结区VPOS+208.333
     HPOS= L_报表宽度-L_页脚宽度
     WIDTH = L_页脚宽度
     FONTSIZE=L_表体字号
     FONTFACE=L_表体字体
     FONTSTYLE=0
     OBJTYPE=5
     SUPEXPR="recno()=reccount()"
     APPEND BLANK
     SCATTER   MEMV   MEMO
ENDIF

[此贴子已经被作者于2024-11-16 16:16编辑过]

你可以先在报表设计器中，手动放置 制表日期 和 页数 控件，并保证预览正常，然后再 use 这个正常的报表文件，看对应记录的内容，对比一下，每个字段的内容，哪里不同，这样就知道问题在哪里了。

谢谢您的热心指点，如果右页脚这样写，不能正常显示，请赐教。
RightFooter="共”+Alltrim(str(_PAGETOTAL))+"页  第”+Alltrim(str(_PAGENO))+"页”