This discussion is archived
4 Replies Latest reply: Nov 21, 2012 12:59 AM by vansul RSS

Getting Clients Machines's Recent Words - Documents

973608 Newbie
Currently Being Moderated
How can i get Clients Machines's Recent Words - Documents
  • 1. Re: Getting Clients Machines's Recent Words - Documents
    vansul Pro
    Currently Being Moderated
    You need to open the clients machine recent directory
    and check all the doc extentions
    this can be done via accessing the directories of the lcoal users recent directory.
    you can use any of package like TEXT_IO, ole2, webutil etc to access that directory.
  • 2. Re: Getting Clients Machines's Recent Words - Documents
    vansul Pro
    Currently Being Moderated
    You can also access the word application via client_ole2 package of webutil package

    for this you need to make the word.application as the object
    then access the recentfiles of that object as object
    and then get each file in that collection and get the name of each file
    thats all the recent files approx 17 files available in the word recent tab.
  • 3. Re: Getting Clients Machines's Recent Words - Documents
    973608 Newbie
    Currently Being Moderated
    can you please give me an example.
  • 4. Re: Getting Clients Machines's Recent Words - Documents
    vansul Pro
    Currently Being Moderated
    declare

    kwordl client_ole2.obj_type;
    rcent client_ole2.obj_type;
    sfile client_ole2.obj_type;
    sfiles number;
    fname varchar2(300);
    slist client_ole2.list_type;
    coll varchar2(4000);

    begin
    kword:=client_ole2.create_obj('word.application');
    rcent:=client_ole2.get_obj_property(kword,'recentfiles');
    sfiles:=client_ole2.get_num_property(rcent,'count');

    for nloop in 1.. sfiles
    loop
    slist:=client_ole2.create_arglist;
    sfile:=client_ole2.get_obj_property(rcent,'item',slist);
    client_ole2.destroy_arglist(slist);
    fname:=client_ole2.get_char_property(file,'name');
    coll:=coll||chr(10)||fname;
    end loop;
    message(coll);
    client_ole2.release_obj(rcent);
    client_ole2.release_obj(sfile);
    client_ole2.release_obj(kword);
    end;

Legend

  • Correct Answers - 10 points
  • Helpful Answers - 5 points