Hier ist ein wenig was Faul
For X = 1 to counter
oConn.Execute("UPDATE Warenkorb SET Anzahl='" & Request.Form("UpdateAnz" &
Counter) & "' WHERE ID ='" & Request.Form("UpdateID" & Counter) & "'")
oRS.MoveNext
Hier:
Falsch ------ & Request.Form("UpdateAnz" & Counter) & "' WHERE
Um nicht so durcheinander zu kommen solltest Du es vielleicht so machen
For X = 1 to counter
AbfrageAnz = "UpdateAnz" & counter
AbfrageID = "UpdateID" & counter
oConn.Execute("UPDATE Warenkorb SET Anzahl='" & Request.Form(AbfrageAnz) &
"' WHERE ID ='" & Request.Form(AbfrageID) & "'"
oRS.MoveNext
Next
Versuche es mal so
Gru� Wolfgang
----- Original Message -----
From: <[EMAIL PROTECTED]>
To: "ASP Diskussionsliste fuer Anfaenger" <[EMAIL PROTECTED]>
Sent: Thursday, May 30, 2002 4:29 PM
Subject: [aspdebeginners] RE: [aspdebeginners] Re: [aspdebeginners] Update
�ber mehrere Datens�tze?
> Das mit der Fehlermeldung hab ich jetzt irgendwie hinbekommen. Jetzt ist
nur
> noch ein Problem mit dem Update, da wird n�mlich nur immer der letzte
> Datensatz abge�ndert.
>
> Set oConn = Server.CreateObject("ADODB.Connection")
> oConn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" &
> Server.MapPath("\xxx\x\xxx.mdb")
>
> sSQL="SELECT * FROM Warenkorb WHERE Bestell_ID ='" & Session("Kunden_ID")
&
> "'"
> Set oRS = oConn.Execute(sSQL)
>
> %>
>
>
> <TABLE WIDTH=70% BORDER=1>
> <TR bgcolor="#000000#" style='color:white;'>
> <!--TD>Artikel-Nr</TD-->
> <TD>Bezeichnung</TD>
> <TD>Anzahl</TD>
> <TD>Preis</TD>
> </TR>
>
> <FORM NAME=Update ACTION='' METHOD=Post>
>
> <%
>
> Counter = 0
>
> Do While NOT oRS.EOF
> Counter = Counter + 1
> P = P + oRS("Preis") * oRS("Anzahl")
> 'Response.Write("<TR><TD>" & oRS("ID") & "</TD>")
> Response.Write("<TR><TD>" & oRS("Beschreibung") & "</TD>")
> Response.Write("<TD><INPUT TYPE=text Name='UpdateID" & Counter & "'
> Value='" & oRS("ID") & "'><INPUT TYPE=Text SIZE=2 NAME='UpdateAnz" &
Counter &
> "'VALUE='" & oRS("Anzahl") & "'></TD>")
> Response.Write("<TD>" & oRS("Preis") * oRS("Anzahl") & "</TD></TR>")
>
> oRS.MoveNext
> Loop
>
> Response.Write("<TR><TD><B>Sie bezahlen:</B></TD>")
> Response.Write("<TD colspan=2 ALIGN=RIGHT><B>sFR. " & P &
> ".-</B></TD></TR>")
> Response.Write("<TR><TD colspan='3'><INPUT TYPE=Submit Name=Update
> Value=Update></FORM></TD></TR>")
> Response.Write("</TABLE>")
>
> IF Request.Form("Update") = "Update" THEN
>
> sSQL="SELECT * FROM Warenkorb WHERE Bestell_ID ='" & Session("Kunden_ID")
&
> "'"
> Set oRS = oConn.Execute(sSQL)
>
> oRS.MoveFirst
>
> For X = 1 to counter
> oConn.Execute("UPDATE Warenkorb SET Anzahl='" & Request.Form("UpdateAnz" &
> Counter) & "' WHERE ID ='" & Request.Form("UpdateID" & Counter) & "'")
> oRS.MoveNext
>
> Next
>
> END IF
>
>
> %>
>
> --
> GMX - Die Kommunikationsplattform im Internet.
> http://www.gmx.net
>
>
> | Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
> | [aspdebeginners] als [EMAIL PROTECTED] subscribed
> | http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
> | Sie knnen sich unter folgender URL an- und abmelden:
> | http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
>
| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
| Sie knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
