1*b1cdbd2cSJim Jagielski<% 2*b1cdbd2cSJim Jagielski Option Explicit 3*b1cdbd2cSJim Jagielski Response.Expires = 0 4*b1cdbd2cSJim Jagielski%> 5*b1cdbd2cSJim Jagielski<!--*********************************************************** 6*b1cdbd2cSJim Jagielski * 7*b1cdbd2cSJim Jagielski * Licensed to the Apache Software Foundation (ASF) under one 8*b1cdbd2cSJim Jagielski * or more contributor license agreements. See the NOTICE file 9*b1cdbd2cSJim Jagielski * distributed with this work for additional information 10*b1cdbd2cSJim Jagielski * regarding copyright ownership. The ASF licenses this file 11*b1cdbd2cSJim Jagielski * to you under the Apache License, Version 2.0 (the 12*b1cdbd2cSJim Jagielski * "License"); you may not use this file except in compliance 13*b1cdbd2cSJim Jagielski * with the License. You may obtain a copy of the License at 14*b1cdbd2cSJim Jagielski * 15*b1cdbd2cSJim Jagielski * http://www.apache.org/licenses/LICENSE-2.0 16*b1cdbd2cSJim Jagielski * 17*b1cdbd2cSJim Jagielski * Unless required by applicable law or agreed to in writing, 18*b1cdbd2cSJim Jagielski * software distributed under the License is distributed on an 19*b1cdbd2cSJim Jagielski * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY 20*b1cdbd2cSJim Jagielski * KIND, either express or implied. See the License for the 21*b1cdbd2cSJim Jagielski * specific language governing permissions and limitations 22*b1cdbd2cSJim Jagielski * under the License. 23*b1cdbd2cSJim Jagielski * 24*b1cdbd2cSJim Jagielski ***********************************************************--> 25*b1cdbd2cSJim Jagielski 26*b1cdbd2cSJim Jagielski<!-- #include file = "common.inc" --> 27*b1cdbd2cSJim Jagielski 28*b1cdbd2cSJim Jagielski<% 29*b1cdbd2cSJim Jagielski Dim sGifName1, sGifName2, nGifID, aPictureArray 30*b1cdbd2cSJim Jagielski 31*b1cdbd2cSJim Jagielski nGifID = Session( "GIFID" ) 32*b1cdbd2cSJim Jagielski 33*b1cdbd2cSJim Jagielski ' get current and next picture 34*b1cdbd2cSJim Jagielski aPictureArray = File_getDataVirtual( csFilePicture, ".", ";" ) 35*b1cdbd2cSJim Jagielski 36*b1cdbd2cSJim Jagielski ' not last picture or wrong input ? 37*b1cdbd2cSJim Jagielski If CInt( nGifID ) < UBound( aPictureArray ) / 2 Then 38*b1cdbd2cSJim Jagielski sGifName1 = aPictureArray( ( nGifID - 1 ) * 2 + 1 ) 39*b1cdbd2cSJim Jagielski sGifName2 = aPictureArray( ( nGifID ) * 2 + 1 ) 40*b1cdbd2cSJim Jagielski Else 41*b1cdbd2cSJim Jagielski nGifID = CInt( UBound( aPictureArray ) / 2 ) 42*b1cdbd2cSJim Jagielski sGifName1 = aPictureArray( ( nGifID - 1 ) * 2 + 1 ) 43*b1cdbd2cSJim Jagielski sGifName2 = sGifName1 44*b1cdbd2cSJim Jagielski End If 45*b1cdbd2cSJim Jagielski%> 46*b1cdbd2cSJim Jagielski 47*b1cdbd2cSJim Jagielski<HTML> 48*b1cdbd2cSJim Jagielski 49*b1cdbd2cSJim Jagielski<HEAD> 50*b1cdbd2cSJim Jagielski <TITLE>$$1</TITLE> 51*b1cdbd2cSJim Jagielski</HEAD> 52*b1cdbd2cSJim Jagielski 53*b1cdbd2cSJim Jagielski<BODY bgcolor="white"> 54*b1cdbd2cSJim Jagielski <table width=100% height=99%> 55*b1cdbd2cSJim Jagielski <tr valign=center><td align=center> 56*b1cdbd2cSJim Jagielski <IMG src="<% = sGifName1 %>" width=$$4 height=$$5 border=0> 57*b1cdbd2cSJim Jagielski <br><IMG src="<% = sGifName2 %>" width=1 height=1 border=0> 58*b1cdbd2cSJim Jagielski </td></tr> 59*b1cdbd2cSJim Jagielski </table> 60*b1cdbd2cSJim Jagielski</BODY> 61*b1cdbd2cSJim Jagielski 62*b1cdbd2cSJim Jagielski</HTML> 63