aggiornare record in un ciclo do...while

[sirius]

Non so se è possibile farlo ma vorrei aggiornare un record mentre lo sto leggendo... :master:

spè:
ecco la pagina

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>

<%
'-----------------------------------------------------------------Aggiorna il database per gli annunci piu vecchi di 2 settimane
attivo = "1"
settimana_att = DatePart("ww", Date(),2 ,1)
scaduto = "0"

Set RS = Server.CreateObject ("ADODB.Recordset")
SQL = "SELECT * FROM annunci WHERE attivo = '"&attivo&"'"
RS.Open SQL, Conn, adOpenStatic, adLockOptimistic

RS.MoveFirst

Do While Not RS.EOF
id_upd = RS("id")
data_ins = RS("data_ins")
settimana_ins = DatePart("ww", RS("data_ins"),2 ,1)
scadenza = settimana_ins + 2
If settimana_att < scadenza Then
Set RSupd = Server.CreateObject ("ADODB.Recordset")
SQL2 = "UPDATE annunci SET attivo = "&scaduto&" WHERE id = "&id_upd&""
Conn.execute(sql2)
End If
Loop

RS.Close
Set RS = Nothing

%>
<%="data attuale"%>

<%=Date()%>

<%=settimana_att%>



<%="data del database"%>

<%=data_ins%>

<%=settimana_ins%>



Solo che non mi funzia.....mi domando......
è possibile fare una cosa del genere e allora non funzionerà mai oppure...?
dove caspita sto sbagliando

[santino83]

si che si puo. che errore ti da lo script

[sirius]

tempo per l'operazione esaurito.....

[weppos]

Manca il MoveNext prima del loop.
Esegui un ciclo infinito sempre sullo stesso record che manca in palla il server.

[sirius]

VVoVe: VVoVe: VVoVe:



ops!!
funziona alla grande
grazie di tutto ragazzi sono piu fuori di quello che pensavo!!