rain arkadasım assada kodu yazdım acil yardımcı olursan sevırınırım
<%
Dim b(5000)
items=0
i=0
For Each cookie in Request.Cookies
If InStr(cookie,"ShopCard") then
If Request.Cookies(cookie)>0 Then
a = Split(cookie, "ShopCard")
b(i)=a(1)
i=i+1
End If
End If
Next
str=b(0)
For ii = 1 to i-1
str=str & ", " & b(ii)
Next
sum=0
If str<>"" Then
sql="select * from urunler where KAYIT in (" & str & ")"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.open sql,con
rs.MoveFirst
While Not rs.EOF
q1 = Request.Cookies("ShopCard" & rs.Fields("KAYIT").Value)
sum=sum + (rs.Fields("Fiyat").Value) * q1
%>
<tr>
<td width="28" bgcolor="#FFFFFF" class="style3"><img alt border="0" height="1" src="images/clear_spacer.gif" width="28"><%=q1%> x </td>
<td width="97" colspan="2" bgcolor="#FFFFFF" class="style3"><%=rs.Fields("urunadi").Value%></td>
<td width="4" bgcolor="#FFFFFF"><img alt border="0" height="1" src="images/clear_spacer.gif" width="4"></td>
<td bgColor="#FFFFFF" width="1"><img alt border="0" src="images/clear_spacer.gif" width="1" height="1"></td>
</tr>
<%
rs.MoveNext
items=items+q1
Wend
End If
con.Close
%>