|
C
chris124 author
On my view page I have several thumbnail images, the path of which is taken from my database, please can someone tell me the code I should write in order to make these images clickable and open a full size image in a new window.
Below is the code as it stands for these images
<TD>
<% if IsSafeImageExt(rs.Fields("Image")) then %>
<img width=100 height=75 border=0 src="<%=AddLinkPrefix(strTableName, "Image",GetData(rs.Fields("Image"), ""))%>">
<% end if %>
 
<% if IsSafeImageExt(rs.Fields("Image1")) then %>
<img width=100 height=75 border=0 src="<%=AddLinkPrefix(strTableName, "Image1",GetData(rs.Fields("Image1"), ""))%>">
<% end if %>
<% if IsSafeImageExt(rs.Fields("Image2")) then %>
<img width=100 height=75 border=0 src="<%=AddLinkPrefix(strTableName, "Image2",GetData(rs.Fields("Image2"), ""))%>">
<% end if %>
<% if IsSafeImageExt(rs.Fields("Image3")) then %>
<img width=100 height=75 border=0 src="<%=AddLinkPrefix(strTableName, "Image3",GetData(rs.Fields("Image3"), ""))%>">
<% end if %>
<% if IsSafeImageExt(rs.Fields("Image4")) then %>
<img width=100 height=75 border=0 src="<%=AddLinkPrefix(strTableName, "Image4",GetData(rs.Fields("Image4"), ""))%>">
<% end if %>
<% if IsSafeImageExt(rs.Fields("Image5")) then %>
<img width=100 height=75 border=0 src="<%=AddLinkPrefix(strTableName, "Image5",GetData(rs.Fields("Image5"), ""))%>">
<% end if %>
<% if IsSafeImageExt(rs.Fields("Image6")) then %>
<img width=100 height=75 border=0 src="<%=AddLinkPrefix(strTableName, "Image6",GetData(rs.Fields("Image6"), ""))%>">
<% end if %>
<% if IsSafeImageExt(rs.Fields("Image7")) then %>
<img width=100 height=75 border=0 src="<%=AddLinkPrefix(strTableName, "Image7",GetData(rs.Fields("Image7"), ""))%>">
<% end if %>
<% if IsSafeImageExt(rs.Fields("Image8")) then %>
<img width=100 height=75 border=0 src="<%=AddLinkPrefix(strTableName, "Image8",GetData(rs.Fields("Image8"), ""))%>">
<% end if %>
</td>
Thanks
|
|
