<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> Untitled Document <% folder = "f:\dev.fmmafco.com\Assets\Images\hdrpics" set fso = server.createobject("Scripting.fileSystemObject") set fold = fso.getFolder(folder) for each file in fold.files ct = ct + 1 next set fold = nothing set fso = nothing Randomize ' Initialize random-number generator. pic = Int((ct * Rnd) + 1) ' Generate random value between 1 file count if pic = session("pic") then Randomize ' Initialize random-number generator. pic = Int((ct * Rnd) + 1) ' Generate random value between 1 file count end if session("pic") = pic %>

Request a Catalog:

*First Name
*Last Name
*Job Title
*Company Name
*Street Address
Street Address (cont.)
*City
*State/Province
*Zip/Postal Code
*Country
Phone Number
Email Address
Confirm E-mail Address

*denotes a required field