Ver Mensaje Individual
  #2 (permalink)  
Antiguo 03/03/2007, 09:48
Avatar de Shiryu_Libra
Shiryu_Libra
Colaborador
 
Fecha de Ingreso: febrero-2007
Ubicación: Cantando "Screenager" en "Kirafa Kaput"
Mensajes: 3.614
Antigüedad: 18 años, 2 meses
Puntos: 88
Re: actualizacion de 100 registros en una simple instruccion

creo que ya me respondi solo esta, jajajja, bueno es que nomas era cuestion de meditar hasta 1 hora despues que puse ese post.

Código:
"SELECT nombre, domicilio FROM mitablilla"
<form action="a donde sea tu pagina de guardar" Method="post">
cont=0
while not RS.EOF
    cont=cont+1
    <input name="var1_<%=cont%>" value="<%=RS("nombre").value%>" />
    <input name="var2_<%=cont%>" value="<%=RS("domicilio").value%>" />
    RS.movenext
wend
    <input name="cuantos" value="<%cont%>"
    <input type="submit" />
</form>
bueno, he mandado mostrar los resultados en textbox, para poder modificarlos a discrecion, entonces lo que me faltaria ahora es guardarlo

Código:
DIM datos_nom()
DIM datos_dom()
vueltas=request.querystring("cuantos")
REDIM datos_nom(vueltas)
REDIM datos_dom(vueltas)

segun yo, este for es para que no perdamos las variables del formulario, ya me corregiran al mirar el codigo

for i=1 to vueltas
    datos_nom(i)=request.form("var1_<%=i%>")
    datos_dom(i)=request.form("var1_<%=i%>")
next

set oCxn=server.CreateObject("ADODB.Connection")
oCxn.open StrCxn
set RS=server.CreateObject("ADODB.Recordset")

for j=1 to vueltas
sSQL="select nombre, domicilio from tablilla where nombre='"&datos_nom(j)&"' and domicilio='"&datos_dom(j)&"';"
	RS.open sSQL, oCxn, 1, 2
	if Err=0 then
                ' :pensando: bueno este if, se me afigura que sale sobrando, pero pues dan las casualidades... no creen?
		if RS.EOF=FALSE then
                       ':arriba: si es correcto lo que mandamos, lo actualizamos
			RS("nombre").value=datos_nom(j)
			RS("domicilio").value=datos_dom(j)
			RS.updatebatch
		else
                        ':abajo: sino.... pues a guardarlo
                        RS.addnew
			RS("nombre").value=datos_nom(j)
			RS("domicilio").value=datos_dom(j)
			RS.update
		end if
	end if
	RS.close
next
bueno, espero y funcione bien, ya que solo fue un pensamiento, ni siquiera lo he probado, hay me dicen que les parece, y si lo hacen de manera mas rapida, pues ahi les encargo el codigo

creo que esta la manera de hacerlo con SQL, con el UPDATE, pero pues este se me ocurrio......