Ordinare tutti gli ID di una tabella

[dtomasini]

Intendi:

sql = "SELECT ID FROM progettiFormativi"

Questa select mi serve per richiamare i record che ho nella tabella e che gli ID che partono da 2010000 e arrivano a 2011150
quello che devo fare è prendere i vecchi id e aggiornarli tutti con 2011XXX.
Il mio problema è che quando faccio partire la prima select mi parte subito in loop... E non ne capisco il motivo .
Probabilmente sono io che sto annegando in un bicchier d'acqua...
Eventualmente ci sarebbe un'altra soluzione?

[optime]

due cose
1. invece di anno=year(date) metti anno="XYZW" e lo rimpiazi alla fine del loop con una update secca
2. cursore non spostato, loop assicurato! ce la mettiamo una movenext?

[dtomasini]

2. cursore non spostato, loop assicurato! ce la mettiamo una movenext?

Doh!
Controllo e ti faccio sapere! Grazie.

[dtomasini]

Perfetto!!!!

Ora devo però aggiornare anche la tabella unita unita a questa.... Come si può fare?

Io ho provato così:

<%	
	Set Conn=Server.CreateObject("ADODB.Connection")
					
	Conn.open (strConn)
	data = 2011
	'dim strSql
		sql = "SELECT * FROM progettiFormativi"
	
	counter = 0
	set rs = Conn.execute(sql)
	if not(rs.eof) then
		do while not(rs.eof)
			id=rs("ID")
			padcounter = right("000"+Cstr(counter), 3)
			strId = data & padcounter
			
			sql = "UPDATE progettiFormativi SET ID = " & strId & " WHERE ID=" & id
			Conn.execute(sql)
			
			sql = "UPDATE partecipantiPrevisti SET IDprogetto = " & strId & ", aggiorna=1 WHERE IDprogetto=" & id & " AND aggiorna=0"
			Conn.execute(sql)
			
			counter = counter + 1
			rs.movenext
		loop
	end if
	Set rs = Nothing
	Conn.close
	Set Conn = Nothing
	
	Set Conn=Server.CreateObject("ADODB.Connection")
					
	Conn.open (strconn)
	data = 2011
	'dim strSql
		sql = "SELECT * FROM progettiFormativi"
	
	counter = 0
	set rs = Conn.execute(sql)
	if not(rs.eof) then
		do while not(rs.eof)
			id=rs("ID")
			padcounter = right("000"+Cstr(counter), 3)
			strId = data & padcounter
			
			sql = "UPDATE progettiFormativi SET ID = " & strId & " WHERE ID=" & id
			Conn.execute(sql)
			
			sql = "UPDATE partecipantiPrevisti SET aggiorna=0 WHERE IDprogetto=" & id
			Conn.execute(sql)
			
			counter = counter + 1
			rs.movenext
		loop
	end if
	Set rs = Nothing
	Conn.close
	Set Conn = Nothing

	response.Redirect("vediPianificazione.asp?azione=editId&esito=corretto")
%>

ho utilizzato anche il campo aggiorna per evitare che in fase di aggiornamento alcuni id inerenti ad alcuni progetti possano essere confusi per altri... Quindi quando viene effettuato l'update il campo aggiorna ciene portato a uno. Una volta fatto ciò riporto tutti i campi aggiorna a 0 così da permettere una nuova modifica.

Naturalmente... NON FUNZIONA !
Optime avevi ragione...
Mi si aggiorna la prima tabella ma la seconda no!
Ma io ho bisogno di riordinarle... come potrebbe essere possibile?

[optime]

hai dato seguito solo al suggerimento n.2 - ci sarebbe anche il numero 1....

[dtomasini]

Originariamente inviato da optime
hai dato seguito solo al suggerimento n.2 - ci sarebbe anche il numero 1....

Non ho capito... ho settato manualmente la variabile anno...
Ma non ho capito l'update secca...

[optime]

1.a hai usato data = 2011 quando io ti avevo detto altro (data="XZYW")
1.b UPDATE tabella SET colonna=replace(colonna,'XYZW', '2001')