搜索
编程论坛
→
数据库技术
→
『 VFP论坛 』
→ word 人工关闭时不要提示保存
标题:
word 人工关闭时不要提示保存
只看楼主
liunis
等 级:
新手上路
帖 子:108
专家分:7
注 册:2021-9-25
结帖率:
84.85%
楼主
已结贴
√
问题点数:10 回复次数:16
word 人工关闭时不要提示保存
word 人工关闭时不要提示保存,如何写
OLE.Documents.Close(.F.) 是自动关闭了
因为还要人工操作修改,因为都是临时文档并不要保存
有时一连打开10多个文档,关闭时都要提示
搜索更多相关主题的帖子:
word
文档
提示
关闭
保存
2023-04-24 17:14
吹水佬
等 级:
版主
威 望:
432
帖 子:10064
专家分:41463
注 册:2014-5-20
第
2
楼
得分:2
要修改又不要保存,可能不可能。
2023-04-24 18:34
东海ECS
来 自:Python
等 级:
版主
威 望:
19
帖 子:376
专家分:1454
注 册:2023-1-24
第
3
楼
得分:2
保存,非常麻烦。以下是可以用来关闭Word文档并且不提示保存的VB代码:
ActiveDocument.
Close
SaveChanges:
=
wdDoNotSaveChanges
使用此代码时,无论Word文档是否被更改,都不会提示用户保存更改。如果您确定您的更改不需要保存,这是很方便的选择。
会当
凌绝顶
,
一览
众山小
.
2023-04-24 18:59
liunis
等 级:
新手上路
帖 子:108
专家分:7
注 册:2021-9-25
第
4
楼
得分:0
回复 3楼 东海ECS
谢谢。在VFP 这句要如何写?
2023-04-24 19:02
csyx
等 级:
版主
威 望:
29
帖 子:484
专家分:1827
注 册:2018-3-13
第
5
楼
得分:2
我也确定这是从 ChartGPT 的回答复制过来的
一本正经的胡说八道
[此贴子已经被作者于2023-4-24 20:29编辑过]
2023-04-24 20:28
zhken
等 级:
贵宾
威 望:
11
帖 子:273
专家分:594
注 册:2012-9-21
第
6
楼
得分:2
Declare Integer WinExec in kernel32 string, integer
MyCommand="TASKKILL /F /PID WINWORD.exe /T"
= WinExec (MyCommand,0)
无论多少页面,试试一键关闭,看有无帮助
2023-04-24 21:04
吹水佬
等 级:
版主
威 望:
432
帖 子:10064
专家分:41463
注 册:2014-5-20
第
7
楼
得分:0
是不是理解有问题
问题的是:程序运行过程中调用word打开文档,人工修改等操作后,人工关闭word时不想出现保存提示对话框。
注意的是:此时打开的word是外部进程,并交由用户掌控了。
2023-04-24 21:40
sostemp
等 级:
业余侠客
威 望:
8
帖 子:162
专家分:221
注 册:2009-6-2
第
8
楼
得分:2
以下是引用
zhken
在2023-4-24 21:04:56的发言:
Declare Integer WinExec in kernel32 string, integer
MyCommand="TASKKILL /F /PID WINWORD.exe /T"
= WinExec (MyCommand,0)
无论多少页面,试试一键关闭,看有无帮助
强制关闭,会导致Word文档错误的
2023-04-25 08:54
pvm2000
等 级:
版主
威 望:
24
帖 子:159
专家分:256
注 册:2022-12-22
第
9
楼
得分:2
以下是引用
zhken
在2023-4-24 21:04:56的发言:
Declare Integer WinExec in kernel32 string, integer
MyCommand="TASKKILL /F /PID WINWORD.exe /T"
= WinExec (MyCommand,0)
无论多少页面,试试一键关闭,看有无帮助
这种操作有点狠
2023-04-25 09:14
csyx
等 级:
版主
威 望:
29
帖 子:484
专家分:1827
注 册:2018-3-13
第
10
楼
得分:0
这十几个文档谁打开的?如果是你的程序打开的,只要还保留了对象引用,就可以用 OLE.Documents(1).Saved = .T. 使得关闭时不提示
问题是用户啥时候关闭你无法预知,顶多也就用定时器定时执行赋值
2023-04-25 09:29
17
1/2页
1
2
参与讨论请移步原网站贴子:
https://bbs.bccn.net/thread-512030-1-1.html
关于我们
|
广告合作
|
编程中国
|
清除Cookies
|
TOP
|
手机版
编程中国
版权所有,并保留所有权利。
Powered by
Discuz
, Processed in 0.268179 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved