Boa Tarde pessoal do Forum
A PAZ DE JESUS A TODOS

Estou começando a usar o webutil no meu sistema.
Preciso abrir um documento do word que vai estar em uma máquina cliente
Estou usando a rotina abaixo, mas logo no começo "V_APP :=
CLIENT_OLE2.CREATE_OBJ('Word.Application')" ele fica parado.

DECLARE
  V_APP  CLIENT_OLE2.OBJ_TYPE;
  docs CLIENT_OLE2.OBJ_TYPE;
  doc  CLIENT_OLE2.OBJ_TYPE;
  selection CLIENT_OLE2.OBJ_TYPE;
  args CLIENT_OLE2.LIST_TYPE;
BEGIN
  -- create a new document
  V_APP := CLIENT_OLE2.CREATE_OBJ('Word.Application');
  CLIENT_OLE2.SET_PROPERTY(V_APP,'Visible',1);
  docs := CLIENT_OLE2.GET_OBJ_PROPERTY(V_APP, 'Documents');
  doc := CLIENT_OLE2.INVOKE_OBJ(docs, 'add');
  selection := CLIENT_OLE2.GET_OBJ_PROPERTY(V_APP, 'Selection');
  -- insert data into new document from long item
  CLIENT_OLE2.SET_PROPERTY(selection, 'Text', 'this is a test message');
  -- save document as example.tmp
  args := CLIENT_OLE2.CREATE_ARGLIST;
  CLIENT_OLE2.ADD_ARG(args, 'c:\example.doc');
  CLIENT_OLE2.INVOKE(doc, 'SaveAs', args);
  CLIENT_OLE2.DESTROY_ARGLIST(args);
  -- close example.tmp
  args := CLIENT_OLE2.CREATE_ARGLIST;
  CLIENT_OLE2.ADD_ARG(args, 0);
  CLIENT_OLE2.INVOKE(doc, 'Close', args);
  CLIENT_OLE2.DESTROY_ARGLIST(args);
  CLIENT_OLE2.RELEASE_OBJ(selection);
  CLIENT_OLE2.RELEASE_OBJ(doc);
  CLIENT_OLE2.RELEASE_OBJ(docs);
  -- exit MSWord
  CLIENT_OLE2.INVOKE(V_APP,'Quit');
END;

Peguei esta rotina do PDF    WebUtil User’s Guide

Desde já muito obrigado.
Alessandro


[As partes desta mensagem que não continham texto foram removidas]



------------------------------------

--------------------------------------------------------------------------------------------------------------------------
>Atenção! As mensagens do grupo ORACLE_BR são de acesso público e de inteira 
>responsabilidade de seus remetentes.
Acesse: http://www.mail-archive.com/[email protected]/ 
--------------------------------------------------------------------------------------------------------------------------
>Apostilas » Dicas e Exemplos » Função » Mundo Oracle » Package » Procedure » 
>Scripts » Tutoriais - O GRUPO ORACLE_BR TEM SEU PROPRIO ESPAÇO! VISITE: 
>http://www.oraclebr.com.br/  
------------------------------------------------------------------------------------------------------------------------
 Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/oracle_br/

<*> Para sair deste grupo, envie um e-mail para:
    [email protected]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
    http://br.yahoo.com/info/utos.html


Responder a