Problema com Sessions

[ricardo coelho designer 0]

Pessoal bom dia, não consigo compreender a lógica da session então recorro a vocês para me ajudarem, pode até ser simples, mas não estou conseguindo entender, se puderem me ajudar agradeço, segue abaixo o código.

 

Preciso que apareça codigo, quantidade, descrição, preço, mas da forma que está só parece codigo e quantidade, o que estou fazendo de errado?

 

<%
COD = Request("COD")
QTD = Request("QTD")'Aqui nós pegamos as duas variáveis.
DES = Request("DES")
Preco = Request("Preco")
If Session("ID") = "" Then Session("ID") = 0

'Aqui nós definimos uma variável Session que será responsável por guardar o ultimo número de indentificação da matriz.
For i = 0 to Session("ID")
    If Session("PROD"&i) = COD Then Session ("QTD"&i) = QTD:COD = 0
Next

'Aqui nós verificamos se já não existe o código do produto armazenado, se existir, ele altera a quantidade de produtos e zera o código.
If COD <> 0 Then
    Session("ID") = Session("ID") + 1
    Session("PROD" & Session("ID")) = COD
    Session("QTD" & Session("ID") ) = QTD
    Session("DES" & Session("ID") ) = DES
    Session("Preco" & Session("ID") ) = Preco
End IF

'Aqui adicionamos um novo produto a matriz.
For i = 0 To Session("ID")
Response.Write "Código do produto:" & Session("PROD"&i) & " Quantidade: " & Session("QTD"&i) & " Descrição: " & Session("DES"&i) & " Preço: " & Session("Preco"&i) & "<BR>"
Next

%>

[Salgado 4]

Verifique antes de tudo se as variáveis estão realmente preenchidas pelos requests.