<% Dim PicMsg(500) PicMsg(1) = "1 01_18_97.jpg
" PicMsg(2) = "2 02.jpg
" PicMsg(3) = "3 06.jpg
" PicMsg(4) = "4 51183.jpg
" PicMsg(5) = "5 51184.jpg
" PicMsg(6) = "6 51186.jpg
" PicMsg(7) = "7 bach1-02.jpg
" PicMsg(8) = "8 bach1-16.jpg
" PicMsg(9) = "9 boobie.jpg
" PicMsg(10) = "10 boobs.jpg
" PicMsg(11) = "11 boobs1.jpg
" PicMsg(12) = "12 chiharu2.jpg
" PicMsg(13) = "13 shih0027.jpg
" NoPicMsg = 13 %>