<!--#include file="view.asp"-->
<%
loginGerekli()
call header
act=sec.p("act")
if act="add" then
	urun=sec.pint("urun")
	adet=sec.pint("adet")
	
	if kayitKontrol("sepet","urun="& urun &" and uye="& loginID) then
		bag.execute("update sepet set adet=(adet + "& adet &") where urun="& urun &" and uye="& loginID)
		adetUP="?adetU="& urun
	else
		bag.execute("insert into sepet(uye,urun,adet) values('"& loginID &"','"& urun &"','"& adet &"')")
	end if
	response.Redirect("sepet.asp"& adetUP)
elseif act="delete" then
	delet=sec.p("delet")
	dl=split(delet,",")
	for i=0 to ubound(dl)
		bag.execute("delete from sepet where id="& sec.sqlint(dl(i)) &" and urun<>1629")
	next
	response.Redirect("sepet.asp")
elseif act="update" then
	for each al in request.Form
		if left(al,4)="adet" then
			tmp=split(al,"_")
			bag.execute("update sepet set adet="& sec.sqlint(request.form(al)) &" where id="& tmp(1))		
		end if
	next
	response.Redirect("sepet.asp")
end if
response.Write(act)

set urn=bag.execute("select sepet.id as sid,urun.id, urun.kampanya, urun.fiyat, urun.kfiyat, urun.adi, urun.resim, sepet.adet from (sepet left join urun on urun.id=sepet.urun) where uye="& loginID)
%>
<table cellpadding="0" cellspacing="0">
	<tr>
		<td valign="top"><img src="images/golgesol.png" width="31" height="604"></td>
		<td valign="top" width="730">
			<table cellpadding="0" cellspacing="0">
				<tr><td height="15"></td></tr>
				<tr><td class="baslik">Sepetim</td></tr>
				<tr><td height="10"></td></tr>
				<tr><td height="1" bgcolor="#CCCCCC" width="730"></td></tr>
				<tr><td height="10"></td></tr>
				<tr>
					<td class="icerik">
						<%if not urn.eof then%>
						<form action="sepet.asp" method="post">
						<input type="hidden" name="act" id="act" value="" />
						<table cellpadding="2" cellspacing="2">
							<tr style="background:#666; color:#FFF;">
								<td width="50" align="center" class="beyaz">Sil</td>
								<td width="290" style="padding-left:23px;" class="beyaz">Ürün Adı</td>
								<td width="120" align="center" class="beyaz">Adet</td>
								<td width="120" align="center" class="beyaz">Ürün Fiyatı</td>
								<td width="135" align="center" class="beyaz">Fiyat</td>
							</tr>
							<% tfiyat=0
							i=0
							while not urn.eof
							if urn("kampanya")=true then
								gfiyat=(formatnumber(urn("kfiyat"),2) * urn("adet"))
								tfiyat=tfiyat + gfiyat
							else
								gfiyat=(formatnumber(urn("fiyat"),2) * urn("adet"))
								tfiyat=tfiyat + gfiyat
							end if
							
							if urn("resim")<>"" then
								resim=urn("resim")
							else
								resim="images/nofoto.jpg"
							end if
							%>
							<tr style="background:#E2E2E2;">
								<td align="center" height="80"><input type="checkbox" name="delet" <%if urn("id")<>1629 then%>value="<%=urn("sid")%>"<%else%>disabled<%end if%> /></td>
								<td>
									<div style="float:left;"><a href="urun.asp?id=<%=urn("id")%>"><img src="<%=resim%>" width=50 height=50 border="0" /></a></div>
									<div style="float:left; width:255px; margin-left:5px;">
										<div class="icerik"><%=urn("adi")%></div>
									</div>
								</td>
								<td align="center"><input type="text" name="adet_<%=urn("sid")%>" value="<%=urn("adet")%>" style="width:50px;" />
								<%if adetU=urn("id") then%><div class="alinir" style="margin-top:5px;">adet arttırıldı</div><%end if%></td>
								<td align="center"><%if urn("kampanya")=false then%><%=urn("fiyat")%> TL<%else%><%=urn("kfiyat")%> TL<%end if%></td>
								<td align="center"><%= gfiyat %> TL</td>
							</tr>
							<%urn.movenext
							wend%>
							<tr style="background:#666; color:#FFF;">
								<td colspan="2"><input type="submit" onClick="$('#act').attr('value','delete'); " value="sil" class="input1"/></td>
								<td><input type="submit" onClick="$('#act').attr('value','update'); " value="Sepeti Güncelle" class="input1" /></td>
								<td align="right" style="font-size:8pt;">Toplam Fiyat <font size="1">(KDV Dahil)</font></td>
								<td width="120" align="center"><%=tfiyat%> TL</td>
							</tr>
							<tr>
								<td><a href="default.asp"><img src="images/avdevam.jpg" border="0" /></a></td>
								<td height="40" align="right" colspan="5"><a href="siparis.asp"><img src="images/satinal.jpg" border="0" /></a></td>
							</tr>
						</table>
						</form>
						<%else%>
						<div class="font2b" style="font-size:16pt; margin:10px 0;" align="center">Sepetiniz Boş</div>
						<%end if%>
					</td>
				</tr>
				<tr><td height="5"></td></tr>
			</table>
		</td>
		<td valign="top"><img src="images/golge.png" width="31" height="604"></td>
	</tr>
</table>
<%call footer%>

67. satırda
Microsoft VBScript çalýþma hatasý hata '800a000d'

Tür uyumsuz: 'formatnumber'

/ebsanmatbaa/sepet.asp, satır 67

Şu hatayı alıyorum.

Yardımlarınızı bekliyorum.