Como sacar operaciones matematicas con datox obtenidos de la DB

[th3r0rn]

Hola, necesito sacar unas operaciones matematicas con unos datos que extraigo de una db, el problema es que no se como puedo hacerlo, si existe alguna forma de asignar el valor obtenido de la base de datos a una variable o constante. El otro problema es que los datos con los que quiero realizar las operaciones los extraigo de dos consultas diferentes y por tal creo2 conexiones a la base de datos que obviamente cierro conexion ya que obtengo los datos:
Explico, lo que quiero hacer es sacar el "OP" el cual se calcula de la siguiente forma:

OP=media-Target/target
La media es el promedio que muestro en mi codigo en la linea 56 y el target es el que muestro en la tabla html de la columna Target:

Código ASP:

<td><b>Linea</b></td>
<td><b>Peso</b></td>
<td><b>Target</b></td>
<td><b>Marca</b></td>
<td><b>Vaso</b></td>
<td><b>Tubo</b></td>
<td><b>Fecha</b></td>
</tr>
<&#37;
 
dim conexion,calendar1,calendar2,registros,linea,hora,test
calendar1=request.form("calendar1")
calendar2=request.form("calendar2")
linea=request.form("linea")
Tubo=request.form("tubo")
hora=request.form("hora")
test=("SELECT h.hora,h.marca,h.codoptima,h.target,P.CODOPTIMA,O.CODIGO,p.hora,p.peso,p.vaso,p.fecha, o.linea,o.tubo FROM pesos as p, optimas as o,htargets as h where o.codigo = p.codOptima and o.linea = '"&linea&"' and o.tubo LIKE '"&tubo&"'  AND p.fecha Between '"&calendar1&"' AND '"&calendar2&"' AND p.hora='"&hora&"'and h.codoptima = o.codigo and h.hora='"&hora&"'")
        SET conexion=Server.CreateObject("ADODB.Connection")
        conexion.Open "PROVIDER=SQLOLEDB; DATA SOURCE=VALP-MESSRV02;UID=sa;PWD=messrv;DATABASE=wasp "
        SET registros=Server.CreateObject("ADODB.RecordSet")
        'registros.open"SELECT peso,tubo from pesos where fecha  between '"&calendar1&"' AND '"&calendar2&"'",conexion
 
    registros.open"SELECT h.hora,h.marca,h.codoptima,h.target,P.CODOPTIMA,O.CODIGO,p.hora,p.peso,p.vaso,p.fecha, o.linea,o.tubo FROM pesos as p, optimas as o,htargets as h where o.codigo = p.codOptima and o.linea = '"&linea&"' and o.tubo LIKE '"&tubo&"'  AND p.fecha Between '"&calendar1&"' AND '"&calendar2&"' AND p.hora='"&hora&"'and h.codoptima = o.codigo and h.hora='"&hora&"'" ,conexion
    'registros.open"SELECT p.hora,p.peso,p.vaso,p.fecha, o.linea,o.tubo FROM pesos as p, optimas as o where o.codigo = p.codOptima and o.linea = 'L15N' and o.tubo LIKE '%'  AND p.fecha Between '2010-06-14 09:00:00.000' AND '2010-06-14 09:30:00.000' AND p.hora='9:00 - 9:30'" ,conexion    
    'SELECT h.codoptima,h.target,P.CODOPTIMA,O.CODIGO,p.hora,p.peso,p.vaso,p.fecha, o.linea,o.tubo,o.codigo FROM pesos as p, optimas as o,htargets as h where o.codigo = p.codOptima and o.linea = 'L07N' and o.tubo LIKE '%' AND p.fecha Between '2010-06-14 09:30' AND '2010-06-14 10:00' AND p.hora='9:30 - 10:00' and h.codoptima = o.codigo
 
    do while not registros.eof
 
        response.write("<tr>")
        response.write("<td>"&registros.fields("linea")&"</td>")
        response.write("<td>"&registros.fields("peso")&"</td>")
        response.write("<td>"&registros.fields("target")&"</td>")
        response.write("<td>"&registros.fields("marca")&"</td>")
        response.write("<td>"&registros.fields("vaso")&"</td>")
        response.write("<td>"&registros.fields("tubo")&"</td>")
        response.write("<td>"&registros.fields("fecha")&"</td>")
        registros.movenext
 
 
loop
 
conexion.close
response.write(test) '<--Test Debug
RESPONSE.WRITE("<br>")
 
 
            'SELECT p.peso,p.tubo,p.fecha, o.linea FROM pesos as p, optimas as o where o.codigo = p.codOptima and o.linea = 'L02N'  AND p.fecha Between '2010-05-11 09:42:34.000' AND '2010-05-11 09:42:39.000'
            SET conexion2=Server.CreateObject("ADODB.Connection")
            conexion2.Open "PROVIDER=SQLOLEDB; DATA SOURCE=VALP-MESSRV02;UID=sa;PWD=messrv;DATABASE=wasp "
            SET registros2=Server.CreateObject("ADODB.RecordSet")
        
        registros2.open"SELECT AVG(PESO)as peso from pesos where fecha Between '"&calendar1&"' AND '"&calendar2&"'",conexion2 
        
        do while not registros2.eof
        
        response.write("Promedio: "&registros2.fields("peso")&"")
        registros2.movenext
    loop
        
        conexion2.close
        
%>
 

Como vemos son 2 conexiones distintas, como puedo hacer este calculo?

[Myakire]

No ocupas tener una conexión por consulta, sería una conexión por servidor y ni siquiera esta limitante si consideras los servidores vinculados.

Tu código tiene muchos puntos de mejora, pero para lo que necesitas creo que con solo obtener el promedio antes de lo que imprimes el target y luego ya en esa consulta haces la operación que necesitas.