Styring af kunder med session
ok, når nu proppen er taget af kan jeg ligeså godt få spurgt om det hele, jeg mangler også at kunne "styre"mine kunder med sessions og at få slettet de records de laver ved bestillingerJeg har følgende indtil videre :
<%
strSQL = "Insert into dreje_indv (best) values('" & Request.Form("order") & " ' )"
objConndrejebase.Execute(strSQL)
%><%
Set objRS=objConndrejebase.Execute("SELECT id, d_min, l, e, insert, price, drawing, image, best FROM dreje_indv")
Do while Not objRS.EOF
%>
<table>
<%
IDList = Request.Form("id") 'Det giver nemlig en liste med alle vare
idArr = split(IDList,",") 'Laver et array med alle ID
for i = lbound(idArr) to ubound(idArr)
antal = Request.Form("order" & Trim(idArr(i)))
if antal <> "" then
'Der er angivet et antal af denne vare
vareID = idArr(i)
'Så har du vareID og antal du kan gemme i DBen elle
Response.Write "<tr><td> " & vareID & "</td>"
Response.Write "<td>"& antal & "</td></tr></table>"
end if
next
%>
</tr></table>
<%
objRS.Movenext
Loop
objRS.Close
Set objRS = Nothing
objConndrejebase.Close
Set objConndrejebase = Nothing
%>
</body>
</html>
En særlig tak til eagleeye
