aggiornare contemporaneamente più record

[lenis]

Buongiorno a tutti.
Qualcuno sa dirmi come realizzare un aggiornamento multiplo di più record di una tabella.
Cioè se io avessi una tabella: id,nome,cognome,indirizzo vorrei vederli ripetuti(in appositi campi di testo per la modifica) per quanti sono i record della tabella, in modo da modificarli tutti e aggiornarli una sola volta con un solo form e non singolarmente.

[4everskiff]

beh, quando fai l'update del recordset lo fai su tutto il recordset, quindi basta che selezioni tutti i record voluti e li aggiorni! ma forse non è quest richiedi... vuoi forse sapere come si fa la form? che db usi?

[lenis]

Scusate tutti! Ce l'avevo davanti agli occhi!Era proprio nella home page.

[lenis]

Ho un database Access, hai ragione, ma la form va ripetuta per ogni record?

[4everskiff]

solo se le modifiche sono specifiche per ogni record!
in tal caso puoi creare le form con asp; ti butto giù un esempio:

sql = "SELECT * FROM tabella ORDER BY id" 'ho fatto un esempio!

Set RS=Server.CreateObject("ADODB.Recordset")
RS.Open sql,dbConn,0

record = 0

Response.Write("<form method='post' action='file.asp'>")

Do While Not RS.EOF

record = record + 1

istr1 = "<input type='text' name='campoA_record" & record & "'>"
istr2 = "<input type='text' name='campoB_record" & record & "'>"
'.... ripeti per tutti i campi che vuoi modificare

Response.Write(istr1 & istr2) ' a seconda di quanti campi ci sono

RS.MoveNext

Loop

Response.Write("<input type='integer' name='numero_records' value='" & record & "' style='visibility: hidden'>")
Response.Write("<input type='submit' name='Invia Dati'>")
Response.Write("</form>")

RS.Close
Set RS=Nothing


nel file.asp metti

numero_record = request.form("numero_record")

dim campoA_record(10000) 'ho messo un max di 10000 record...mi sembra abbastanza, no?

For i = 1 To numero_record
campoA_record(i) = request.form("campoA_record" & i)
Next

' idem per campo B

sql = "SELECT * FROM tabella ORDER BY id" 'ho fatto un esempio!

Set RS=Server.CreateObject("ADODB.Recordset")
RS.Open sql,dbConn,1,3

i = 0

Do While NOT RS.EOF

i = i + 1

RS("campoA") = campoA_record(i)
RS("campoB") = campoB_record(i)

RS.Update

RS.MoveNext

Loop

RS.Close
Set RS=Nothing



più o meno potresti fare così

ciao!