Public Sub Execute(ByVal SP As String)
Dim QueryConnection As New OdbcConnection(ConfigurationManager.ConnectionStrings("DBConnection").ToString)
QueryConnection.Open()
Dim cmd As New OdbcCommand(SP, QueryConnection)
cmd.Parameters.Add(---------------------------)
cmd.ExecuteNonQuery()
QueryConnection.Close()
End Sub