Ver Mensaje Individual
  #89 (permalink)  
Antiguo 20/08/2006, 21:53
Avatar de dobled
dobled
 
Fecha de Ingreso: enero-2002
Ubicación: Rancagua - Chile
Mensajes: 1.328
Antigüedad: 22 años, 9 meses
Puntos: 2
NzO Muchas gracias por darte el trabajo de pasarlo a ASP. Bueno aqui mi aporte dejo el archivo index.asp que falta para completar todo el codigo este es el que trae los valores.

Muchas Gracias y si que funciona.

Código:
<html>
<head>
<title>Modificacion de datos In situ - isiAJAX</title>
<link rel="stylesheet" type="text/css" href="desing/estilos.css">
<script language="javascript" src="js/isiAJAX.js"></script>
<script language="javascript">
var last;
function Focus(elemento, valor) {
	$(elemento).className = 'inputon';
	last = valor;
}
function Blur(elemento, valor, campo, id) {
	$(elemento).className = 'inputoff';
	if (last != valor)
		myajax.Link('actualiza.asp?valor='+valor+'&campo='+campo+'&id='+id);
}
</script>
</head>
<body onLoad="myajax = new isiAJAX();">
<div align="center">
<!--#include file="conectar.asp" -->
<%
		SQL = "SELECT * FROM insitu"
		Set Rs = Server.CreateObject("ADODB.Recordset")
		Rs.Open SQL, oConn,3,3
%>
<table width="95%" border="0" cellpadding="4" cellspacing="3">
	<tr>
		<td width="25%" class="titulo"><b>Nombre</b></td>
		<td width="30%" class="titulo"><b>Apellidos</b></td>
		<td width="10%" class="titulo"><b>Pais</b></td>
		<td width="3%" class="titulo"><b>Edad</b></td>
		<td width="15%" class="titulo"><b>telefono</b></td>
		<td width="15%" class="titulo"><b>E-Mail</b></td>
	</tr>
<%
      Do While Not Rs.EOF
%>	<tr>
		<td class="td">
			<input onFocus="Focus(this.id, this.value)" onBlur="Blur(this.id, this.value, 'nombre', <% =Rs.Fields("id") %>)" class="inputoff" id="a<% =Rs.Fields("id") %>" value="<% =Rs.Fields("nombre") %>"></td>
		<td class="td"><input onFocus="Focus(this.id, this.value)" onBlur="Blur(this.id, this.value, 'apellidos', <% =Rs.Fields("id") %>)" class="inputoff" id="b<% =Rs.Fields("id") %>" value="<% =Rs.Fields("apellidos") %>"></td>
		<td class="td"><input onFocus="Focus(this.id, this.value)" onBlur="Blur(this.id, this.value, 'pais', <% =Rs.Fields("id") %>)" class="inputoff" id="c<% =Rs.Fields("id") %>" value="<% =Rs.Fields("pais") %>"></td>
		<td class="td"><input onFocus="Focus(this.id, this.value)" onBlur="Blur(this.id, this.value, 'edad', <% =Rs.Fields("id") %>)" class="inputoff" id="d<% =Rs.Fields("id") %>" value="<% =Rs.Fields("edad") %>"></td>
		<td class="td"><input onFocus="Focus(this.id, this.value)" onBlur="Blur(this.id, this.value, 'telefono', <% =Rs.Fields("id") %>)" class="inputoff" id="e<% =Rs.Fields("id") %>" value="<% =Rs.Fields("telefono") %>"></td>
		<td class="td"><input onFocus="Focus(this.id, this.value)" onBlur="Blur(this.id, this.value, 'email', <% =Rs.Fields("id") %>)" class="inputoff" id="f<% =Rs.Fields("id") %>" value="<% =Rs.Fields("email") %>"></td>
	</tr>
<%
    Rs.MoveNext
    Loop
%>
</table>
</div>
</body>
</html>
__________________
Usa títulos específicos y con sentido
En las listas de correo o en los grupos de noticias, la cabecera del mensaje es tu oportunidad de oro para atraer la atención de expertos cualificados en aproximadamente 50 caracteres o menos. No los desperdicies en balbuceos como "Por favor ayúdame" (de "POR FAVOR AYÚDAME!!!" ya ni hablamos). No intentes impresionarnos con lo profundo de tu angustia; mejor usa ese preciado espacio para una descripción lo más concisa posible del problema.