Nachtrag:
Btw, wenn man das DB-Design ein wenig ver�ndern w�rde, so dass die
eintr�ge so aussehen:
Spalten-eintrag, Wert
<spalte1>-<id1>, true
<spalte2>-<id1>, false
<spalte3>-<id1>, true
...
<spalte1>-<id2>, true
<spalte2>-<id2>, false
...
Wobei man "<spalte>-<id>" auch als id*11+spalte (spalte = 0..10)
kodieren k�nnte...
Dann ginge ein komplettes setzen immer mit zwei updates..
Claudius
>
> Sch�ne L�sung!
>
> Braucht immer 22 Updates...
> Wenn die Datenbank der Flaschenhals w�re, k�nnte man
> Deine(Zusammenfassung) mit meiner(nur �nderungen schreiben)
> Methode verkn�pfen und immer die minimale Anzahl von updates
> absetzen...
>
> Claudius
>
> >
> > Hallo!
> >
> > > ich habe in access eine tabelle mit 11 spalten und 40
> eintr�gen, das
> > macht
> > > dann in asp/html eine tabelle mit 40 x 11 (440) feldern
> > angezeigt auf
> > einer
> > > seite (produkt�bersicht - welche gr��e bei welcher type)
> > >
> > > nun folgendes problem:
> > >
> > > ich soll ein redaktionstool dazu erstellen, womit der/die user die
> > komplette
> > > tabelle auf einmal updaten k�nnen -> d.h. der user sieht die
> > > asp/html-tabelle mit 440 feldern auf einer seite, in
> jedem feld soll
> > eine
> > > checkbox stehen und wenn der user auf den save-button dr�ckt soll
> > alles
> > > upgedatet sein ...
> >
> > Das geht ganz einfach ...
> >
> > Die Checkboxen bekommen den Spaltennamen als Namen und die
> > IDs als "Values". So hast Du dann 11 Form-Variablen, deren
> > Werte jeweils eine Liste der IDs ist, die in dieser Spalte
> > angekreuzt sind.
> >
> > Checkboxen erzeugen:
> >
> > Datei in ein Array lesen mit "rs.GetRows(...)" und dann abarbeiten:
> >
> > for r = 0 to ubound(myArray, 2)
> > Response.Write(myArray(0, r))
> > for c = 1 to 11
> > if myArray(c, r) = true then lChecked = " checked" else
> > lChecked = ""
> > Response.Write("<input type=checkbox " & _
> > "name=""" & lColumnName(c-1) & """" & _
> > "value=""1""" & _
> > lChecked &">")
> > next
> > next
> >
> > Checkboxen auslesen:
> >
> > for c = 0 to 10
> > lColumnValues = cstr(Request(lVolumnName(c))
> > next c
> >
> > Update in der Datenbank:
> >
> > For c = 0 to 10
> > sql = _
> > "UPDATE ... set " & lColumnName(c) & " = TRUE" & _
> > " WHERE id IN (" & lColumnValues(c) & ")"
> > db.Execute(sql)
> > sql = _
> > "UPDATE ... set " & lColumnName(c) & " = FALSE" & _
> > " WHERE id NOT IN (" & lColumnValues(c) & ")"
> > next
> >
> > Fertig.
> >
> > ;-)
> > Manchmal muss man eben auch davon abweichen, jede Abfrage
> > direkt in der Datenbank zu erstellen und SQL-Befehle in
> > VBScript zusammenstellen.
> > ;-)
> >
> > Freundliche Gr��e
> > Joachim van de Bruck
> >
>
>
> | [aspdedatabase] als [EMAIL PROTECTED] subscribed
> | http://www.aspgerman.com/archiv/aspdedatabase/ = Listenarchiv Sie
> | k�nnen sich unter folgender URL an- und abmelden:
> | http://www.aspgerman.com/aspgerman/listen/anmelden/aspdedatabase.asp
>
| [aspdedatabase] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdedatabase/ = Listenarchiv
| Sie k�nnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdedatabase.asp
