---

Hvordan laver man et wildcard i Vbs

I sætningen herunder skal "side2.asp" laves som et wildcard, kan det
lade sig gøre ?
Har prøvet med * men den virker ikke,

if request.servervariables("HTTP_REFERER") <>
"http://www.martinsvenningsen.com/" + "side2.asp" then
response.redirect "default.asp"

Sætningen skal indsættes i alle sider (før headder), for at tvinge
brugerne ind på startsiden. (muligvis træls, men det er sådan det
ønskes)

Mvh. Martin Svenningsen

---

Martin Svenningsen wrote:
>
> Hvordan laver man et wildcard i Vbs
>
> I sætningen herunder skal "side2.asp" laves som et wildcard, kan det
> lade sig gøre ?
> Har prøvet med * men den virker ikke,
>
> if request.servervariables("HTTP_REFERER") <>
> "http://www.martinsvenningsen.com/" + "side2.asp" then
> response.redirect "default.asp"

Du kan bruge RegExps i asp, men det kan da gøres simplerer:

Const MitDomain = "http://www.martinsvenningsen.com/"
Referer = LCase(Request.ServerVariables("HTTP_REFERER"))
If Not (Left(Referer, Len(MitDomain)) = MitDomain) Then
Response.Redirect "default.asp"
End If

> Sætningen skal indsættes i alle sider (før headder), for at tvinge
> brugerne ind på startsiden. (muligvis træls, men det er sådan det
> ønskes)

Det var dog en skrækkelig brugerfjensk funktion, folk midster jo
muligheden for at bookmarke eller linke til dit site (ja, på den måde
skal du nok få skræmt brugerne væk, men det er jo dit valg).

--
Lauritz

---

Takker mange gange, det dur !
Mht. Fjenskhed, der er et par sider, der helst skal ses i den rigtige
rækkefølge for at få den rigtige effekt.
Igen tak
Martin


>Det var dog en skrækkelig brugerfjensk funktion, folk midster jo
>muligheden for at bookmarke eller linke til dit site (ja, på den måde
>skal du nok få skræmt brugerne væk, men det er jo dit valg).
>
>--
>Lauritz