webForumDet fria alternativet

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

ASP

44 svar · 356 visningar · startad av Sico

Medlem sedan maj 20002 597 inlägg
Frågan#1

Jag har ett inloggningscript där jag skulle vilja dölja vissa länkar inne på admin-sidan för vissa användare. Hur gör man?

Det borde väll vara en IF sats?..

------------------
O Yeah!
I wouldn't if I couldn't

Medlem sedan dec. 19996 522 inlägg
#2

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

------------------
1 Man, 1 Million dead, The odds are just about even - Ash

Medlem sedan dec. 19996 522 inlägg
#3

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 %>

------------------
1 Man, 1 Million dead, The odds are just about even - Ash

[Redigerat av erka den 17 maj 2001]

Medlem sedan maj 20011 343 inlägg
#4

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 %>

------------------
verktygslådan

Ett gott trams förlänger
livet :e

Medlem sedan maj 20002 597 inlägg
#5

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

------------------
O Yeah!
I wouldn't if I couldn't

Medlem sedan maj 20011 343 inlägg
#6

*grr* erka sluta posta samtidigt som mig ;)

------------------
verktygslådan

Ett gott trams förlänger
livet :e

[Redigerat av jispir den 17 maj 2001]

Medlem sedan maj 20011 312 inlägg
#7

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

Medlem sedan maj 20002 597 inlägg
#8

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>

------------------
O Yeah!
I wouldn't if I couldn't

Medlem sedan mars 2001484 inlägg
#9

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.

------------------
/ jeps0

Medlem sedan maj 20002 597 inlägg
#10

Tack... det funkar skitbra...

------------------
O Yeah!
I wouldn't if I couldn't

Medlem sedan maj 20002 597 inlägg
#11

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?

------------------
O Yeah!
I wouldn't if I couldn't

Medlem sedan juni 200032 967 inlägg
#12
admin = cint(admin)

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

------------------
<A HREF="http://cartman.nu" TARGET=_blank>
nobody expects the spanish inquisition!</A>

Medlem sedan maj 20002 597 inlägg
#13

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

------------------
O Yeah!
I wouldn't if I couldn't

Medlem sedan mars 2001484 inlägg
#14

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

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

------------------
/ jeps0

Medlem sedan maj 20011 312 inlägg
#15
<% 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 %>
Medlem sedan maj 20002 597 inlägg
#16

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

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

------------------
O Yeah!
I wouldn't if I couldn't

Medlem sedan juni 200032 967 inlägg
#17

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?

------------------
<A HREF="http://cartman.nu" TARGET=_blank>
nobody expects the spanish inquisition!</A>

Medlem sedan juni 200032 967 inlägg
#18

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.

------------------
<A HREF="http://cartman.nu" TARGET=_blank>
nobody expects the spanish inquisition!</A>

Medlem sedan maj 20002 597 inlägg
#19

Lukaspojken: det funkade inte alls =/

------------------
O Yeah!
I wouldn't if I couldn't

Medlem sedan maj 20002 597 inlägg
#20

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...

------------------
O Yeah!
I wouldn't if I couldn't

967 ms totalt · 4 externa anrop · v20260731065814-full.a51de22e
792 ms — deklarationer (db)
0 ms — hämta statistik (cache)
170 ms — hämta tråd, inlägg och bilagor (db)
790 ms — ändringar (db)