|
Displaying Source Code(s)
|
|
Random Picture Generator
--------------------------------------------------------------------------------
Description : This code simply generate a random picture and
display.
<HTML>
<HEAD>
<TITLE>Random Generated Picture</TITLE>
</HEAD>
<BODY>
<!--Copy starting from here-->
<CENTER>
<%
Randomize
Dim RandomNum, UpperBound, LowerBound
LowerBound = 1 'Put In the first picture #
UpperBound = 10 'Put In the last picture #
RandomNum = Int((UpperBound - LowerBound + 1) * Rnd + LowerBound)
%>
<IMG SRC="pic<% = RandomNum %>.jpg">
</CENTER>
<!--Copy End here-->
</BODY>
</HTML>
|
|
|
123
Eng