Gecko [ www.utparral.edu.mx ]

Name	Size	Permission
common.inc	3.63 KB	-rw-r--r--
common.pl	1.83 KB	-rw-r--r--
edit.asp	1003 B	-rw-r--r--
editpic.asp	2.09 KB	-rw-r--r--
editpic.pl	1.9 KB	-rwxr-xr-x
edit.pl	558 B	-rw-r--r--
index.pl	343 B	-rw-r--r--
poll.asp	1.44 KB	-rw-r--r--
poll.pl	1.51 KB	-rwxr-xr-x
savepic.asp	1.75 KB	-rw-r--r--
savepic.pl	1.65 KB	-rwxr-xr-x
show.asp	1.75 KB	-rw-r--r--
show.pl	1.8 KB	-rwxr-xr-x
webcast.asp	1.38 KB	-rw-r--r--
webcast.pl	1.37 KB	-rwxr-xr-x

Code Editor : poll.asp

<%
    Option Explicit
    Response.Expires = 0
%>

<HTML>

<%
    ' get current picture id
    Dim nGIFID

nGifID = File_getDataVirtual( csFileCurrent, ".", ";" )( 0 )

' a new picture was chosen ?
    if nGIFID <> Session( "GIFID" ) then
        ' then store the id of the new picture and show it
        Session( "GIFID" ) = nGIFID
    %>
        <BODY bgcolor="red" onLoad="parent.frame1.location.href='./show.asp?<%= nGIFID %>'">
    <%
    else
    %>
        <BODY bgcolor="green">
    <%
    end if
%>

</BODY>

</HTML>

${this.title}

Code Editor : poll.asp