nicht angemeldet
Hallo Martin,
Du hast recht. IIS 4.0 unter NT Server 4.0 ist vorhanden. Ich kann den Zufgriff demnach über die Benutzergruppenverwaltung regeln. Auch kein Problem. Aber wie greife ich die einzelnen User innerhalb der Gruppen ab, sodas die bestimmten Personen den ihnen zugewiesenen Links auf der Page sehen und andere nicht?
Was ich nicht wollte, ist eine Benutzergruppenführung, wo die eine nur lesen und die andere schreiben darf.
Für das bessere Verständnis habe ich einen Beispielcode unten aufgeführt. Vielleicht wird dadurch klar, wie ich im Moment arbeite und wohin es bei größerer Seitenverwaltung führt; nämlich sehr viel Arbeit.
Gruß Tomcat
Beispielcode:
<td width="100%" bgcolor="#000080" colspan="2"><p align="left"><font color="#FFFFFF"><img border="0" src="../images/Abstand_breite_10_transparent.gif" width="10" height="5"><font size="1"><a href="../Test/default.htm" target="_top">HOME</a>
<a href="../Navigation/nav_organisation.htm" target="Inhalt">ORGANISATION</a> <a href="nav_marketing.htm" target="Inhalt">MARKETING</a>
<a href="nav_allgemein.asp" target="Inhalt">ALLGEMEINES</a> <a href="nav_personelles.asp"> PERSONELLES</a>
<a href="nav_verwaltung.htm" target="Inhalt">VERWALTUNG</a> <a href="nav_qualität.htm" target="Inhalt"> QUALITÄTSSICHERUNG</a>
<a href="nav_aussendienst.asp">
AUSSENDIENST</a>
<% REM Administration
strUser = Request.Servervariables("LOGON_USER")
strUser = Right(strUser,Len(strUser)-9)
if UCase(strUser)="TKR" or UCase(strUser)="PLAM" or UCase(strUser)="AW" or UCase(strUser)="PLAJ" or UCase(strUser)="PLEL" or UCase(strUser)="NL" or UCase(strUser)="PLWM" or UCase(strUser)="PLKC" or UCase(strUser)="GM" or UCase(strUser)="BRHA" or UCase(strUser)="JSG" or UCase(strUser)="PLHK" or UCase(strUser)="UP" or UCase(strUser)="PLTM" or UCase(strUser)="PLCC" or UCase(strUser)="PLSE" then
response.write " <a href=""../Admin_Bereich/admin_bereich.asp"" target=""_top"">ADMINISTRATION</a>"
else
end if
%>
<% REM Projektweb
strUser = Request.Servervariables("LOGON_USER")
strUser = Right(strUser,Len(strUser)-9)
if UCase(strUser)="TKR" or UCase(strUser)="PLAM" or UCase(strUser)="AW" or UCase(strUser)="PLAJ" or UCase(strUser)="PLEL" or UCase(strUser)="NL" or UCase(strUser)="PLWM" or UCase(strUser)="PLKC" or UCase(strUser)="GM" or UCase(strUser)="BRHA" or UCase(strUser)="JSG" or UCase(strUser)="PLHK" or UCase(strUser)="UP" or UCase(strUser)="PLTM" or UCase(strUser)="PLCC" or UCase(strUser)="PLSE" then
response.write " <a href=""nav_projekte.asp"" target=""Inhalt"">PROJEKTWEBS</a>"
else
end if
%>
<% REM Webadministration
strUser = Request.Servervariables("LOGON_USER")
strUser = Right(strUser,Len(strUser)-9)
if UCase(strUser)="TKR" then
response.write " <a href=""nav_webadmin.htm"" target=""Inhalt"">WEBADMIN</a>"
else
end if
%>
<a href="nav_hilfe.asp" target="Inhalt"> HILFE</a></font>
</font>
</p></td>