Reflected Parameter Values

[Bananafish]

I am writing an errohandler at the moment, and I'd like to be able to record the values of any parameters passed into the sub/function where the exception occured.

I can find the sub/function using reflection, and I can even find the names of the parameters, I would now like to take it one step further and return the values...

Any ideas?

[VBCrazyCoder]

I have been using reflection to get the name of the assembly and version, but how did you get the name of the method and the parameters? Sorry I can't answer your question, and instead pose one .

[Bananafish]

This code will display the Assembly, Process and Parameters (names and Types - sadly not the values) that are in the stack...

Try
 
         '*********************************************
         '* Define Stack Related Objects
         '*********************************************
         Dim objDisplay As New System.Text.StringBuilder
         Dim objParameters() As System.Reflection.ParameterInfo
         Dim strParams As String
         Dim intParams As Int32
         Dim objStackTrace As New System.Diagnostics.StackTrace
         Dim objStackFrame As System.Diagnostics.StackFrame
         Dim objStackFrameMethod As System.Reflection.MethodBase
         Dim intFrameCount As Int32 = 0
 
         '**********************************************
         '* Return Stack Details
         '**********************************************
         For intFrameCount = 0 To objStackTrace.FrameCount - 1
            objStackFrame = New System.Diagnostics.StackFrame
            objStackFrame = objStackTrace.GetFrame(intFrameCount)
            objStackFrameMethod = objStackFrame.GetMethod()
            
            objDisplay.Append(objStackFrameMethod.ReflectedType.FullName & vbCrLf)
            objDisplay.Append("    " & objStackFrameMethod.Name & vbCrLf)
 
            objParameters = objStackFrameMethod.GetParameters
            For intParams = 0 To objParameters.Length - 1
                 objDisplay.Append("      Name=")
                 objDisplay.Append(objParameters(intParams).Name)
                 objDisplay.Append(", Type=")
                 objDisplay.Append(objParameters(intParams).ParameterType.Name)
                 objDisplay.Append(vbcrLf)
            Next
         Next
 
         return objDisplay.ToString

[VBCrazyCoder]

Thanks for the code!

Also, I don't think it is possible to do what you want to do. I think Reflection examines the Class, not the Object, so I don't think there is a way to get run-time values. Also, what if you went to get the value but it was garbage collected already? I don't think you can do it, but could be wrong.

[VBCrazyCoder]

Although, doing some searching, there were some references to the debugger API. Check out:

http://msdn.microsoft.com/library/de...dn_debugeh.asp

Might be some info for you in there.

Hope that helps!