G
Greg Bell
Hi why does first bit work and 2nd doesn't:
1.
Dim m_Trademark As SR.AssemblyTrademarkAttribute
m_Trademark =
m_AssInfo.GetCustomAttributes(GetType(SR.AssemblyTrademarkAttribute),
False)(0)
2.
Dim m_Version As SR.AssemblyVersionAttribute
Try
m_Version =
m_AssInfo.GetCustomAttributes(GetType(SR.AssemblyVersionAttribute),
False)(0)
Return m_Version.Version.ToString
Catch Ex As Exception
MsgBox(Ex.ToString)
End Try
The error says that IndexOutOfRangeException
but the AssemblyInfo.vb has:
<Assembly: AssemblyTitle("Test")>
<Assembly: AssemblyDescription("Test System")>
<Assembly: AssemblyCompany("Bell")>
<Assembly: AssemblyProduct("DotNetProject")>
<Assembly: AssemblyCopyright("Copyright © 2005 . All rights reserved.")>
<Assembly: CLSCompliant(True)>
<Assembly: AssemblyVersion("1.5.*")>
Greg
1.
Dim m_Trademark As SR.AssemblyTrademarkAttribute
m_Trademark =
m_AssInfo.GetCustomAttributes(GetType(SR.AssemblyTrademarkAttribute),
False)(0)
2.
Dim m_Version As SR.AssemblyVersionAttribute
Try
m_Version =
m_AssInfo.GetCustomAttributes(GetType(SR.AssemblyVersionAttribute),
False)(0)
Return m_Version.Version.ToString
Catch Ex As Exception
MsgBox(Ex.ToString)
End Try
The error says that IndexOutOfRangeException
but the AssemblyInfo.vb has:
<Assembly: AssemblyTitle("Test")>
<Assembly: AssemblyDescription("Test System")>
<Assembly: AssemblyCompany("Bell")>
<Assembly: AssemblyProduct("DotNetProject")>
<Assembly: AssemblyCopyright("Copyright © 2005 . All rights reserved.")>
<Assembly: CLSCompliant(True)>
<Assembly: AssemblyVersion("1.5.*")>
Greg