guid retrieval of assembly

[Brian Henry]

Is there anyway to retrieve the GUID code of an assembly for use in the
application as a unique identifier? thanks!

[Scott]

Dim a As Reflection.Assembly =
Reflection.Assembly.LoadFrom("fileLocationGoesHere ")
Dim i As Integer, guid As String
For i = 0 To a.GetCustomAttributes(False).GetUpperBound(0)
Dim obj As Object = a.GetCustomAttributes(False).GetValue(i)
If TypeOf (obj) Is System.Runtime.InteropServices.GuidAttribute Then
guid = CType(obj,
System.Runtime.InteropServices.GuidAttribute).Valu e
End If
Next
"Brian Henry" <brianiup[nospam]@adelphia.net> wrote in message
news:ur**************@TK2MSFTNGP09.phx.gbl...

Is there anyway to retrieve the GUID code of an assembly for use in the
application as a unique identifier? thanks!

[Brian Henry]

thanks! that worked good

"Scott" <sc*****@yahoo.com> wrote in message
news:eT****************@TK2MSFTNGP11.phx.gbl...

Dim a As Reflection.Assembly =
Reflection.Assembly.LoadFrom("fileLocationGoesHere ")
Dim i As Integer, guid As String
For i = 0 To a.GetCustomAttributes(False).GetUpperBound(0)
Dim obj As Object = a.GetCustomAttributes(False).GetValue(i)
If TypeOf (obj) Is System.Runtime.InteropServices.GuidAttribute Then
guid = CType(obj,
System.Runtime.InteropServices.GuidAttribute).Valu e
End If
Next
"Brian Henry" <brianiup[nospam]@adelphia.net> wrote in message
news:ur**************@TK2MSFTNGP09.phx.gbl...

Is there anyway to retrieve the GUID code of an assembly for use in the
application as a unique identifier? thanks!