Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Servers (https://www.clubdelphi.com/foros/forumdisplay.php?f=9)
-   -   Contraseña en word (https://www.clubdelphi.com/foros/showthread.php?t=35073)

gilberto_1126 30-08-2006 18:54:39

Contraseña en word
 
Saludos y de antemano muchas gracias por su tiempo.
El problema es el siguiente.
Desde mi aplicacion quisiera abrir archivos de word, pero estos archivos tienen contraseñas. Las contraseñas si las tengo, pero lo que quiero hacer es que el usuario no teclee esta contraseña, que mi aplicacion las coloque al momento de que se intente abrir el documento.

Gracias

roman 30-08-2006 20:15:29

Es sólo cuestión de pasarlo como parámetro al método Open:

Código Delphi [-]
var
  Word: OleVariant;
  Document: OleVariant;

begin
  Word := ComObj.CreateOleObject('Word.Application'); // incluir unidad ComObj

  try
    Document := Word.Documents.Open(
      'c:\ruta\al\archivo.doc', // archivo que se va a abrir
      null,                     // irrelevante, nos lo saltamos
      null,                     // irrelevante, nos lo saltamos
      null,                     // irrelevante, nos lo saltamos
      'elsantoyseña'            // contraseña para abrir el documento
    );

    Word.Visible := true;
  except
    Word.Quit;
  end;
end;

Otras contraseñas, como la de guardar cambios (si está establecida) se pone en otros parámetros más adelante. Consulta la ayuda de Visual Basic para Word.

// Saludos


La franja horaria es GMT +2. Ahora son las 22:48:03.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi