作者loser1 (基辅罗斯进军乌拉山以西)
看板Office
标题Fw: [问题] OFFICE password 问题
时间Thu May 4 09:55:15 2023
※ [本文转录自 Windows 看板 #1aKm_cLE ]
作者: loser1 (基辅罗斯进军乌拉山以西) 看板: Windows
标题: [问题] OFFICE password 问题
时间: Thu May 4 09:52:36 2023
之前因为老板要求，本来我手上的 Office 文件都是明码储存，
後来被要求要加密码处理。
於是为了赶快把我手上几千份文档加密，我使用了以下的方式:
Public Sub SetDOCPassword (src_file,oldpassword,newpassword)
dim oWord
dim myDOC
set oWord = CreateObject("Word.Application")
oWord.Visible = FALSE
On Error Resume Next
set myDOC = Nothing
set myDOC =oWord.Documents.Open(src_file,FALSE,FALSE,FALSE,oldpassword)
if Not myDOC is Nothing then
oWord.DisplayAlerts = FALSE
if newpassword = "" then
myDoc.EncryptionProvider = ""
myDOC.SaveAs2 src_file,,FALSE,"",FALSE,""
else
myDOC.Password = newpassword
myDOC.Save
end if
myDOC.Close
end if
oWord.Quit
End Sub
之前一年多，不论是 .docx 或者 office 97 的 .doc 都相安无事，
使用程式加密的文件，该用 word2016 或者 word2003 开启都可以
输入密码正常作业。
但是不知道经过几个更新 之後，上个月有次重新加密的结果，
使用 word2003 开启时输入密码後会出现
https://i.imgur.com/OBU8lCh.png
然後使用 word2016 开启就相安无事。
看起来 VBSCRIPT 执行时会使用 office 2016 作为背景执行的本体。
问题:
1. 我有没有办法让 VBSCRIPT 选择使用的 office ?
2. 这是出了什麽问题会让 office2016 加密的 office2003 档案在
office 2003 打不开?
--
别问我为什麽还在用 office2003, 如果 office 2007 之後没有改用 RIBON 介面
我就乖乖换了。
使用 RIBON 放弃下拉式选单的工程师，应该剥皮实草吊在纽约联合国大楼前示众!!
--
啧啧啧啧啧啧啧啧啧啧啧啧啧啧啧啧
啧啧啧啧啧啧啧啧啧啧啧啧啧啧啧啧
啧啧啧啧啧啧啧啧啧啧啧啧啧啧啧啧
啧啧啧啧啧啧啧啧啧啧啧啧啧啧啧啧
啧啧啧啧啧啧啧啧啧啧啧啧啧啧啧啧
啧啧啧啧啧啧啧啧啧啧啧啧啧啧啧啧
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 125.227.9.148 (台湾)
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Windows/M.1683165158.A.54E.html
※ 发信站: 批踢踢实业坊(ptt.cc)
※ 转录者: loser1 (125.227.9.148 台湾), 05/04/2023 09:55:15