Forgot Password ??

PHP , ASP , ASP.NET, VB.NET, C#, Java , jQuery , Android , iOS , Windows Phone

	Registered : 109,030

HOME > ASP > ASP Forum > เปลี่ยนเป็น check box ในตะกล้าอีคอมพ์ คือ นู๋อยากได้วิธีการนำเอาสินค้าเข้าไปในตระกร้า

เปลี่ยนเป็น check box ในตะกล้าอีคอมพ์ คือ นู๋อยากได้วิธีการนำเอาสินค้าเข้าไปในตระกร้า

เริ่มหัวข้อใหม่

Guest

คือ นู๋อยากได้วิธีการนำเอาสินค้าเข้าไปในตระกล้า แบบ ครั้งเดียว 10 รายการ
โดย เลือก Check box ที่สินค้าตัวใด
ให้เก็บค้า เข้าไปใน ตระกล้า เลย โดยไม่ต้อง กลับไป กลับมา หลายๆครั้งจึงจะได้
สินค้า หลาย รายการ ค่ะ

นี่คือ codeของ หน้ารับค่า

>>><%@ codepage=874 %>
<% Option Explicit %>
<% If Not IsArray(Session("cart")) Then Session("cartempty") = True %>

<html>
<head><title></title></head>
<body bgcolor="#FFFFFF" text="#000000">

<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="24%" valign="top">

</td>
<td width="76%" valign="top">
<%
Dim rs, sql, pronew1, pronew2, prorecommend1, prorecommend2, promotion, imgName
If ConnectDB() = True Then
sql = "select * from firstpage"
Set rs = Conn.Execute(sql)
If Not rs.EOF Then
pronew1 = rs(1)
pronew2 = rs(2)
prorecommend1 = rs(3)
prorecommend2 = rs(4)
promotion = rs(5)
End If
rs.Close
End If
%>
<table width="100%" border="0" cellspacing="0" cellpadding="5">
<tr>
<td align="center">
<table width="90%" border="1" cellspacing="0" cellpadding="0" bordercolor="#FFCC33">
<tr>
<td bgcolor="#FFCC99"><img src="images/arrow.gif" width="11" height="11"> สินค้าออกใหม่ </td>
</tr>
</table>
</td>
</tr>
</table>
<%
Sub showProduct(pvar)
sql = "select * from products p inner join categories c on p.catid=c.catid " & _
"where p.pid = "& pvar &" And " & _
"p.pactive=True And c.catactive=True"
Set rs = Conn.Execute(sql)
If Not rs.EOF Then
If rs("pimages") = "" Or IsNull(rs("pimages")) Then imgName = "no_images.gif" Else imgName = rs("pimages")
%>
<form method="post" action="sscart.asp">
<table width="90%" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td width="30%" align="center"><a </td>
<td width="70%" valign="top"><b>ชื่อสินค้า :</b> <%=rs("pname")%><br>
<b>ราคาพิเศษ : <font color="red"><%=FormatNumber(rs("pdiscount"),2)%> </font> </b>บาท<br>
<input type="hidden" name="pid" value="<%=rs("pid")%>">
<input type="hidden" name="pname" value="<%=rs("pname")%>">
<input type="hidden" name="pdiscount" value="<%=rs("pdiscount")%>"><br>
<input type="image" border="0" src="images/add2cart.gif">
</td>
</tr>
</form>
</table>
<hr noshade width="90%">
<%
End If
rs.Close
End Sub
%>
<%
Call showProduct(pronew1)
Call showProduct(pronew2)
%>
<table width="100%" border="0" cellspacing="0" cellpadding="5">
<tr>
<td align="center">
<table width="90%" border="1" cellspacing="0" cellpadding="0" bordercolor="#FFCC33">
<tr>
<td bgcolor="#FFCC99"><img src="images/arrow.gif" width="11" height="11"> สินค้าแนะนำ</td>
</tr>
</table>
</td>
</tr>
</table>
<%
Call showProduct(prorecommend1)
Call showProduct(prorecommend2)
%>
<% Set rs = Nothing %>
<%
If Trim(promotion) = "?????" Or Trim(promotion) = "" Then
Else
%>
<table width="100%" border="0" cellspacing="0" cellpadding="5">
<tr>
<td align="center">
<table width="90%" border="1" cellspacing="0" cellpadding="0" bordercolor="#FFCC33">
<tr>
<td bgcolor="#FFCC99"><img src="images/arrow.gif" width="11" height="11"> โปรโมชั่นพิเศษ</td>
</tr>
</table>
<table width="90%" border="0" cellspacing="0" cellpadding="0" align="center">
<tr><td><%=Replace(promotion,vbCrLf,"<br>")%></td></tr>
</table>
</td>
</tr>
</table>
<% End If %>
<br></td>
</tr>
</table>

</body>
</html>

ดัดแปลงให้ มีเชค บ็อค ค่ะ ขอความช่วยเหลือให้นู๋ ด้วยนะค่ะ

ขอบคุณค่ะ..

Tag : - - - -

Date : 16 Aug 2547 15:38:50

By : asp{xp}

View : 2864

Reply : 2

No. 1

TC Admin

โพสกระทู้ ( 74,058 )
บทความ ( 838 )

ถามงี้เลยเหรอครับ คงจะตอบยากแหละครับ

Date : 16 Aug 2547 18:36:04

By : webmaster

No. 2

Guest

สรุป ง่ายๆ ก็คือ

เป็นเรื่องของ check box เฉยๆ ค่ะ สินค้าแต่ระรายการ
ที่แสดงให้เราเห็น เพียงแต่ เพิ่ม Check box ค่ะ..ไม่ยากๆ เพียงแต่ งงโจทย์ เฉยๆค่ะ

Date : 17 Aug 2547 08:06:25

By : asp[xp]

ค้นหาข้อมูล

แสดงความคิดเห็น

Re : เปลี่ยนเป็น check box ในตะกล้าอีคอมพ์ คือ นู๋อยากได้วิธีการนำเอาสินค้าเข้าไปในตระกร้า

รายละเอียด

เพื่อความเรียบร้อยของข้อความ ควรจัดรูปแบบให้พอดีกับขนาดของหน้าจอ เพื่อง่ายต่อการอ่านและสบายตา และตรวจสอบภาษาไทยให้ถูกต้อง

อัพโหลดแทรกรูปภาพ

Notice

เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ
อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง

เพื่อความปลอดภัยและการตรวจสอบ กระทู้ที่แทรกไฟล์อัพโหลดไฟล์จากที่อื่น อาจจะถูกลบทิ้ง

โดย

อีเมล์

บวกค่าให้ถูก

<= ตัวเลขฮินดูอารบิก เช่น 123 (หรือล็อกอินเข้าระบบสมาชิกเพื่อไม่ต้องกรอก)

Exchange: นำเข้าสินค้าจากจีน, Taobao, เฟอร์นิเจอร์, ของพรีเมี่ยม, ร่ม, ปากกา, power bank, แฟลชไดร์ฟ, กระบอกน้ำ

Load balance : Server 03