Fórum Proteger arquivo do Word so p/ leitura #215315
19/02/2004
0
Ola pessoal.
Estou fazendo a integração de informações com um arquivo do Word, porém gostaria de criar um arquivo novo protegido contra alteração, mas a proteção que eu quero fazer é a mesma utilizada direto no word (proteção de formulario) com senha, pois vou enviar o arquivo para os clientes via email, mas o cliente só pode ler e imprimir, mas não alterar nada.
Estou fazendo a integração de informações com um arquivo do Word, porém gostaria de criar um arquivo novo protegido contra alteração, mas a proteção que eu quero fazer é a mesma utilizada direto no word (proteção de formulario) com senha, pois vou enviar o arquivo para os clientes via email, mas o cliente só pode ler e imprimir, mas não alterar nada.
Helderjr
Curtir tópico
+ 0
Responder
Posts
19/02/2004
Luineumann
faça o seguinte
no word
abra um arquivo do word ´sem senha´
crie uma macro e salve o arquivo com senha
encerre a macro
abra a marca e veja os parâmetros informados com senha
no delphi
quando você executar o comando salvar arquivo do word informe os mesmos parâmetros
por exemplo
no word a macro seria
ActiveDocument.SaveAs FileName:=´DelphiDoc.doc´, FileFormat:= _
wdFormatDocument, LockComments:=False, Password:=´´, AddToRecentFiles:= _
True, WritePassword:=´senhagravacao´, ReadOnlyRecommended:=False, _
EmbedTrueTypeFonts:=False, SaveNativePictureFormat:=False, SaveFormsData _
:=False, SaveAsAOCELetter:=False
no delphi poderia ser
WordDocument.SaveAs( abre várias opções em que uma é semelhante a de cima
agora se vc quer enviar um arquivo em word que não pode ser alterado porque não envia um arquivo .pdf?
no word
abra um arquivo do word ´sem senha´
crie uma macro e salve o arquivo com senha
encerre a macro
abra a marca e veja os parâmetros informados com senha
no delphi
quando você executar o comando salvar arquivo do word informe os mesmos parâmetros
por exemplo
no word a macro seria
ActiveDocument.SaveAs FileName:=´DelphiDoc.doc´, FileFormat:= _
wdFormatDocument, LockComments:=False, Password:=´´, AddToRecentFiles:= _
True, WritePassword:=´senhagravacao´, ReadOnlyRecommended:=False, _
EmbedTrueTypeFonts:=False, SaveNativePictureFormat:=False, SaveFormsData _
:=False, SaveAsAOCELetter:=False
no delphi poderia ser
WordDocument.SaveAs( abre várias opções em que uma é semelhante a de cima
agora se vc quer enviar um arquivo em word que não pode ser alterado porque não envia um arquivo .pdf?
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)