请教

[MARYS2007]

请教，我有一个报表，我现在采用的是预览方式，也可以直接打印，但是总觉得直接打印好像不放心似地，所以加了一个预览。现在就是预览后手工点击打印，想实现在预览后5秒直接打印。应该如何写这块的代码？

[lygcw9602]

[Quote=引用楼主 marys2007 的回复:]
请教，我有一个报表，我现在采用的是预览方式，也可以直接打印，但是总觉得直接打印好像不放心似地，所以加了一个预览。现在就是预览后手工点击打印，想实现在预览后5秒直接打印。应该如何写这块的代码？
[/Quote]
在你预览窗口的QUERYUNLOAD事件：
INKEY(5)
打印命令

[MARYS2007]

我没有用表单，就一个prg

[lygcw9602]

[Quote=引用 2 楼 marys2007 的回复:]
我没有用表单，就一个prg
[/Quote]
那你预览是怎么实现的

[MARYS2007]

REPORT FORM "cg.frx" NOEJECT NOCONSOLE PREVIEw

[lygcw9602]

[Quote=引用 4 楼 marys2007 的回复:]
REPORT FORM "cg.frx" NOEJECT NOCONSOLE PREVIEw
[/Quote]
下面加代码
INKEY(5)
打印命令

[MARYS2007]

哦。真这样啊。需要加=号吗？

[lygcw9602]

[Quote=引用 6 楼 marys2007 的回复:]
哦。真这样啊。需要加=号吗？
[/Quote]
可以不加
你可以查下INKEY()的用法

[十豆三]

把你的打印代码改为：

*先预览，如果按打印按钮，会弹出打印对话框，你可以选择打印机或设置打印机及起始页、终止页及份数或纸张类型。
Report Form 报表 Noconsole To Printer Prompt Preview

或

*先预览，按打印按钮后直接打印。
Report Form 报表 Noconsole To Printer Preview

你想预览多久都可以