|
|
| Submitted on: 9/30/2002 3:05:07 PM
By: Garth Olivier
Level: Advanced
User Rating:
By 2 Users
Compatibility:VB.NET, ASP.NET
Users have accessed this article 3025 times.
| |
| | | After having problems with Asp Application deployed to several sites. I needed a way to see what was different.
Thus needed refection.
This will provide version numbers and more
Paste the code below into a Aspx Page named Version.aspx and then browse it.
If you include in a project it will then reflect for the whole assembly
Cheers
Garth
| |
| |
Terms of Agreement:
By using this article, you agree to the following terms...
1) You may use
this article in your own programs (and may compile it into a program and distribute it in compiled format for languages that allow it) freely and with no charge.
2) You MAY NOT redistribute this article (for example to a web site) without written permission from the original author. Failure to do so is a violation of copyright laws.
3) You may link to this article from another website, but ONLY if it is not wrapped in a frame.
4) You will abide by any additional copyright restrictions which the author may have placed in the article or article's description. | | <%@ Import Namespace="System.Reflection" %>
<%@ Page Language="vb" Debug="true" %>
<script language="vb" runat="server">
sub page_load(sender as object, e as eventargs)
response.write("<h1>Assembly information</h1>")
response.write(GetAssemblyInfo())
end sub
Private Function GetAssemblyInfo() As String
Dim thisAssembly As [Assembly] = [Assembly].GetExecutingAssembly()
Dim strOut As String = "<table border=1>"
Dim RefAssembly As AssemblyName
Dim TypeObj As Type
Dim MethodObj As MethodInfo
Dim ParamObj As ParameterInfo
Dim EventObj As EventInfo
Dim ConstructObj As ConstructorInfo
Dim PropObj As PropertyInfo
Dim MemberObj As MemberInfo
strOut = strOut & "<tr><td>Assembly Name</td><td>" & thisAssembly.FullName & "</td></tr>"
strOut = strOut & "<tr><td>Base</td><td>" & thisAssembly.CodeBase & "</td></tr>"
strOut = strOut & "<tr><td>Location</td><td>" & thisAssembly.Location & "</td></tr></table>"
strOut = strOut & "<table border=1>"
strOut = strOut & "</br>"
For Each RefAssembly In thisAssembly.GetReferencedAssemblies
strOut = strOut & "<tr><td>Reference</td><td>" & RefAssembly.Name & "</td><td>" & RefAssembly.Version.ToString & "</td></tr>"
Next
strOut = strOut & "</table></br><table border=1>"
For Each TypeObj In thisAssembly.GetTypes
strOut = strOut & "<tr><td>Class</td><td>" & TypeObj.FullName & "</td><td>" & TypeObj.Module.Name & "</td><td></td><td></td></tr>"
For Each PropObj In TypeObj.GetProperties
strOut = strOut & "<tr><td></td><td>Property</td><td>" & PropObj.Name & "</td><td></td><td></td></tr>"
Next
For Each ConstructObj In TypeObj.GetConstructors
strOut = strOut & "<tr><td></td><td>Constructor</td><td>" & ConstructObj.Name & "</td><td></td><td></td></tr>"
For Each ParamObj In ConstructObj.GetParameters
strOut = strOut & "<tr><td></td><td></td><td>Parameters</td><td>" & ParamObj.Name & "</td><td></td></tr>"
Next
Next
For Each MethodObj In TypeObj.GetMethods
strOut = strOut & "<tr><td></td><td>Method</td><td>" & MethodObj.Name & "</td><td></td><td></td></tr>"
For Each ParamObj In MethodObj.GetParameters
strOut = strOut & "<tr><td></td><td></td><td>Parameter</td><td>" & ParamObj.Name & "</td><td>" & ParamObj.ParameterType.ToString & "</td></tr>"
Next
Next
For Each EventObj In TypeObj.GetEvents
strOut = strOut & "<tr><td></td><td>Event</td><td>" & EventObj.Name & "</td><td></td><td></td></tr>"
Next
Next
strOut = strOut & "</table>"
Return strOut
End Function
</script>
| |
| |
| Report Bad Submission |
|
| |
| Your Vote! |
|
See Voting Log |
| |
| Other User Comments |
10/1/2002 2:13:04 PM:Deepak Kumar Shaw
This is Really nice and help full
codes.
Thx
|
|
| Add Your Feedback! |
Note:Not only will your feedback be posted, but an email will be sent to the code's author in your name.
NOTICE: The author of this article has been kind enough to share it with you. If you have a criticism, please state it politely or it will be deleted.
For feedback not related to this particular article, please click here.
|
|
