Ciao a tutti, premetto di capirci poco di ASP...lo capirete probabilmente leggendo il mio post .....
...ho installato MWopen sul mio server Aruba e vorrei attribuire un'icona ad ogni categoria del mio catalogo, ho cercato di modificare il file inc_categorie.asp in vari maodi.....ma niente da fare non riesco a farlo funzionare .....
....vi chiedo una mano
Riporto di seguito il file inc_categorie.asp e le righe che vorrei inserire.
<%
'VERSIONE FILE 1.4.0
%>
<!-- CATALOGO -->
<table width="118" border="1" cellspacing="0" cellpadding="3" bordercolordark="#E5E5E5" bordercolorlight="#000000" border="1">
<tr>
<td bgcolor="<%=Tabella_Colore_Titolo%>" valign="middle">
<img src="<%=Path_Img%>catalogo_tabella_titolo.jpg">
</td>
</tr>
<tr>
<td valign="top" bgcolor="<%=Tabella_Colore_Cella%>">
<br>
<%
'---Dichiarazione variabili
Dim SQLCat, RSCat, Icat, QSSCategoria, SCatArr, CatArr, BoolCategorie, K
SQLCat = " SELECT ID, SCategoria FROM SCategorie "
Set RScat = Conn.Execute(SQLCat)
If Not RSCat.EOF Then
SCatArr = RScat.GetRows
'---Stampo a video le scategorie ed eventuali categorie
If QSSCategoria <> "" Then
SQLCat = " SELECT ID, Categoria FROM Categorie WHERE SCategoria = " & QSSCategoria
Set RSCat = Conn.Execute(SQLCat)
If Not RSCat.EOF Then
CatArr = RSCat.GetRows
BoolCategorie = True
Else
BoolCategorie = False
End If
RSCat.Close
End If
For Icat = 0 to UBound(SCatArr, 2)
%>
<img src="<%=Path_Img%>catalogo_frecciasx.gif" width="7" height="9" border="0"> <a href="catalogo.asp?scat=<%=SCatArr(0,ICat)%>"><%=SCatArr(1,ICat)%></a> <---------------riga da modificare
<br>
<%
If CStr(SCatArr(0,ICat)) = QSSCategoria Then
If boolCategorie Then
For K = 0 To UBound(CatArr,2)
%>
<img src="<%=Path_Img%>catalogo_frecciadx.gif" width="7" height="9" border="0"> <a href="catalogo.asp?scat=<%=SCatArr(0,ICat)%>&cat=<%=CatArr(0,k)%>"><%=CatArr(1,k)%></a>
</br>
<%
Next
End If
End If
Next
Else
%>
<%=NoCategoria%>
<br>
<%
End If
%>
<br>
</td>
</tr>
</table>
<!-- /CATALOGO -->
e queste le righe da inserire:
<%
if SCatArr = 19 then
ImgArr=acnot.gif
else
if SCatArr = 22 then
ImgArr=acdesk.gif
else
if SCatArr = 25 then
ImgArr=tavolette.gif
else
if SCatArr = 26 then
ImgArr=cpu.gif
else
if SCatArr = 27 then
ImgArr=cavi.gif
else
if SCatArr = 28 then
ImgArr=memory.gif
else
if SCatArr = 29 then
ImgArr=fax.gif
else
if SCatArr = 30 then
ImgArr=gcontinuita.gif
else
if SCatArr = 31 then
ImgArr=hd.gif
else
if SCatArr = 32 then
ImgArr=lettori.gif
else
if SCatArr = 33 then
ImgArr=mainboard.gif
else
if SCatArr = 34 then
ImgArr=masterizzatori.gif
else
if SCatArr = 35 then
ImgArr=memorie.gif
else
if SCatArr = 36 then
ImgArr=modem.gif
else
if SCatArr = 37 then
ImgArr=monitor.gif
else
if SCatArr = 38 then
ImgArr=tastiere.gif
else
if SCatArr = 39 then
ImgArr=mouse.gif
else
if SCatArr = 40 then
ImgArr=notebook.gif
else
if SCatArr = 41 then
ImgArr=desktop.gif
else
if SCatArr = 42 then
ImgArr=plotter.gif
else
if SCatArr = 43 then
ImgArr=network.gif
else
if SCatArr = 44 then
ImgArr=scanner.gif
else
if SCatArr = 45 then
ImgArr=multimedia.gif
else
if SCatArr = 46 then
ImgArr=svideo.gif
else
if SCatArr = 47 then
ImgArr=software.gif
else
if SCatArr = 48 then
ImgArr=stampanti.gif
else
if SCatArr = 49 then
ImgArr=toner.gif
else
if SCatArr = 50 then
ImgArr=camera.gif
else
if SCatArr = 51 then
ImgArr=palmtop.gif
else
if SCatArr = 52 then
ImgArr=web.gif
<img src="<%=Path_Img%>><%=ImgArr%>" width="7" height="9" border="0"> <a href="catalogo.asp?scat=<%=SCatArr(0,ICat)%>"><%=SCatArr(1,ICat)%></a>
end if
Ciao e grazie a tutti.
