Solved

Run vb function whose name is stored in a database

Posted on 2008-10-04
7
455 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
Highfive + Dolby Voice = No More Audio Complaints!

Poor audio quality is one of the top reasons people don’t use video conferencing. Get the crispest, clearest audio powered by Dolby Voice in every meeting. Highfive and Dolby Voice deliver the best video conferencing and audio experience for every meeting and every room.

 
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

How to run any project with ease

Manage projects of all sizes how you want. Great for personal to-do lists, project milestones, team priorities and launch plans.
- Combine task lists, docs, spreadsheets, and chat in one
- View and edit from mobile/offline
- Cut down on emails

Join & Write a Comment

This article explains how to create and use a custom WaterMark textbox class.  The custom WaterMark textbox class allows you to set the WaterMark Background Color and WaterMark text at design time.   IMAGE OF WATERMARKS STEPS Create VB …
It’s quite interesting for me as I worked with Excel using vb.net for some time. Here are some topics which I know want to share with others whom this might help. First of all if you are working with Excel then you need to Download the Following …
Polish reports in Access so they look terrific. Take yourself to another level. Equations, Back Color, Alternate Back Color. Write easy VBA Code. Tighten space to use less pages. Launch report from a menu, considering criteria only when it is filled…
When you create an app prototype with Adobe XD, you can insert system screens -- sharing or Control Center, for example -- with just a few clicks. This video shows you how. You can take the full course on Experts Exchange at http://bit.ly/XDcourse.

707 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

Need Help in Real-Time?

Connect with top rated Experts

16 Experts available now in Live!

Get 1:1 Help Now