<% Dim RandNum Randomize RandNum = Int(Rnd * 4) + 1 if RandNum = 1 Then %> <% ElseIf RandNum = 2 Then %> <% ElseIf RandNum = 3 Then %> <% ElseIf RandNum = 4 Then %> <% End if %>