ศูนย์ฝึกอบรมและพัฒนา

<% if Session("Shop") = "" then Session("Shop") = Session.SessionID Set Conn=Server.CreateObject("ADODB.Connection") Conn.Provider="Microsoft.Jet.OLEDB.4.0" Conn.Open Server.MapPath("\database\ecommerce.mdb") Sql="Select * from shop Where id = "&Session("Shop") Set RS =Server.CreateObject("ADODB.Recordset") RS.open Sql,Conn,1,3 %> <%totalprice = 0%> <%do while not rs.eof%> <% totalprice = totalprice+rs("total_price") rs.MoveNext loop%>


ลบ	รายการ	จำนวน	ราคา/หลักสูตร	ราคารวม

">	<%=rs("course_name")%>	">	<%=FormatNumber(rs("price"))%>	<%=FormatNumber(rs("total_price"))%>

ราคารวมทั้งสิ้น :				<%=FormatNumber(totalprice)%>

<% rs.Close : Set rs = Nothing Conn.Close : Set Conn = Nothing %>