Ciao (ho postato anche su ASP ma nessuno sa dirmi niente),
Ho un problema di questo tipo:
1) Carrello della spesa funzionante su SUN CHILI SOFT ASP
2) Copio tutta l'applicazione funzionante su altro server che ha installato SUN ONE ASP
3) Le pagine asp funzionano ..ma nel momento in cui vado ad aggiungere al carrello articoli o a vedere il carrello mi da errore sulle righe dove si indica la sessione. Tipo: "Session("cart") = acart"
4) Cosa c'è che non va ? Non mi ved ela sesisone ? Da cosa potrebbe dipendere ?
CODICE CHE ELABORA L'AGGIUNTA (su server di porva funzioana) :
<%@ LANGUAGE = "VBScript" %>
<%
q = request.form("qty")
if q ="" or q= " " or q=0 or q ="0" then
Response.Redirect ("aggiunto2.asp?qty=" & q & "&aggiunto=nessun articolo inserito")
else
productid=valid_sql(request.querystring("productid "))
prix=valid_sql(request.querystring("prix"))
stage=request.form("stage")
catcode=request.querystring("catcode")
custid=request.querystring("custid")
ok=request.form("ok")
price=valid_sql(request.querystring("price"))
if productid=null or productid="" then
response.redirect("error.asp?msg=" & Server.URLEncode("Nessun articolo presente con le caratteristiche richieste."))
end if
if stage="" or stage=null then
else
'add to shopping bag
'create cart
'Session("cart")=null
If IsArray(Session("cart")) = false Then
Dim acart(19,1)
acart(1,0)=productid
acart(1,1)=request.form("qty")
Session("cart") = acart
else
acart=session("cart")
incart=false
for i=lbound(acart) to ubound(acart)
if acart(i,0)="" and acart(i,1)="" and not(incart) then
acart(i,0)=productid
acart(i,1)=request.form("qty")
incart=true
end if
next
session("cart")=acart
end if
end if
%>
