之前因为老板要求，本来我手上的 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 打不开? 自己回: office 2016 应该是被更新到使用新的 password 编码方式， 因此就算是旧的 word 档使用旧编码，只要更新过就只能用新的编码加密， 同时也别想用旧的 office 2003 开启。 (PS: e04) 解决方法只能写 BATCH 在使用 office 2003 开档案前先解密编完再加密。 (PS: e04) -- 别问我为什麽还在用 office2003, 如果 office 2007 之後没有改用 RIBON 介面 我就乖乖换了。 使用 RIBON 放弃下拉式选单的工程师，应该剥皮实草吊在纽约联合国大楼前示众!! -- 啧啧啧啧啧啧啧啧啧啧啧啧啧啧啧啧 啧啧啧啧啧啧啧啧啧啧啧啧啧啧啧啧 啧啧啧啧啧啧啧啧啧啧啧啧啧啧啧啧 啧啧啧啧啧啧啧啧啧啧啧啧啧啧啧啧 啧啧啧啧啧啧啧啧啧啧啧啧啧啧啧啧 啧啧啧啧啧啧啧啧啧啧啧啧啧啧啧啧 --

※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 125.227.9.148 (台湾) ※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Windows/M.1683165158.A.54E.html ※ loser1:转录至看板 Office 05/04 09:55 看起来是 2022 年12月改用 128 bit key 导致开不了........ ※ 编辑: loser1 (60.251.196.233 台湾), 05/04/2023 12:20:26 ※ 编辑: loser1 (60.251.196.233 台湾), 05/04/2023 13:04:00 也不是这样说............ 当有 office 4.0 时我用 office 4.0 当出现 office 95 我改用 office 95 当出现 office 97 我抗拒，因为他用真时字体显示字型但是当时硬体跟不上 当出现 office 2000 我跟着用 office 2000 当出现 office 2003 我跟着用 office 2003 然後该死的 ribon 介面就出来............. 我的作业时薪很贵，不值得浪费时间学废物新软体!! ※ 编辑: loser1 (125.227.9.148 台湾), 05/04/2023 15:34:53