Servus Liste,
wei� jemand von euch warum das nicht funktioniert?
While Not objRS.EOF
if objRS.Fields("ID") = stimm then
objRS.Fields("Bewertung") = objRS.Fields("Bewertung") + 3
objRS.Update
end if
if objRS.Fields("ID") = stimmb then
objRS.Fields("Bewertung") = objRS.Fields("Bewertung") + 2
objRS.Update
end if
if objRS.Fields("ID") = stimmc then
objRS.Fields("Bewertung") = objRS.Fields("Bewertung") + 1
objRS.Update
end if
objRS.MoveNext
Wend
Wenn ja: Sagt es mir dieser jemand?
Vielen Dank
Martin
| 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