14/02/2008, 12:25
| ||||
| ||||
 Operaciones Matematicas En Formulario Saludos amigos, Tengo unos campos de texto los cuales quisiera operarlos matematicamente entre si... Un campo de texto que se multiplique entre otro y este resultado se sume a otro. Obviamente son campos de texto de solo Números... Si se puedo lograr esto? |
|
14/02/2008, 12:49
| ||||
| ||||
| Re: Operaciones Matematicas En Formulario Se puede:
Código:
Obviamente necesitarias controlar mas cosas como validaciones y demas, pero esa es otra historia.dim a
dim b
dim c
a = cdbl(Request.Form("a"))
b = cdbl(Request.Form("b"))
c = a + b
Response.Write("Suma: " & c)
c = a * b
Response.Write("Multiplicacion: " & c)
c = a / b
Response.Write("Division: " & c)
Saludos
__________________ "El hombre que ha empezado a vivir seriamente por dentro, empieza a vivir más sencillamente por fuera." -- Ernest Hemingway |
|
14/02/2008, 13:19
| ||||
| ||||
| Re: Operaciones Matematicas En Formulario Wow... Excelente U_Goldman... Muchas Gracias... Ahora una pregunta, si quisiera que el resultado se me refleje en un campo de texto automaticamente y este se guarde en mi base de datos? |
|
14/02/2008, 13:26
| ||||
| ||||
| Re: Operaciones Matematicas En Formulario realizas la ejecucion que se te acaba de proporcionar.... solo agregas un pequeño codigo extra.. o una funcion sencilla Cita: recojes los datos, como en el de conversion de moneda.... solo que aqui serian mas variables set conexion = server.createobject("adodb.connection") conexion.open strcxn <---- deberas crear la cadena de conexion a tu base insert_query = "insert into tabla (campo1,campo2,campo3) values (" & dat1 & "," & dat2 & "," & dat3 & ")" conexion.execute(insert_query) conexion.close set conexion = nothing 
__________________ "Eres parte del problema, parte de la solucion o parte del paisaje" Un Saludo desde Desierto de Altar, Sonora, MX. Shiryu_libra |
|
14/02/2008, 13:40
| ||||
| ||||
| Re: Operaciones Matematicas En Formulario Gracias Libra... Tu Simepre teniendo respuesta para todo!!!  Ahora tengo un problemita, tengo unas divs que se agregan al hacer un Script, y cuando hago las operaciones me da error, aqui les dejo el codigo para que me digan que estoy haciendo mal!!
Código:
<head>
<script>
function color(obj,num,Pal) {
if (num==0) {
if (obj.value==Pal) {
obj.value='';
obj.style.color='black';
}
}
else
if (obj.value=='') {
obj.value=Pal;
obj.style.color='gray'
}
}
function addNewRow(){
var TABLE = document.getElementById("base");
var TROW = document.getElementById("example");
var content = TROW.getElementsByTagName("td");
var newRow = TABLE.insertRow(-1);
newRow.className = TROW.attributes['class'].value;
insertLOselect(content,newRow);
var newRow2 = TABLE.insertRow(-1);
newRow2.className = TROW.attributes['class'].value;
//window.alert(content);
copyRow(content,newRow2);
}
function removeLastRow() {
var TABLE = document.getElementById("base");
if(TABLE.rows.length > 2) {
TABLE.deleteRow(TABLE.rows.length-1);
TABLE.deleteRow(TABLE.rows.length-1);
}
}
function appendCell(Trow, txt) {
var newCell = Trow.insertCell(Trow.cells.length)
newCell.innerHTML = txt
}
function copyRow(content,Trow) {
var cnt = 0;
for (; cnt < content.length; cnt++) {
appendCell(Trow, content[cnt].innerHTML);
}
}
function insertLOselect(content,Trow) {
var cnt = 0;
for (; cnt < content.length-1; cnt++) {
appendCell(Trow, ' ');
}
}
</script></head><%
dim a
dim b
dim c
dim d
dim e
a = cdbl(Request.Form("cantidad"))
b = cdbl(Request.Form("costo"))
c = cdbl(Request.Form("gasto"))
d = a * b
e = d + c
%><form id="form1" name="form1" method="post" action="">
<table width="507" border="0" cellpadding="1" cellspacing="2">
<tr>
<td colspan="8"><table width="100%" border="0" cellspacing="2" cellpadding="0">
<tr>
<td width="95%"><div align="right"><strong>CÓDIGO ORDEN</strong></div></td>
<td width="5%">
<div align="left"><strong>
<input name="id_orden" type="text" class="TEXT_AREA" id="id_orden" onkeyup="this.value=this.value.toUpperCase()" size="8" maxlength="15" readonly />
</strong></div></td>
</tr>
</table></td>
</tr>
<tr>
<td width="54"><p align="left"><strong>CLIENTE </strong></p> </td>
<td width="419" colspan="7"><div align="left">
<table width="100%" border="0" cellspacing="2" cellpadding="0">
<tr>
<td width="37%"><div align="left"><strong>
<input name="id_cte" type="text" class="TEXT_AREA" id="id_cte" onkeyup="this.value=this.value.toUpperCase()" size="10" maxlength="8" style="color:gray" onfocus="color(this,0,'COD. CLIENTE')" onblur="color(this,1,'COD. CLIENTE')" value="COD. CLIENTE"/>
</strong></div></td>
<td width="63%"><div align="left">
<select name="lis_cte" class="TEXT_AREA" id="lis_cte">
<option>--Seleccione un cliente--</option>
</select>
</div></td>
</tr>
</table>
</div></td>
</tr><tr>
<td height="30" colspan="8"> <div align="center">
<label> </label>
<table width="100%" border="0" cellspacing="2" cellpadding="0">
<tr>
<td height="14" colspan="2" valign="bottom"><table width="100%" border="0" align="center" id="base">
<tr class="celda">
<td width="18%" class="Estilo1" style="padding:3px;"><div align="center"><strong>CANTIDAD</strong></div></td>
<td width="24%" class="Estilo1" style="padding:3px;"><div align="center"><strong>SERVICIO</strong></div></td>
<td width="16%" class="Estilo1" style="padding:3px;"><div align="center" class="Estilo2">
<p>GASTO</p>
</div></td>
<td width="21%" class="Estilo1" style="padding:3px;"><div align="center"><strong>COSTO</strong></div></td>
<td width="19%" class="Estilo1" style="padding:3px;"><div align="center"><strong>TOTAL</strong></div></td>
<td width="2%"> </td>
</tr>
<tr id="example" class="celda">
<td align="center" valign="middle"><input name='cantidad' type='text' class="TEXT_AREA" id='cantidad' value="00" size="2" maxlength="2" style="color:gray" onfocus="color(this,0,'00')" onblur="color(this,1,00')"/></td>
<td align="center" valign="middle" style='padding:3px;'><div align="center">
<select class="TEXT_AREA" name="id_serv" id="opera">
<option>--Seleccione un servicio--</option>
</select>
</div></td>
<td align="center" valign="middle"><div align="center">
<input name='gasto' type='text' class="TEXT_AREA" id='gasto' value="00" size="5" maxlength="5" style="color:gray" onfocus="color(this,0,'00')" onblur="color(this,1,00')"/>
</div></td>
<td align="center" valign="middle"><div align="center">
<input name='costo' type='text' class="TEXT_AREA" id='costo' value="00" size="5" maxlength="5" style="color:gray" onfocus="color(this,0,'00')" onblur="color(this,1,00')"/>
</div></td>
<td align="center" valign="middle"><div align="center">
<input name='total' type='text' class="TEXT_AREA" id='total' value="<%Response.Write("" & e)%>" size="5" maxlength="5" style="color:gray" readonly="readonly"/>
<input type="hidden" name="btnAction" value="next" />
</div></td>
</tr>
</table>
</td>
</tr>
<tr>
<td height="23" colspan="2" valign="top"><div align="center"><input type="button" class="boton" value="[+]" onClick="addNewRow(event)" alt="Adicionar">
<input type="button" class="boton" value="[-]" onClick="removeLastRow(event)" alt="Remover"></div></td>
</tr>
<tr>
<td height="14" valign="top"> </td>
<td valign="bottom"> </td>
</tr>
<tr>
<td width="19%" height="14" valign="top"><strong>OBSERVACIONES</strong></td>
<td width="81%" valign="bottom"><div align="left">
<textarea name="ob_oservicio" cols="45" rows="5" class="TEXT_AREA" id="ob_oservicio" style="color:gray" onfocus="color(this,0,'OBSERVACIONES')" onblur="color(this,1,'OBSERVACIONES')" onkeyup="this.value=this.value.toUpperCase()" value="OBSERVACIONES">OBSERVACIONES</textarea>
</div></td>
</tr>
<tr>
<td height="35" colspan="2" valign="bottom"><div align="center">
<input name="enviar" type="submit" class="TEXT_AREA" id="enviar" value="INGRESAR CLIENTE" />
</div>
<div align="left"></div></td>
</tr>
</table>
<label></label>
</div>
</table>
</form>
|
