|
|
|
|
|
|
|
|
<%
'Verbindung aufbauen
set connObj=server.createobject("adodb.connection")
connObj.open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.Mappath("salzkontordb.mdb") & ";"
kndnr=session.sessionid
endsumme=0
' SELECT zusammenstellen
suche="select * from warenkorb where kndnr='" & kndnr & "'"
set rstemp=connObj.execute(suche, RecordAffected, adCmdText)
anzahl=0
if connobj.errors.count = 0 then
do while not rstemp.eof
anzahl=anzahl+1
rstemp.movenext
loop
end if
set rstemp=connObj.execute(suche, RecordAffected, adCmdText)
if connObj.errors.count=0 and anzahl>0 then
%> Sie haben folgende Artikel im Einkaufskorb:
| Wenn Sie die Bestellmenge
eines Artikels ändern möchten, ersetzen Sie die Anzahl im jeweiligen
Textfeld und klicken dann auf "Anzahl ändern". Wenn Sie einen oder mehrere Artikel aus Ihrer Bestellung entfernen möchten, ändern Sie die die Anzahl im jeweiligen Textfeld auf "0". Klicken Sie dann auf "Anzahl ändern". Wenn Sie alle Artikel aus Ihrer Bestellung entfernen möchten, klicken Sie auf "alle Artikel löschen". Wenn Sie Ihre Bestellung durchführen möchten, klicken Sie auf "Artikel bestellen"
|
|||
|
<%end if%> |