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<HTML> 29cdf0e10cSrcweir 30cdf0e10cSrcweir<HEAD> 31cdf0e10cSrcweir <META http-equiv="refresh" CONTENT="<% = cnRefreshTime %>"> 32cdf0e10cSrcweir</HEAD> 33cdf0e10cSrcweir 34cdf0e10cSrcweir<% 35cdf0e10cSrcweir ' get current picture id 36cdf0e10cSrcweir Dim nGIFID 37cdf0e10cSrcweir 38cdf0e10cSrcweir nGifID = File_getDataVirtual( csFileCurrent, ".", ";" )( 0 ) 39cdf0e10cSrcweir 40cdf0e10cSrcweir ' a new picture was chosen ? 41cdf0e10cSrcweir if nGIFID <> Session( "GIFID" ) then 42cdf0e10cSrcweir ' then store the id of the new picture and show it 43cdf0e10cSrcweir Session( "GIFID" ) = nGIFID 44cdf0e10cSrcweir %> 45cdf0e10cSrcweir <BODY bgcolor="red" onLoad="parent.frame1.location.href='./show.asp?<%= nGIFID %>'"> 46cdf0e10cSrcweir <% 47cdf0e10cSrcweir else 48cdf0e10cSrcweir %> 49cdf0e10cSrcweir <BODY bgcolor="green"> 50cdf0e10cSrcweir <% 51cdf0e10cSrcweir end if 52cdf0e10cSrcweir%> 53cdf0e10cSrcweir 54cdf0e10cSrcweir</BODY> 55cdf0e10cSrcweir 56*5b501c92SAndrew Rist</HTML> 57