<%
Randomize
Dim varHeaderPhotoURL
SELECT CASE Int((8 - 1 + 1) * Rnd + 1)
CASE 1 : varHeaderPhotoURL = "/blythe/cri_blytheca_header_photo_1.jpg"
CASE 2 : varHeaderPhotoURL = "/bullheadcity/cri_bcaz_header_photo_1.jpg"
CASE 3 : varHeaderPhotoURL = "/ehrenberg/cri_ehrenbergaz_header_photo_1.jpg"
CASE 4 : varHeaderPhotoURL = "/lakehavasucity/cri_lhcaz_header_photo_1.jpg"
CASE 5 : varHeaderPhotoURL = "/laughlin/cri_laughlinnv_header_photo_1.jpg"
CASE 6 : varHeaderPhotoURL = "/needles/cri_needlesca_header_photo_1.jpg"
CASE 7 : varHeaderPhotoURL = "/parker/cri_parkeraz_header_photo_1.jpg"
CASE 8 : varHeaderPhotoURL = "/yuma/cri_yumaaz_header_photo_1.jpg"
END SELECT
Response.Write(varHeaderPhotoURL)
%>" alt="Area photo" width="780" height="98" hspace="0" vspace="0" border="0"> |