Dölja länkar för vissa användare

Lättast är att du i användar tabellen lägger itll en kryssruta som du döper till Links och sätter den på yes om de ska få se den.Sen vid tex då tabellen med länkar lägger du till ett fält som säger om länken ska ses av alla eller ej

Eller om du bara skriver ut länkarna så lägger du till den där kryssruta i användar tabellen och skriver

<%
if rs("links") = "true" Then
%>
alla länkar som är hemmliga
<%Else%>
De länkar som ska visas för alla
<%End If %>

ja! om du har en databas med en kolumn som ser ut så här admin -> tal säger vi så kan du göra så här.

1 = admin
2 = vanlig

<% If admin = 1 then> 
response.write "Länkar som syns för admin"
else
'här kan du lägga det som ska visas för vanliga användare istället.
end if %>

vill nog ha en sån där... if user then u will se this links...

*grr* erka sluta posta samtidigt som mig

<% IF Session("User") = "Olle" AND Session("Password") = "Hej" THEN
%>
<a href="..."</a>
<%
Else
Read.gif
End if

jag har en databas med admin-kolum men jag får inte det att funka med länkarna..

länkarna ser ut såhär... visa hur jag ska göra för att vissa ska synas å vissa inte för vanliga användare.. plz

<CENTER>
<A href="ed.asp?menu=profile">Mina inställningar</A> &#0124;
<A href="ed.asp?menu=adminmembers">Lägg till/ta bort medlemmar</A> &#0124;
<A href="ed.asp?menu=addnews">Lägg till nyhet</A> &#0124;
<A href="../forum/admin.asp">Administrera Forum</A> &#0124;
<A href="ed.asp?menu=logoff">Logga ut</A>
</CENTER>

Jag skulle föreslå att du gör en sub som du anropar där länkarna ska skrivas ut:

sub adminlinks()
	Response.Write "<A href=""ed.asp?menu=profile"">Mina inställningar</A> &#0124; "
	if admin = 1 then Response.Write "<A href=""ed.asp?menu=adminmembers"">Lägg till/ta bort medlemmar</A> &#0124; "
	Response.Write "<A href=""ed.asp?menu=addnews"">Lägg till nyhet</A> &#0124; "
	if admin = 1 then Response.Write "<A href=""../forum/admin.asp"">Administrera Forum</A> &#0124; "
	Response.Write "<A href=""ed.asp?menu=logoff"">Logga ut</A>"
end sub

Sen skriver du bara call adminlinks() där länkarna ska visas.

Tack... det funkar skitbra...

GAH... det funkade inte alls skitbra... jag ljög.. Den visar alltid dom icke admin-länkarna.. i min databas heter heter kolummen "Admin" men även om man har värde 1 eller 0 så ser man bara dom icke-admin-länkarna.. vad e fel?

admin = cint(admin)

först? "1" är inte lika med 1.

det funkade inte heller.. nu ser alla användare dom administrära länkarna..

Om du ändrar if-länkarna då?

if admin = "1" then response.write ...

<% IF Session("ADMBEHÖRIGHET") = "ADM THEN
%>
<CENTER>
<A href="ed.asp?menu=profile">Mina inställningar</A> &#0124;
<A href="ed.asp?menu=adminmembers">Lägg till/ta bort medlemmar</A> &#0124;
<A href="ed.asp?menu=addnews">Lägg till nyhet</A> &#0124;
<A href="../forum/admin.asp">Administrera Forum</A> &#0124;
<A href="ed.asp?menu=logoff">Logga ut</A>
</CENTER>
<% End if %>

då ser alla endast dom icka administrära länkarna...

skulle jag inte ändra i if-länkarna med admin = cint(admin) ??

det funkade inte heller.. nu ser alla användare dom administrära länkarna..

hmm? det känns som att admin är 1 för alla användare.

hur ser hela din kod ut nu?

skulle jag inte ändra i if-länkarna med admin = cint(admin) ??

nej, du skulle lägga det först, så du jämför värden med rätt subtyper.

Lukaspojken: det funkade inte alls =/

såhär ser en liten del av koden ut på admin-sidan...

<!--#include file="../data.asp" -->

<CENTER>
<%
sub adminlinks()
Response.Write "<A href=""ed.asp?menu=profile"">Mina inställningar</A> &#0124; "
if admin = "1" then Response.Write "<A href=""ed.asp?menu=adminmembers"">Lägg till/ta bort medlemmar</A> &#0124; "
Response.Write "<A href=""ed.asp?menu=addnews"">Lägg till nyhet</A> &#0124; "
if admin = "1" then Response.Write "<A href=""../forum/admin.asp"">Administrera Forum</A> &#0124; "
Response.Write "<A href=""ed.asp?menu=logoff"">Logga ut</A>"
end sub
%>

<%
call adminlinks()
%>
</CENTER>

data.asp

<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=D:\Hemsidor\Sico\db\db.mdb" 
%>

i databasen har jag en kolumm som heter "admin" å värden a på advändarna...