<%=Replace(rsnews("Articolo"), "''", "'")%>
<%=Replace(rsnews("Descrizione_ita"), "''", "'")%>
|
|
<%
If Len(rsnews("File1")) > 0 Then
Dim estensione2
estensione2 = Mid(rsnews("File1"), InStrRev(rsnews("File1"), "."))
If estensione2 <> ".jpg" and estensione2 <> ".JPG" and estensione2 <> ".gif" and estensione2 <> ".GIF" and estensione2 <> ".bmp" and estensione2 <> ".BMP" Then%>
" rel="lightbox">
<%else%>
" title="" rel="lightbox">" hspace="2" vspace="2" border="0" align="absmiddle" class="foto3">
<%End If%>
<%End If%>
<%
If Len(rsnews("File2")) > 0 Then
estensione2 = Mid(rsnews("File2"), InStrRev(rsnews("File2"), "."))
If estensione2 <> ".jpg" and estensione2 <> ".JPG" and estensione2 <> ".gif" and estensione2 <> ".GIF" and estensione2 <> ".bmp" and estensione2 <> ".BMP" Then%>
" rel="lightbox">
<%else%>
" title="" rel="lightbox">" hspace="2" vspace="2" border="0" align="absmiddle" class="foto3">
<%End If%>
<%End If%>
<%
If Len(rsnews("File3")) > 0 Then
estensione2 = Mid(rsnews("File3"), InStrRev(rsnews("File3"), "."))
If estensione2 <> ".jpg" and estensione2 <> ".JPG" and estensione2 <> ".gif" and estensione2 <> ".GIF" and estensione2 <> ".bmp" and estensione2 <> ".BMP" Then%>
" rel="lightbox">
<%else%>
" title="" rel="lightbox">" hspace="2" vspace="2" border="0" align="absmiddle" class="foto3">
<%End If%>
<%End If%>
<%
If Len(rsnews("File4")) > 0 Then
estensione2 = Mid(rsnews("File4"), InStrRev(rsnews("File4"), "."))
If estensione2 <> ".jpg" and estensione2 <> ".JPG" and estensione2 <> ".gif" and estensione2 <> ".GIF" and estensione2 <> ".bmp" and estensione2 <> ".BMP" Then%>
" rel="lightbox">
<%else%>
" title=""rel="lightbox">" hspace="2" vspace="2" border="0" align="absmiddle" class="foto3">
<%End If%>
<%End If%>
|