[SOLUCIONADO] Formulas Dinámicas Creadas por el usuario ASP.NET VB

[Chily_Aleman]

Buenas Tengo una consulta sobre proyecto


Tengo 2 tablas en mi base de datos una llamada Variables y otra llamada Formulas

en la tabla variables tengo los siguientes campos

• Codigo
• Tipo : (el tipo puede ser formula o valor fijo)
• Valor: (si el tipo es valor fillo este campo se llena)
• Formula_id : (si el tipo es formula este campo se llena)

tengo un boton donde busca el codigo de la formula y este me devuelve la formula que esta guardada en la base de datos

Public Function formulas(seleccion As String)
Dim formula As String
seleccion = dbasp.buscar("formula_id", "variables", "codigo", "'" + seleccion + "'")
formula = dbasp.buscar("formula_formula", "formulas", "formula_id", "'" + seleccion + "'")
Return (formula)
End Function



el cual me devuelve la formula en un campo string : ( ING1 / 2 )


La pregunta es como ejecuto esa formula ?
por que primero tengo que buscar el valor de ING1 en la base de datos y luego dividirlo entre 2

[wwwmaster]

Quiza esto pueda dar opciones:
http://es.scribd.com/doc/22767718/AR...por-el-usuario

Yo pensaria en:
- crear "al vuelo" en codigo javascript (con el EVAL que mencionan alli)
- intentar crear una instruccion SQL con los valores de los campos para que sea SQL quien ejecute las operaciones

[Chily_Aleman]

Gracias WWWMaster Pude Solucionar pero de otra forma

les dejo por qui el código por si alguien lo necesita

después de encontrar la formula en la base de datos con la funcion

Código:

Dim valor = formulas(seleccion) ' Buscamos la formula del seleccion - donde selecion es el id -

' dbasp.buscar es mi funcion para  buscar en la base de datos
  Public Function formulas(seleccion As String)
        Dim formula As String
        seleccion = dbasp.buscar("formula_id", "variables", "codigo", "'" + seleccion + "'")
        formula = dbasp.buscar("formula_formula", "formulas", "formula_id", "'" + seleccion + "'")
        Return (formula)
    End Function

eso me devuelve la formula previamente almacenada en mi base de datos en una string la cual yo se que tengo en este formato ( MGT1 * 2) donde MGT el codigo de mi variable

utilizo Dim c = Split(valor, " ") la cual me divide la formula en

C(0) = "("
C(1) = "MGT1"
C(2) = "*"
C(3) = "2"
C(4) = ")"


Lo que hago es buscar en la tabla de variables cada una de las posiciones y alguna coincide con un cogido remplaza ese valor por el valor de la variable de la base de datos es decir remplaza "MGT1" por "100"

Código:

        For num = 0 To c.Length - 1 Step +1
            respuesta = dbasp.freequery("select variable_origen from variables where codigo = '" + c(num) + "'")
            If respuesta <> Nothing Then
                c(num) = "(" + respuesta + ")"
            End If

        Next

entonces la formula final queda ( (100) * 2 )




luego esto lo mando a SQL con una función y el lo ejecuta y almacena el resultado en un campo