Tech or Treat! Write an article about your scariest tech disaster to win gadgets!Learn more

x
?
Solved

Run vb function whose name is stored in a database

Posted on 2008-10-04
7
Medium Priority
?
464 Views
Last Modified: 2012-05-05
I have a data table with Function names.
These functions are defined in my code and work properly.
Most of these functions return a value I require.
I can retrieve the function name from the database but I don't know to invoke the function in vb.net

Should I be retrieving the function name from the database into a string field ?
How would I run/execute the function with parameters
Can you provide a small example
0
Comment
Question by:swendell
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
7 Comments
 
LVL 60

Expert Comment

by:Kevin Cross
ID: 22641869
If your table contains data like this:

FunctionName, Param1, Param2, Param3

What you could do is retrieve the values from database as strings or if parameters are numbers as integers.  Then use a case logic or if statement to determine which function to call.

If dr("FunctionName") = "MyFunction1" Then
    MyFunction1(dr("Param1"), dr("Param2"), dr("Param3"))
End If

Where dr is your SqlDataReader for example, but however you retrieve data is inconsequential to my point so hopefully it is clear.
0
 

Author Comment

by:swendell
ID: 22641906
I can retrieve function name into a string but then I want to run that function.
BUT keep in mind I have many functions and I am not hard-coding every possible function name/value as you did in the example above. In concept looking for something more like this:

Dim myFunction = FunctionNameFromDatabase as string
Execute myFunction & "(" & parameter1 & ")"

0
 
LVL 2

Expert Comment

by:madivad2
ID: 22641919
You are after the "CallByName" Function... refer these links:

http://msdn.microsoft.com/en-us/library/22x2chfx.aspx    and
http://msdn.microsoft.com/en-us/library/chsc1tx6.aspx
0
Concerto's Cloud Advisory Services

Want to avoid the missteps to gaining all the benefits of the cloud? Learn more about the different assessment options from our Cloud Advisory team.

 
LVL 2

Accepted Solution

by:
madivad2 earned 1200 total points
ID: 22641948
Note: Your function or sub MUST be public!

Some sample code for good measure:
Private Sub button_click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        CallByName(Me, "MyBeep", CallType.Method)
End Sub
 
Public Sub MyBeep()
    Beep()
End Sub

Open in new window

0
 
LVL 86

Expert Comment

by:Mike Tomlinson
ID: 22642008
CallByName() will work fine...but if you want the ".Net approved" method then you'll want to use Reflection.  The method/function doesn't have to Public with this approach:

Imports System.Reflection
Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim strIn As String = "Idle_Mind"
        Dim retValue As Integer = 0
        Dim functionName As String = "Foo"

        Dim mi As MethodInfo = Me.GetType.GetMethod(functionName, BindingFlags.Instance Or BindingFlags.Public Or BindingFlags.NonPublic)
        retValue = mi.Invoke(Me, New Object() {strIn})
        MessageBox.Show("retValue = " & retValue, "Return value of Foo()", MessageBoxButtons.OK, MessageBoxIcon.Information)
    End Sub

    Private Function Foo(ByVal param As String) As Integer
        MessageBox.Show("param = " & param, "Inside Foo()", MessageBoxButtons.OK, MessageBoxIcon.Information)
        Return IIf(param.ToLower = "idle_mind", 1, 0)
    End Function

End Class


Some more examples:
http://www.experts-exchange.com/Programming/Languages/.NET/Visual_Basic.NET/Q_22055463.html#17911012
0
 

Author Comment

by:swendell
ID: 22642108
madivad2: That was it. I only needed to add a comma and insert the parameter like this:
CallByName(Me, "MyBeep", CallType.Method, parameter)
I forgot the Me since the function is in the same area
0
 

Author Closing Comment

by:swendell
ID: 31503080
Thank you
0

Featured Post

[Webinar] Lessons on Recovering from Petya

Skyport is working hard to help customers recover from recent attacks, like the Petya worm. This work has brought to light some important lessons. New malware attacks like this can take down your entire environment. Learn from others mistakes on how to prevent Petya like worms.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

I think the Typed DataTable and Typed DataSet are very good options when working with data, but I don't like auto-generated code. First, I create an Abstract Class for my DataTables Common Code.  This class Inherits from DataTable. Also, it can …
Introduction As chip makers focus on adding processor cores over increasing clock speed, developers need to utilize the features of modern CPUs.  One of the ways we can do this is by implementing parallel algorithms in our software.   One recent…
Add bar graphs to Access queries using Unicode block characters. Graphs appear on every record in the color you want. Give life to numbers. Hopes this gives you ideas on visualizing your data in new ways ~ Create a calculated field in a query: …
Want to learn how to record your desktop screen without having to use an outside camera. Click on this video and learn how to use the cool google extension called "Screencastify"! Step 1: Open a new google tab Step 2: Go to the left hand upper corn…
Suggested Courses

647 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question