Dim models_link(134), models_text(134), maandtmodels(12)
	
    maandtmodels(1)= "Jan"
    maandtmodels(2)= "Feb"
    maandtmodels(3)= "Mar"
    maandtmodels(4)= "Apr"
    maandtmodels(5)= "May"
    maandtmodels(6)= "Jun"
    maandtmodels(7)= "Jul"
    maandtmodels(8)= "Aug"
    maandtmodels(9)= "Sep"
    maandtmodels(10)= "Oct"
    maandtmodels(11)= "Nov"
    maandtmodels(12)= "Dec"

	
	models_text(1) = "Bea"
	models_text(2) = "Beata"
	models_text(3) = "Beatrice"
	models_text(4) = "Beatrix"
	models_text(5) = "Beatriz"
	models_text(6) = "Bebe"
	models_text(7) = "Becky"
	models_text(8) = "Bela"
	models_text(9) = "Belilla"
	models_text(10) = "Belinda"
	models_text(11) = "Bella"
	models_text(12) = "Belle"
	models_text(13) = "Beltina"
	models_text(14) = "Bengt"
	models_text(15) = "Benita"
	models_text(16) = "Berit"
	models_text(17) = "Bernabette"
	models_text(18) = "Bernadette"
	models_text(19) = "Bernadine"
	models_text(20) = "Bernedeth"
	models_text(21) = "Bernice"
	models_text(22) = "Bernie"
	models_text(23) = "Bertha"
	models_text(24) = "Beryl"
	models_text(25) = "Bess"
	models_text(26) = "Bessie"
	models_text(27) = "Beth"
	models_text(28) = "Beth-Ann"
	models_text(29) = "Bethana"
	models_text(30) = "Bethany"
	models_text(31) = "Betsy"
	models_text(32) = "Bette"
	models_text(33) = "Bettina"
	models_text(34) = "Carleen"
	models_text(35) = "Carlene"
	models_text(36) = "Carlina"
	models_text(37) = "Carlotta"
	models_text(38) = "Carly"
	models_text(39) = "Carnycia"
	models_text(40) = "Carmel"
	models_text(41) = "Carmelita"
	models_text(42) = "Carmen"
	models_text(43) = "Carol"
	models_text(44) = "Carol-Lee"
	models_text(45) = "Carolina"
	models_text(46) = "Caroline"
	models_text(47) = "Carolyn"
	models_text(48) = "Carp"
	models_text(49) = "Carrie-Jane"
	models_text(50) = "Carrington"
	models_text(51) = "Cassandra"
	models_text(52) = "Cassie"
	models_text(53) = "Catalina"
	models_text(54) = "Cayenne"
	models_text(55) = "Eileen"
	models_text(56) = "Elaina"
	models_text(57) = "Elaine"
	models_text(58) = "Elda"
	models_text(59) = "Eldonna"
	models_text(60) = "Eldora"
	models_text(61) = "Eleanor"
	models_text(62) = "Electra"
	models_text(63) = "Elena"
	models_text(64) = "Elfrieda"
	models_text(65) = "Elina"
	models_text(66) = "Elinda"
	models_text(67) = "Elinda-Sue"
	models_text(68) = "Eliner"
	models_text(69) = "Elisa"
	models_text(70) = "Geetha"
	models_text(71) = "Gelene"
	models_text(72) = "Gemma"
	models_text(73) = "Genelle"
	models_text(74) = "Geneva"
	models_text(75) = "Genevieve"
	models_text(76) = "Genna"
	models_text(77) = "Genvieve"
	models_text(78) = "Geny"
	models_text(79) = "Georgette"
	models_text(80) = "Georgia"
	models_text(81) = "Georgianna"
	models_text(82) = "Georgie"
	models_text(83) = "Georgina"
	models_text(84) = "Jaima"
	models_text(85) = "Jaimey"
	models_text(86) = "Jaleen"
	models_text(87) = "Jama"
	models_text(88) = "Jame"
	models_text(89) = "Jamie"
	models_text(90) = "Jamima"
	models_text(91) = "Jamina"
	models_text(92) = "Jane"
	models_text(93) = "Janelle"
	models_text(94) = "Janet"
	models_text(95) = "Janetta"
	models_text(96) = "Jania"
	models_text(97) = "Janice"
	models_text(98) = "Janie"
	models_text(99) = "Janina"
	models_text(100) = "Janine"
	models_text(101) = "Janita"
	models_text(102) = "Patrice"
	models_text(103) = "Patricia"
	models_text(104) = "Patsy"
	models_text(105) = "Pattee"
	models_text(106) = "Patti-Ann"
	models_text(107) = "Patton"
	models_text(108) = "Patty"
	models_text(109) = "Paula"
	models_text(110) = "Paulee"
	models_text(111) = "Paulette"
	models_text(112) = "Paulina"
	models_text(113) = "Pauline"
	models_text(114) = "Payson"
	models_text(115) = "Payton"
	models_text(116) = "Pearl"
	models_text(117) = "Pearly"
	models_text(118) = "Peg"
	models_text(119) = "Peggy"
	models_text(120) = "Peirette"
	models_text(121) = "Penelope"
	models_text(122) = "Pennilyn"
	models_text(123) = "Penny"
	models_text(124) = "Peri"
	models_text(125) = "Perley"
	models_text(126) = "Peta"
	models_text(127) = "Petra"
	models_text(128) = "Petrecia"
	models_text(129) = "Portia"
	models_text(130) = "Posha"
	models_text(131) = "Prazeres"
	models_text(132) = "Prestiss"
	models_text(133) = "Pricilla"
	models_text(134) = "Prudence"
	
	models_link(1) = "http://www.beastsex.nl/0045/cjtm-14"
	models_link(2) = "http://www.beastsex.nl/0045/cjtm-15"
	models_link(3) = "http://www.beastsex.nl/0045/cjtm-16"
	models_link(4) = "http://www.beastsex.nl/0045/cjtm-17"
	models_link(5) = "http://www.beastsex.nl/0045/cjtm-18"
	models_link(6) = "http://www.beastsex.nl/0045/cjtm-19"
	models_link(7) = "http://www.beastsex.nl/0045/cjtm-2"
	models_link(8) = "http://www.beastsex.nl/0045/cjtm-20"
	models_link(9) = "http://www.beastsex.nl/0045/cjtm-21"
	models_link(10) = "http://www.beastsex.nl/0045/cjtm-22"
	models_link(11) = "http://www.beastsex.nl/0045/cjtm-23"
	models_link(12) = "http://www.beastsex.nl/0045/cjtm-24"
	models_link(13) = "http://www.beastsex.nl/0045/cjtm-25"
	models_link(14) = "http://www.beastsex.nl/0045/cjtm-26"
	models_link(15) = "http://www.beastsex.nl/0045/cjtm-27"
	models_link(16) = "http://www.beastsex.nl/0045/cjtm-28"
	models_link(17) = "http://www.beastsex.nl/0045/cjtm-29"
	models_link(18) = "http://www.beastsex.nl/0045/cjtm-3"
	models_link(19) = "http://www.beastsex.nl/0045/cjtm-30"
	models_link(20) = "http://www.beastsex.nl/0045/cjtm-31"
	models_link(21) = "http://www.beastsex.nl/0045/cjtm-32"
	models_link(22) = "http://www.beastsex.nl/0045/cjtm-33"
	models_link(23) = "http://www.beastsex.nl/0045/cjtm-34"
	models_link(24) = "http://www.beastsex.nl/0045/cjtm-35"
	models_link(25) = "http://www.beastsex.nl/0045/cjtm-36"
	models_link(26) = "http://www.beastsex.nl/0045/cjtm-37"
	models_link(27) = "http://www.beastsex.nl/0045/cjtm-38"
	models_link(28) = "http://www.beastsex.nl/0045/cjtm-39"
	models_link(29) = "http://www.beastsex.nl/0045/cjtm-4"
	models_link(30) = "http://www.beastsex.nl/0045/cjtm-40"
	models_link(31) = "http://www.beastsex.nl/0045/cjtm-41"
	models_link(32) = "http://www.beastsex.nl/0045/cjtm-42"
	models_link(33) = "http://www.beastsex.nl/0045/cjtm-43"
	models_link(34) = "http://www.beastsex.nl/0045/cjtm-44"
	models_link(35) = "http://www.beastsex.nl/0045/cjtm-45"
	models_link(36) = "http://www.beastsex.nl/0045/cjtm-46"
	models_link(37) = "http://www.beastsex.nl/0045/cjtm-47"
	models_link(38) = "http://www.beastsex.nl/0045/cjtm-48"
	models_link(39) = "http://www.beastsex.nl/0045/cjtm-49"
	models_link(40) = "http://www.beastsex.nl/0045/cjtm-5"
	models_link(41) = "http://www.beastsex.nl/0045/cjtm-50"
	models_link(42) = "http://www.beastsex.nl/0045/cjtm-51"
	models_link(43) = "http://www.beastsex.nl/0045/cjtm-52"
	models_link(44) = "http://www.beastsex.nl/0045/cjtm-53"
	models_link(45) = "http://www.beastsex.nl/0045/cjtm-54"
	models_link(46) = "http://www.beastsex.nl/0045/cjtm-55"
	models_link(47) = "http://www.beastsex.nl/0045/cjtm-56"
	models_link(48) = "http://www.beastsex.nl/0045/cjtm-57"
	models_link(49) = "http://www.beastsex.nl/0045/cjtm-58"
	models_link(50) = "http://www.beastsex.nl/0045/cjtm-59"
	models_link(51) = "http://www.beastsex.nl/0045/cjtm-6"
	models_link(52) = "http://www.beastsex.nl/0045/cjtm-60"
	models_link(53) = "http://www.beastsex.nl/0045/cjtm-61"
	models_link(54) = "http://www.beastsex.nl/0045/cjtm-62"
	models_link(55) = "http://www.beastsex.nl/0045/cjtm-63"
	models_link(56) = "http://www.beastsex.nl/0045/cjtm-64"
	models_link(57) = "http://www.beastsex.nl/0045/cjtm-65"
	models_link(58) = "http://www.beastsex.nl/0045/cjtm-66"
	models_link(59) = "http://www.beastsex.nl/0045/cjtm-67"
	models_link(60) = "http://www.beastsex.nl/0045/cjtm-68"
	models_link(61) = "http://www.beastsex.nl/0045/cjtm-69"
	models_link(62) = "http://www.beastsex.nl/0045/cjtm-7"
	models_link(63) = "http://www.beastsex.nl/0045/cjtm-70"
	models_link(64) = "http://www.beastsex.nl/0045/cjtm-71"
	models_link(65) = "http://www.beastsex.nl/0045/cjtm-72"
	models_link(66) = "http://www.beastsex.nl/0045/cjtm-73"
	models_link(67) = "http://www.beastsex.nl/0045/cjtm-74"
	models_link(68) = "http://www.beastsex.nl/0045/cjtm-75"
	models_link(69) = "http://www.beastsex.nl/0045/cjtm-76"
	models_link(70) = "http://www.beastsex.nl/0045/cjtm-77"
	models_link(71) = "http://www.beastsex.nl/0045/cjtm-78"
	models_link(72) = "http://www.beastsex.nl/0045/cjtm-79"
	models_link(73) = "http://www.beastsex.nl/0045/cjtm-8"
	models_link(74) = "http://www.beastsex.nl/0045/cjtm-80"
	models_link(75) = "http://www.beastsex.nl/0045/cjtm-81"
	models_link(76) = "http://www.beastsex.nl/0045/cjtm-82"
	models_link(77) = "http://www.beastsex.nl/0045/cjtm-83"
	models_link(78) = "http://www.beastsex.nl/0045/cjtm-84"
	models_link(79) = "http://www.beastsex.nl/0045/cjtm-85"
	models_link(80) = "http://www.beastsex.nl/0045/cjtm-86"
	models_link(81) = "http://www.beastsex.nl/0045/cjtm-87"
	models_link(82) = "http://www.beastsex.nl/0045/cjtm-88"
	models_link(83) = "http://www.beastsex.nl/0045/cjtm-89"
	models_link(84) = "http://www.beastsex.nl/0045/cjtm-9"
	models_link(85) = "http://www.beastsex.nl/0045/cjtm-90"
	models_link(86) = "http://www.beastsex.nl/0045/cjtm-91"
	models_link(87) = "http://www.beastsex.nl/0045/cjtm-92"
	models_link(88) = "http://www.beastsex.nl/0045/cjtm-93"
	models_link(89) = "http://www.beastsex.nl/0045/cjtm-94"
	models_link(90) = "http://www.beastsex.nl/0045/cjtm-95"
	models_link(91) = "http://www.beastsex.nl/0045/cjtm-96"
	models_link(92) = "http://www.beastsex.nl/0045/cjtm-97"
	models_link(93) = "http://www.beastsex.nl/0045/cjtm-98"
	models_link(94) = "http://www.beastsex.nl/0045/cjtm-1"
	models_link(95) = "http://www.beastsex.nl/0045/cjtm-10"
	models_link(96) = "http://www.beastsex.nl/0045/cjtm-100"
	models_link(97) = "http://www.beastsex.nl/0045/cjtm-11"
	models_link(98) = "http://www.beastsex.nl/0045/cjtm-12"
	models_link(99) = "http://www.beastsex.nl/0045/cjtm-13"
	models_link(100) = "http://www.beastsex.nl/0045/cjtm-82"
	models_link(101) = "http://www.beastsex.nl/0045/cjtm-83"
	models_link(102) = "http://www.beastsex.nl/0045/cjtm-84"
	models_link(103) = "http://www.beastsex.nl/0045/cjtm-85"
	models_link(104) = "http://www.beastsex.nl/0045/cjtm-86"
	models_link(105) = "http://www.beastsex.nl/0045/cjtm-87"
	models_link(106) = "http://www.beastsex.nl/0045/cjtm-88"
	models_link(107) = "http://www.beastsex.nl/0045/cjtm-89"
	models_link(108) = "http://www.beastsex.nl/0045/cjtm-9"
	models_link(109) = "http://www.beastsex.nl/0045/cjtm-90"
	models_link(110) = "http://www.beastsex.nl/0045/cjtm-91"
	models_link(111) = "http://www.beastsex.nl/0045/cjtm-92"
	models_link(112) = "http://www.beastsex.nl/0045/cjtm-93"
	models_link(113) = "http://www.beastsex.nl/0045/cjtm-94"
	models_link(114) = "http://www.beastsex.nl/0045/cjtm-95"
	models_link(115) = "http://www.beastsex.nl/0045/cjtm-96"
	models_link(116) = "http://www.beastsex.nl/0045/cjtm-97"
	models_link(117) = "http://www.beastsex.nl/0045/cjtm-98"
	models_link(118) = "http://www.beastsex.nl/0045/cjtm-99"
	models_link(119) = "http://www.beastsex.nl/0045/cjtm-70"
	models_link(120) = "http://www.beastsex.nl/0045/cjtm-71"
	models_link(121) = "http://www.beastsex.nl/0045/cjtm-72"
	models_link(122) = "http://www.beastsex.nl/0045/cjtm-73"
	models_link(123) = "http://www.beastsex.nl/0045/cjtm-74"
	models_link(124) = "http://www.beastsex.nl/0045/cjtm-75"
	models_link(125) = "http://www.beastsex.nl/0045/cjtm-76"
	models_link(126) = "http://www.beastsex.nl/0045/cjtm-77"
	models_link(127) = "http://www.beastsex.nl/0045/cjtm-78"
	models_link(128) = "http://www.beastsex.nl/0045/cjtm-79"
	models_link(129) = "http://www.beastsex.nl/0045/cjtm-8"
	models_link(130) = "http://www.beastsex.nl/0045/cjtm-80"
	models_link(131) = "http://www.beastsex.nl/0045/cjtm-81"
	models_link(132) = "http://www.beastsex.nl/0045/cjtm-8"
	models_link(133) = "http://www.beastsex.nl/0045/cjtm-80"
	models_link(134) = "http://www.beastsex.nl/0045/cjtm-81"

	
		Function givememodels(nr, col, terug)
		Rnd(-1)
		Randomize DatePart("D",Date()) - terug 
		maandagainmodels = DatePart("M",Date()) 
		dezemaandmodels = DatePart("D",Date()) - terug &" "& maandtmodels(maandagainmodels)
        If terug = 0 Then 
        	dezemaandmodels = "Today"
        End If 	
		If DatePart("D",Date()) <= terug Then
        dezemaandmodels = 30 - terug  &"  "& maandtmodels(maandagainmodels -1) 
        End If
			If terug = 99 Then
				dezemaandmodels = ""
		 	End If
				
				returnStr = ""
		If (nr*col) <= (UBound(models_link)-1) Then
			returnStr = returnStr & "<table width='100%' cellspacing='3'>"
			For i = 1 To nr
				returnStr = returnStr & "<tr>"
				For j = 1 To col
					huidig_nummer_msm = Round(Rnd*(UBound(models_link)-1))
					If Instr(used_numbers_msm,"|"&huidig_nummer_msm&"|") = 0 Then
						used_numbers_msm = used_numbers_msm & "|"&huidig_nummer_msm&"|"
						returnStr = returnStr & "<td align='center' class='linklist'><a href='" & models_link(huidig_nummer_msm) & "' target='_blank'>" & models_text(huidig_nummer_msm) & "<td><div class='datum'>"&dezemaandmodels&"</div></a></td></td>"
					Else
						j = j - 1
					End If
				Next
				returnStr = returnStr & "</tr>"
			Next
			returnStr = returnStr & "</table>"
		Else
			returnStr = returnStr & "Er zijn max. " & UBound(models_link) & " models_links beschikbaar!"
		End If
		
		Document.Write(returnStr)
	End Function