I\'m writing a function that decrypts encrypted word files. I am using the MSOffCrypto package. I would like the function to decrypt the file if it is encrypted and to creat