Solved

Run vb function whose name is stored in a database

Posted on 2008-10-04
7
458 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
7 Comments
 
LVL 59

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
VMware Disaster Recovery and Data Protection

In this expert guide, you’ll learn about the components of a Modern Data Center. You will use cases for the value-added capabilities of Veeam®, including combining backup and replication for VMware disaster recovery and using replication for data center migration.

 
LVL 2

Accepted Solution

by:
madivad2 earned 300 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 85

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

NAS Cloud Backup Strategies

This article explains backup scenarios when using network storage. We review the so-called “3-2-1 strategy” and summarize the methods you can use to send NAS data to the cloud

Question has a verified solution.

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

Article by: Kraeven
Introduction Remote Share is a simple remote sharing tool, enabling you to see, add and remove remote or local shares. The application is written in VB.NET targeting the .NET framework 2.0. The source code and the compiled programs have been in…
Since .Net 2.0, Visual Basic has made it easy to create a splash screen and set it via the "Splash Screen" drop down in the Project Properties.  A splash screen set in this manner is automatically created, displayed and closed by the framework itsel…
Although Jacob Bernoulli (1654-1705) has been credited as the creator of "Binomial Distribution Table", Gottfried Leibniz (1646-1716) did his dissertation on the subject in 1666; Leibniz you may recall is the co-inventor of "Calculus" and beat Isaac…
Finds all prime numbers in a range requested and places them in a public primes() array. I've demostrated a template size of 30 (2 * 3 * 5) but larger templates can be built such 210  (2 * 3 * 5 * 7) or 2310  (2 * 3 * 5 * 7 * 11). The larger templa…

770 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