Random

hvad skal det skrives i.

Netrom.

Ok asp så lige emnet

Nope.... Lav listen over links i et array, vælge et random tal og redirect....

<%

Randomize

Dim LinkList
LinkList(1) = \"http://www.google.com\"
LinkList(2) = \"http://www.somesite.com\"
..
..
..
LinkList(1204) = \"http://www.someothersite.com\"

Response.Redirect(LinkList(Int(1204 * Rnd) + 1)

Ups... Skulle selvfølgelig være

<%

Randomize

Dim LinkList(1024)
LinkList(1) = \"http://www.google.com\"
LinkList(2) = \"http://www.somesite.com\"
..
..
..
LinkList(1204) = \"http://www.someothersite.com\"

Response.Redirect(LinkList(Int(1204 * Rnd) + 1))
%>

Virker det.. så.. at når jeg er blevet smidt videre en gang.. og reloader.. at den så random\'r igen?

Hver gang scriptet bliver kørt så vælges der en ny random side. Hvis du tilføjer

Response.CacheControl = \"No-cache\"


Før Response.Redirect sikrer du dig at siden ikke bliver cachet på klienten og at den derved bliver random hver gang!

Jammen når den først har gået ind på en random.. og man reloader .. reloader den jo bare den aktuelle side som man først er blevet sendt til .. !?

Ja! Naturligvis! Du kan jo ikke fortælle den side du gerne vil sende folk til at de kommer fra dig og at du gerne vil bestemme hvor de skal hen hvis de ønsker et reload. Du kan lave noget der minder om med en iframe....

<%

Randomize

Dim LinkList(2)
LinkList(1) = \"http://www.google.com\"
LinkList(2) = \"http://www.jubii.com\"

Response.CacheControl = \"No-cache\"
ifrmSrc = LinkList(Int(2 * Rnd) + 1)

%>

<html>
<head>
    <style type=\"text/css\">
        body { margin: 0px; }
        iframe { width: 100%; height: 100%; }
    </style>
</head>
<body>
    <iframe src=\"<% = ifrmSrc %>\"></iframe>
</body>

Problem: IFRAME understøttes kun i IE5+ og Nyeste v. af NN... Skulle gerne være cross-browser!

Så lav det med frames - det er sku\' da et fedt :-)

<%

Randomize

Dim LinkList(2)
LinkList(1) = \"http://www.google.com\"
LinkList(2) = \"http://www.jubii.com\"

Response.CacheControl = \"No-cache\"
ifrmSrc = LinkList(Int(2 * Rnd) + 1)

%>

<html>
<head>
</head>

<frameset rows=\"*\">
    <frame src=\"<% = ifrmSrc %>\">
</frameset>

<body>
</body>