Random funktion

Du kan lege lidt med den her :

<%
Randomize
index = INT(3 * RND + 1)

Select Case index

Case 1
  Response.write("PopUp 1")
Case 2
  Response.write("PopUp 2")
Case 3
  Response.write("PopUp 3")             
End Select
%>

.Anders

Her kommer så den tricky del, som jeg ikke nævnte,

den skal være session baseret, jeg har en session som er enten 0 eller 1

hvis sessionen er 1 skal den ikke vise popups, og er den 0 skal de vises.

<%
if session("dinsession") = 0 then
Randomize
index = INT(3 * RND + 1)

Select Case index

Case 1
  Response.write("PopUp 1")
Case 2
  Response.write("PopUp 2")
Case 3
  Response.write("PopUp 3")             
End Select
else
  ' ingen popups
end if
%>

<%

if isNull(session("dinsession")) or  session("dinsession") = 0 then
Randomize
index = INT(3 * RND + 1)

Select Case index

Case 1
  Response.write("<script language=javascript>")
  Response.write("window.open('popup1.swf',  '_new', 'resizable=0,scrollbars=0,toolbar=0,location=0,menubar=0,status=0,width=800,height=600')")
  Response.write("</script>")

Case 2
  Response.write("<script language=javascript>")
  Response.write("window.open('popup2.swf',  '_new', 'resizable=0,scrollbars=0,toolbar=0,location=0,menubar=0,status=0,width=600,height=250')")
  Response.write("</script>")

Case 3
  Response.write("<script language=javascript>")
  Response.write("window.open('popup3.swf',  '_new', 'resizable=0,scrollbars=0,toolbar=0,location=0,menubar=0,status=0,width=800,height=600')")
  Response.write("</script>")

End Select

else
  ' ingen popups
end if

%>

Jeg for javascript fejl...