%@ Language="VBScript" %>
<% Option Explicit %>
<% 'header must be included in file and file must be saved as filename.asp
dim num, picNum, ArrPics
' array hold picture file names any number of pictures can be added - quotes around the file names and - separate pictures with a comma
' if picture was a gif the name would filename.gif if a jpg the name would filename.jpg
ArrPics = Array("templates/images/image1.jpg","/templates/images/image2.jpg","/templates/images/image3.jpg","/templatess/images/image4.jpg","/templates/images/image5.jpg","/templates/images/image6.jpg","/templates/images/image7.jpg","/templates/images/image8.jpg","/templates/images/image9.jpg")
'picNum is one less then the number of pictures in tha array'
picNum = 8
num = Round(Rnd*picNum)
'all other code besides line commented below can be changed
The Student Oklahoma Education Association (SOEA) is a pre-professional organization of undergraduate and graduate students preparing for careers in education. As a member of the Oklahoma Panhandle State University SOEA, students immediately become members and enjoy the benefits of the Oklahoma Education Association(OEA) and the National Education Association (NEA).
How to Join?
Simply attend a meeting, talk to one the current SOEA officers or members, or contact Mr. Mihelic in Hamilton Rm. 122A.