Re^3: How to find GUID of Typelibrary for a given OLE Object?

This is the PROGID, which doesn't appear to be returned by Win32::OLE. However you could cheat and add the following to the previous code:

sub ApplicationTypeLib {
    my $typelib = shift;
    $typelib =~ s/\.Application//;
    for my $lib (@Library) {
        return @$lib    if($lib->[1] =~ /$typelib/);
    }
    return ();
}
[download]

--
Barbie | Birmingham Perl Mongers user group | http://birmingham.pm.org/

Comment on Re^3: How to find GUID of Typelibrary for a given OLE Object? Download Code

Replies are listed 'Best First'.
Re^4: How to find GUID of Typelibrary for a given OLE Object? by Anonymous Monk on Mar 31, 2005 at 09:08 UTC
Thanks for your answer! Is this hack GUARANTEED to work for any ActiveX object name (i.e. is this naming scheme a some form of a standard)? (I mean is there anything regarding this in OLE specs)? Can I rely on this hack in my code?	[reply]
Re^5: How to find GUID of Typelibrary for a given OLE Object? by abhinavvaid (Acolyte) on Apr 01, 2005 at 10:46 UTC
Using Perl with OLE. There are various tools available in the market to get the GUID's. The one that comes with Active Perl k/a browser works well. And then there are ways to track it via registry and Microsoft OLE viewer also.	[reply]