Or, do a search for "dll guid" (without the quotes) in this forum.
I used to rock and roll every night and party every day. Then it was every other day. Now I'm lucky if I can find 30 minutes a week in which to get funky. - Homer Simpson
Public Function GetGuid(ByVal FileName As String) As String
Dim x As TypeLibInfo
Set x = TypeLibInfoFromFile(FileName)
GetGuid = x.Guid
Set x = Nothing
End Function
-George
Strong and bitter words indicate a weak cause. - Fortune cookie wisdom
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.