codice:
<%
Dim SQLCat, RSCat, Icat, QSSCategoria, SCatArr, CatArr, BoolCategorie, K
%>
<html>
<head>

<script> 
function getPageCoords (element) { // thanks to 'Martin Honnen' for this function 
var coords = {x: 0, y: 0}; 
while (element) { 
coords.x += element.offsetLeft; 
coords.y += element.offsetTop; 
element = element.offsetParent; 
} 
return coords; 
} 
</script>
	
<style>
BODY{
  font-family:arial,helvetica;
  font-size:12px;
}
code,pre{
  color:red;
}
/* CoolMenus 4 - default styles - do not edit */
.clCMAbs{position:absolute; visibility:hidden; left:0; top:0}
/* CoolMenus 4 - default styles - end */
  
/*Style for the background-bar*/
.clBar{position:absolute; width:10; height:10; background-color:#006699; layer-background-color:#006699; visibility:hidden}

/*Styles for level 0*/
.clLevel0,.clLevel0over{position:absolute; padding:2px; font-family:tahoma,arial,helvetica; font-size:12px; font-weight:bold}
.clLevel0{background-color:#006699; layer-background-color:#006699; color:white;}
.clLevel0over{background-color:#336699; layer-background-color:#336699; color:#FCCE55; cursor:pointer; cursor:hand; }
.clLevel0border{position:absolute; visibility:hidden; background-color:#006699; layer-background-color:#006699}

/*Styles for level 1*/
.clLevel1, .clLevel1over{position:absolute; padding:2px; font-family:tahoma, arial,helvetica; font-size:11px; font-weight:bold}
.clLevel1{background-color:#CDDBEB; layer-background-color:#CDDBEB; color:#006699;}
.clLevel1over{background-color:#336699; layer-background-color:#336699; color:#FCCE55; cursor:pointer; cursor:hand; }
.clLevel1border{position:absolute; visibility:hidden; background-color:#006699; layer-background-color:#006699}

/*Styles for level 2*/
.clLevel2, .clLevel2over{position:absolute; padding:2px; font-family:tahoma,arial,helvetica; font-size:10px; font-weight:bold}
.clLevel2{background-color:#006699; layer-background-color:#006699; color:white;}
.clLevel2over{background-color:#0099cc; layer-background-color:#0099cc; color:Yellow; cursor:pointer; cursor:hand; }
.clLevel2border{position:absolute; visibility:hidden; background-color:#006699; layer-background-color:#006699}
</style>
<script language="JavaScript1.2" src="coolmenus4.js">
/*****************************************************************************
Copyright (c) 2001 Thomas Brattli (webmaster@dhtmlcentral.com)

DHTML coolMenus - Get it at coolmenus.dhtmlcentral.com
Version 4.0_beta
This script can be used freely as long as all copyright messages are
intact.

Extra info - Coolmenus reference/help - Extra links to help files **** 
CSS help: http://192.168.1.31/projects/coolmen...rence.asp?m=37
General: http://coolmenus.dhtmlcentral.com/reference.asp?m=35
Menu properties: http://coolmenus.dhtmlcentral.com/properties.asp?m=47
Level properties: http://coolmenus.dhtmlcentral.com/properties.asp?m=48
Background bar properties: http://coolmenus.dhtmlcentral.com/properties.asp?m=49
Item properties: http://coolmenus.dhtmlcentral.com/properties.asp?m=50
******************************************************************************/
</script>
</head>
<body>
[img]interfaccia/SB_PROD.jpg[/img]

<script>
/*** 
This is the menu creation code - place it right after you body tag
Feel free to add this to a stand-alone js file and link it to your page.
**/

//Menu object creation
oCMenu=new makeCM("oCMenu") //Making the menu object. Argument: menuname

//Menu properties   
oCMenu.pxBetween=1
oCMenu.fromLeft=getPageCoords(document.immagine).x ;
oCMenu.fromTop=getPageCoords(document.immagine).y ;
oCMenu.rows=0 
oCMenu.menuPlacement=""
                                                             
oCMenu.offlineRoot="file:///C|/Inetpub/wwwroot/dhtmlcentral/" 
oCMenu.onlineRoot="" 
oCMenu.resizeCheck=1 
oCMenu.wait=80 
oCMenu.fillImg="cm_fill.gif"
oCMenu.zIndex=0

//Background bar properties
oCMenu.useBar=0
oCMenu.barWidth="100%"
oCMenu.barHeight="menu" 
oCMenu.barClass="clBar"
oCMenu.barX=0 
oCMenu.barY=0
oCMenu.barBorderX=0
oCMenu.barBorderY=0
oCMenu.barBorderClass=""

//Level properties - ALL properties have to be spesified in level 0
oCMenu.level[0]=new cm_makeLevel() //Add this for each new level
oCMenu.level[0].width=132
oCMenu.level[0].height=15 
oCMenu.level[0].regClass="clLevel0"
oCMenu.level[0].overClass="clLevel0over"
oCMenu.level[0].borderX=0
oCMenu.level[0].borderY=0
oCMenu.level[0].borderClass="clLevel0border"
oCMenu.level[0].offsetX=0
oCMenu.level[0].offsetY=0
oCMenu.level[0].rows=0
oCMenu.level[0].arrow=0
oCMenu.level[0].arrowWidth=0
oCMenu.level[0].arrowHeight=0
oCMenu.level[0].align="right"


//EXAMPLE SUB LEVEL[1] PROPERTIES - You have to specify the properties you want different from LEVEL[0] - If you want all items to look the same just remove this
oCMenu.level[1]=new cm_makeLevel() //Add this for each new level (adding one to the number)
oCMenu.level[1].width=oCMenu.level[0].width-2
oCMenu.level[1].height=22
oCMenu.level[1].regClass="clLevel1"
oCMenu.level[1].overClass="clLevel1over"
oCMenu.level[1].borderX=1
oCMenu.level[1].borderY=1
oCMenu.level[1].align="right" 
oCMenu.level[1].offsetX=-(oCMenu.level[0].width-2)/2+20
oCMenu.level[1].offsetY=0
oCMenu.level[1].borderClass="clLevel1border"


//EXAMPLE SUB LEVEL[2] PROPERTIES - You have to spesify the properties you want different from LEVEL[1] OR LEVEL[0] - If you want all items to look the same just remove this
oCMenu.level[2]=new cm_makeLevel() //Add this for each new level (adding one to the number)
oCMenu.level[2].width=150
oCMenu.level[2].height=20
oCMenu.level[2].offsetX=0
oCMenu.level[2].offsetY=0
oCMenu.level[2].regClass="clLevel2"
oCMenu.level[2].overClass="clLevel2over"
oCMenu.level[2].borderClass="clLevel2border"


//Level properties - ALL properties have to be spesified in level 0
oCMenu.level[3]=new cm_makeLevel() //Add this for each new level
oCMenu.level[3].width=134
oCMenu.level[3].height=15 
oCMenu.level[3].regClass="clLevel0"
oCMenu.level[3].overClass="clLevel0over"
oCMenu.level[3].borderX=0
oCMenu.level[3].borderY=0
oCMenu.level[3].borderClass="clLevel0border"
oCMenu.level[3].offsetX=0
oCMenu.level[3].offsetY=0
oCMenu.level[3].rows=0
oCMenu.level[3].arrow=0
oCMenu.level[3].arrowWidth=0
oCMenu.level[3].arrowHeight=0
oCMenu.level[3].align="right"





<%
'---Dichiarazione variabili
'	Dim SQLCart, RSCart, TotaleCart, SQLTipologie, RSTipologie, CartTipologia, PrezzoProdotto, PrezzoTotaleProdotto, SQLSconti, RSSconti

'---Recupero i prodotti inseriti nel carrello per questa sessione
	SQLCart = " SELECT * FROM Carrello WHERE IDSessione = '"& SessionID &"' "
	Set RSCart = Conn.Execute(SQLCart)
%>





//Menu object creation
oCMenu2=new makeCM("oCMenu2") //Making the menu object. Argument: menuname

//Menu properties   
oCMenu2.pxBetween=1
oCMenu2.fromLeft=5 
oCMenu2.fromTop=230   
oCMenu2.rows=0 
oCMenu2.menuPlacement=""
                                                             
oCMenu2.offlineRoot="file:///C|/Inetpub/wwwroot/dhtmlcentral/" 
oCMenu2.onlineRoot="" 
oCMenu2.resizeCheck=1 
oCMenu2.wait=80 
oCMenu2.fillImg="cm_fill.gif"
oCMenu2.zIndex=0

//Background bar properties
oCMenu2.useBar=0
oCMenu2.barWidth="100%"
oCMenu2.barHeight="menu" 
oCMenu2.barClass="clBar"
oCMenu2.barX=0 
oCMenu2.barY=0
oCMenu2.barBorderX=0
oCMenu2.barBorderY=0
oCMenu2.barBorderClass=""

//Level properties - ALL properties have to be spesified in level 0
oCMenu2.level[0]=new cm_makeLevel() //Add this for each new level
oCMenu2.level[0].width=132
oCMenu2.level[0].height=15 
oCMenu2.level[0].regClass="clLevel0"
oCMenu2.level[0].overClass="clLevel0over"
oCMenu2.level[0].borderX=0
oCMenu2.level[0].borderY=0
oCMenu2.level[0].borderClass="clLevel0border"
oCMenu2.level[0].offsetX=0
oCMenu2.level[0].offsetY=0
oCMenu2.level[0].rows=0
oCMenu2.level[0].arrow=0
oCMenu2.level[0].arrowWidth=0
oCMenu2.level[0].arrowHeight=0
oCMenu2.level[0].align="right"


//EXAMPLE SUB LEVEL[1] PROPERTIES - You have to specify the properties you want different from LEVEL[0] - If you want all items to look the same just remove this
oCMenu2.level[1]=new cm_makeLevel() //Add this for each new level (adding one to the number)
oCMenu2.level[1].width=oCMenu2.level[0].width+4
oCMenu2.level[1].height=32
oCMenu2.level[1].regClass="clLevel1"
oCMenu2.level[1].overClass="clLevel1over"
oCMenu2.level[1].borderX=1
oCMenu2.level[1].borderY=1
oCMenu2.level[1].align="right" 
oCMenu2.level[1].offsetX=0
oCMenu2.level[1].offsetY=0
oCMenu2.level[1].borderClass="clLevel1border"


//EXAMPLE SUB LEVEL[2] PROPERTIES - You have to spesify the properties you want different from LEVEL[1] OR LEVEL[0] - If you want all items to look the same just remove this
oCMenu2.level[2]=new cm_makeLevel() //Add this for each new level (adding one to the number)
oCMenu2.level[2].width=150
oCMenu2.level[2].height=20
oCMenu2.level[2].offsetX=0
oCMenu2.level[2].offsetY=0
oCMenu2.level[2].regClass="clLevel2"
oCMenu2.level[2].overClass="clLevel2"
oCMenu2.level[2].borderClass="clLevel2border"


//Level properties - ALL properties have to be spesified in level 0
oCMenu2.level[3]=new cm_makeLevel() //Add this for each new level
oCMenu2.level[3].width=134
oCMenu2.level[3].height=15 
oCMenu2.level[3].regClass="clLevel0"
oCMenu2.level[3].overClass="clLevel0over"
oCMenu2.level[3].borderX=0
oCMenu2.level[3].borderY=0
oCMenu2.level[3].borderClass="clLevel0border"
oCMenu2.level[3].offsetX=0
oCMenu2.level[3].offsetY=0
oCMenu2.level[3].rows=0
oCMenu2.level[3].arrow=0
oCMenu2.level[3].arrowWidth=0
oCMenu2.level[3].arrowHeight=0
oCMenu2.level[3].align="right"