Bengan Start - ASP: Blockera länkning.

Ibland vill man förhindra att en annan hemsida skall kunna länka direkt till en ASP sida på ens egen webb. Det kan tex. röra sig om en funktion som man inte vill att andra hemsidor skall kunna dra nytta av osv. Hur löser man då detta?

- Enkelt, bara lägg in några rader kod i början på filen som kollar vilken sida besökaren kommer ifrån! Till detta använder jag servervariabeln "HTTP_REFERER" och jämför värdet med adressen till sidan som besökarna normalt bör komma ifrån. Stämmer inte detta så avbryts laddningen av sidan och besökaren får en uppmaning om att besöka huvudsidan istället.

- Scriptet nedan är väldigt simpelt och behöver nog ingen vidare förklaring. Som ni ser har jag även lagt till en IF sats som kollar om "HTTP_REFERER" är tom. Detta för att en del äldre webbläsare inte stödjer funktionen.

Överkurs: Vill ni göra det riktigt avancerat så lägg till en funktion som automatiskt lagrar referern i en textfil/databas om den inte stämmer. På så vis får man automatiskt reda på om någon olovligt försöker använda ens material och dessutom adressen till hemsidan!

<% Response.Buffer = True %>

<% Dim vrefer
' Kollar referer och jämför med rätt länk
vrefer=Request.ServerVariables("HTTP_REFERER")

If lcase(vrefer) <> lcase("http://www.bengan.com/sida.asp") THEN

If vrefer <> "" THEN %>
<html>

<head>

<title>Otillåten länkning!</title>

</head>

Detta script får ej användas utanför min Domän!

</body>

</html>
<% ' Avbryter laddningen av sidan
Response.End

End If

End If %>