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