Carrinho de Compra

[rondonha 0]

Boa tarde,

estou com um problema para montar carrinho de compra, preciso de uma ajuda...

 

fiz o carrinho.asp

 

<!--#include file="conexao.asp"-->
<% if session("id")="" then
acao=request.querystring("acao")
	
	if acao="visu" then
	
	sql = "SELECT pedidotemp.session_id, pedidotemp.idprod, pedidotemp.qtd, pedidotemp.valor, Produtos.nome, Produtos.preco, Produtos.foto FROM pedidotemp INNER JOIN Produtos ON pedidotemp.idprod=Produtos.id_prod where pedidotemp.session_id="&session.sessionid
		
		set rs=server.createobject("adodb.recordset")
		rs.open sql,conexao
			if rs.eof then
				response.Write("não existem produtos no carrinho")
			
			else 
				response.write("<form action='carrinho.asp'>")
				
				response.Write("<table border='1' width='100%'>")
				response.Write("<tr><td>Foto</td><td>nome</td><td>preco</td><td>qtd</td><td>total</td></tr></table>")
				
				while not rs.eof %>
					
				
                  <table width="100%"><tr>
                    <td><img src="<%=rs("foto")%>" /></td>
                    <td><%=rs("nome")%></td>
                    <td><%=rs("preco")%></td>
                    <td><input type="text" name="qtd" value="<%=rs("qtd")%>">
						<input type="button" value"atu">
						<input type="button" value="dele"></td>
                    <td><input type="text" name="valor" value="<%response.write(rs("qtd")*rs("preco"))%>"></td>
                  </tr>
				  </table>
               
					
					
				
				<% 
					soma=soma+rs("valor")
				rs.movenext
				wend
				response.Write("</form>")
			end if
	end if
	if acao="add" then
		sql = "SELECT pedidotemp.session_id, pedidotemp.idprod, pedidotemp.qtd, pedidotemp.valor, Produtos.nome, Produtos.preco, Produtos.foto FROM pedidotemp INNER JOIN Produtos ON pedidotemp.idprod=Produtos.id_prod where pedidotemp.session_id="&session.sessionid
		codnovo=request.QueryString("idprod")
		
		set rs=server.createobject("adodb.recordset")
		rs.open sql,conexao
			if rs.eof then
				response.Write("não existem produtos no carrinho")
			
			else 
				while not rs.eof
					if codnovo=rs("idprod") then
					sql="update peditostemp set qtd="&(rs("qtd")+1)& "where idprod="&codnovo
					conexao.execute sql
			
						atualizado="sim" 
					end if
				rs.movenext
				wend
				if atualizado<>"sim" then
					sql="insert into pedidostemp(session_id,idprod,qtd) values('"&session.SessionID&"','"&codnovo&"','1')"
					
					conexao.execute sql
					
				end if
				
				sql = "SELECT pedidotemp.session_id, pedidotemp.idprod, pedidotemp.qtd, pedidotemp.valor, Produtos.nome, Produtos.preco, Produtos.foto FROM pedidotemp INNER JOIN Produtos ON pedidotemp.idprod=Produtos.id_prod where pedidotemp.session_id="&session.sessionid
				codnovo=request.QueryString("idprod")
			
				set rs=server.createobject("adodb.recordset")
				rs.open sql,conexao
			
									response.write("<form action='carrinho.asp'>")
				
				response.Write("<table border='1' width='100%'>")
				response.Write("<tr><td>Foto</td><td>nome</td><td>preco</td><td>qtd</td><td>total</td></tr></table>")
				
				while not rs.eof %>
					
				
                  <table width="100%"><tr>
                    <td><img src="<%=rs("foto")%>" /></td>
                    <td><%=rs("nome")%></td>
                    <td><%=rs("preco")%></td>
                    <td><input type="text" name="qtd" value="<%=rs("qtd")%>">
						<input type="button" value"atu">
						<input type="button" value="dele"></td>
                    <td><input type="text" name="valor" value="<%response.write(rs("qtd")*rs("preco"))%>"></td>
                  </tr>
				  </table>
               
					
					
				
				<% 
					soma=soma+rs("valor")
				rs.movenext
				wend
				response.Write("</form>")
					
			end if
	
	
	end if
	if acao="visu" then
	
	end if
	if acao="dele" then
	
	end if
	
else

end if %>

 

que vai chamar o pedidotemp.asp

mas não sei como começar esse pedidotemp, alguém pode me dar uma luz ??

 

grato

[Ted k' 126]

o que irá ter assim??

 

dados que precisa salvar, quais são?