Aggiornare colonna database

[michmeno]

Buongiorno a tutti,
devo aggiornare la colonna di una tabella con un ordinamento inserito dall'utente.

Il codice della pagina ordinamento.asp con la form è il seguente:

<%
Set RecSet = Server.CreateObject("ADODB.Recordset")
Visa = "SELECT * FROM usato order by Ordinamento asc"
RecSet.Open Visa, Connect, adOpenStatic, adLockOptimistic
Do Until RecSet.EOF
%>
<form method="post" action="addordinamento.asp">
Inserisci l'ordinamento <input type="text" size="3" name="ordinamento" value="<% =RecSet("Ordinamento") %>">
<%
RecSet.MoveNext
Loop
RecSet.Close
%>
<input type="submit" value="Aggiorna">
</form>

Fin qui tutto ok.
I dati inseriti vengono passati alla pagina addordinamento.asp e il codice è il seguente:

<%
Set RecSet = Server.CreateObject("ADODB.Recordset")
Uppdatera = "SELECT * FROM usato"
RecSet.Open Uppdatera, Connect, adOpenStatic, adLockOptimistic

do while not(RecSet.eof)
RecSet("Ordinamento") = Request.Form("ordinamento")
RecSet.movenext
loop

RecSet.Update
RecSet.Close
Connect.Close
%>

Succede che si verifica un errore nel ciclo do while e viene aggiornato solo il primo record con tutti i dati inseriti nella form.

[optime]

se si verifica un errore sarà difficile che funzioni...




















































vuoi dirci l'errore?

[br1]

Una delle cose piu' illogiche che abbia mai visto:
Una infinita' di form nidificati del quale solo il piu' interno chiuso;
Infiniti campi nel/i form/s tutti con lo stesso name;
Una pagina richiamata che crea un recordset in ordinamento random e poi li vorrebbe aggiornare con l'infinita' dei campi di cui sopra anch'essi in ordine sparso... senza contare che campi con lo stesso name vengono ricevuti come unico con i valori separati da virgole

E questo solo per citare i piu' eclatanti

Mi sa che c'e' qualcosa da rivedere...

[michmeno]

Non ci sono form nidificate. Sto cercando di cambiare i valori dei campi chiamati "ordinamento", e come dice BR1 mi aggiorna solo il 1 record con i valori separati da virgole.

[br1]

Originariamente inviato da michmeno
Non ci sono form nidificate.

Originariamente inviato da michmeno

Do Until RecSet.EOF 
%>
  <form method="post" action="addordinamento.asp">
  Inserisci l'ordinamento  <input type="text" size="3" name="ordinamento" value="<% =RecSet("Ordinamento") %>">
<%	
  RecSet.MoveNext
Loop
RecSet.Close 
%>
<input type="submit" value="Aggiorna"> 
</form>

[michmeno]

Ho risolto associando l'id del prodotto al suo ordinamento:

Nella pagina ordinamento.asp la form è il seguente:

<%
Set RecSet = Server.CreateObject("ADODB.Recordset")
Visa = "SELECT * FROM usato order by ordinamento asc"
RecSet.Open Visa, Connect, adOpenStatic, adLockOptimistic %>

<% Do Until RecSet.EOF %>

<form method="post" action="addordinamento.asp">
<input type="hidden" name="AD" value="<% =RecSet("ID") %>">
Inserisci l'ordinamento <input type="text" size="3" name="ordinamento" value="<% =RecSet("Ordinamento") %>">
<input type="submit" value="Aggiorna">
</form>
<%
RecSet.MoveNext
Loop
RecSet.Close
%>

I dati vengono passati alla pagina addordinamento.asp

<%
Set RecSet = Server.CreateObject("ADODB.Recordset")
Uppdatera = "SELECT * FROM usato WHERE ID = " & Request.Form("ad") & " "
RecSet.Open Uppdatera, Connect, adOpenStatic, adLockOptimistic

RecSet("Ordinamento") = Request.Form("ordinamento")

RecSet.Update
RecSet.Close
Connect.Close
%>