<%
dim photo1
photo1 = LCase(Request.ServerVariables("HTTP_USER_AGENT"))
%>
<%
if true then
%>
ShareThis
<%
else
%>
<%
end if
%>
<%
if InStr(photo1,"ipad") or InStr(photo1,"ipod") or InStr(photo1,"iphone") then
%>
1. Mouse over any image to activate slideshow controls.
2. Click on any image during the slideshow to jump to Flickr for commenting, captions and more information.
Loading pictures...
<%
else
%>
1. Click the full screen icon to enable more viewing options
2. Click on any image during the slideshow to jump to Flickr for commenting, captions and more information.
to enable more viewing options