levels afgrænsning

du kan lave det med en if sætning:

if CInt(session("lvl")) > 3 then
  'Gæst
  Response.redirect "gusestpage.asp"
end if

'VIS SIDEN HER

Eller sådan her:

if CInt(session("lvl")) <= 3 then

  'VIS SIDEN HER

else
  'Gæst
  Response.redirect "gusestpage.asp"
end if

svare du lige igen *s*

burde det ikke være 
if CInt(session("lvl")) >= 3 then
  'Gæst
  Response.redirect "gusestpage.asp"
end if

??

Hvis du skriver:

if CInt(session("lvl")) >= 3 then

Så bliver både level 3 og 4 sendt vidre til guestpage.asp

Hvis du skriver det sådan her:

if CInt(session("lvl")) > 3 then

Så det kun level 4 der bliver send idre..

I begge tilfælde vil level større end 4 også blive sent vidre.

hvis jeg bruger : if CInt(session("lvl")) > 3 then
  'Gæst
  Response.redirect "gusestpage.asp"
end if

og jeg prøver at komme ind på den med level 4 står den bare og tænker..

hvis du bruger redirect skal man vist havde
<% response.buffer = true %>

i toppen af filen.

ok.. prøver..

den gør det samme.. og slet tingen virker ikke.. det virker som om det ik er i en form.

Det er lidt underligt den hænger, har du en fil som hedder guestpage.asp ?? måske den hænger fordi den ikke kan finde filen..?

nej jeg har lavet den om til ingenadgang.asp
og den fil har jeg selvfølgelig

Står det i toppen af din kode ???

ja

det forstår jeg ikke...

hvad gør vi ved den der slet ting..

kig din mail.

ok. men jeg har ikke fået nogle mail.

stadigvæk ikke.. så kan du se her : http://www.fredericia-bynight.dk/brugersystem/spm242480.asp

jo jeg har lige fået den..
Sejt login script du har.

Jeg kan se siden selvom jeg ikke er logget ind.

ja du kan se den overstående eller hva ?

Ja jeg kan se siden:
http://www.fredericia-bynight.dk/brugersystem/spm242480.asp

Ja den er heller ikke beskyttet.

men det virker jo ikke

Du skal lukke din form </form>

den vil ikke lave form omkring det hele i frontpage

den ser sådan ud..
<html>

<head>
<title></title>
</head>

<body>
<%
set rs = server.CreateObject("ADODB.Recordset")
set conn = server.CreateObject("ADODB.Connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& server.mappath("database.mdb")

'Sletter de valgte Email adresse fra Databasen
if Request.ServerVariables("REQUEST_METHOD") = "POST" then
  if Request.Form("sletmig") <> "" then
    strSQL = "DELETE FROM kontaktmail WHERE ID IN (" & Request.Form("sletmig") & ")"
    Conn.Execute(strSQL)
  end if
end if
%>
<%
strSQL = "SELECT * FROM kontaktmail"
Set rs = Conn.Execute(strSQL)
%>

<table align="center">
  <tr>
    <td><form method="post" action="<%=Request.ServerVariables("SCRIPT_NAME")%>">
    </form>
    </td>
  </tr>
  <tr>
    <td>Navn</td>
    <td>E-Mail</td>
    <td>Slet (sæt kryds)</td>
  </tr>
<% Do While Not rs.EOF %>
  <tr>
    <td><%=rs("kontaktnavn")%>
</td>
    <td><%=rs("kontaktmail")%>
</td>
    <td><input type="checkbox" name="sletmig" value="<%=rs("ID")%>">Slet </td>
  </tr>
<% rs.MoveNext
Loop %>
  <tr>
    <td colspan="3" align="center"><input type="submit" value="Slet" name="Slet"></td>
  </tr>
</table>
</body>
</html>

arh jeg troede det var det med level som ikke virked :) ja der mangler somel_barto skriver en </form>

der skal en </form> ind før eller efter eksvis </table>

</form>
</table>

det vil den ikke.

du har stat </form> i toppe lige efter <form>

<form method="post" action="/brugersystem/spm242480.asp">
    </form>


</form> skal sættes efter alle de form inputs som man vil havde med det vil siden den som være et sted efter submit knappen. Prøv at lave de sidste 4 linier sådan her:

</form>
</table>
</body>
</html>

prøv at skrive hele koden, for den knap vil INTET

Ok her er hele koden :


<html>

<head>
<title></title>
</head>

<body>
<%
set rs = server.CreateObject("ADODB.Recordset")
set conn = server.CreateObject("ADODB.Connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& server.mappath("database.mdb")

'Sletter de valgte Email adresse fra Databasen
if Request.ServerVariables("REQUEST_METHOD") = "POST" then
  if Request.Form("sletmig") <> "" then
    strSQL = "DELETE FROM kontaktmail WHERE ID IN (" & Request.Form("sletmig") & ")"
    Conn.Execute(strSQL)
  end if
end if
%>
<%
strSQL = "SELECT * FROM kontaktmail"
Set rs = Conn.Execute(strSQL)
%>

<table align="center">
  <tr>
    <td><form method="post" action="<%=Request.ServerVariables("SCRIPT_NAME")%>">
    </td>
  </tr>
  <tr>
    <td>Navn</td>
    <td>E-Mail</td>
    <td>Slet (sæt kryds)</td>
  </tr>
<% Do While Not rs.EOF %>
  <tr>
    <td><%=rs("kontaktnavn")%>
</td>
    <td><%=rs("kontaktmail")%>
</td>
    <td><input type="checkbox" name="sletmig" value="<%=rs("ID")%>">Slet </td>
  </tr>
<% rs.MoveNext
Loop %>
  <tr>
    <td colspan="3" align="center"><input type="submit" value="Slet" name="Slet"></td>
  </tr>
</form>
</table>
</body>
</html>

det virker altså ikke

har du uploaded filen for hvis jeg kigger med View Source så er den ikke blevet rettet.

du havde ikke lagt form method="post" action="<%=Request.ServerVariables("SCRIPT_NAME")%>"> højt nok op

ok..

læser du lige din mail

jeg kan ikke få begge ting til at virke på den sammen side : http://www.fredericia-bynight.dk/brugersystem/editask.zip

Gider du se på det ?

Disse linier:


sql = "INSERT INTO kontaktmail (kontaktnavn, kontaktmail) VALUES ('" & kol1tekst & "', '" & kol2tekst & "')"
Conn.execute(sql) 'Så er det gemt i databsen.
else
'Vis formen (63-69):
%><input type="text" name="tekst_til_kol1" size="20"> <input type="text"
                  name="tekst_til_kol2" size="20"> <input type="submit" name="Gem"> <% end if %></p>
                </form>


Rettes til:
sql = "INSERT INTO kontaktmail (kontaktnavn, kontaktmail) VALUES ('" & kol1tekst & "', '" & kol2tekst & "')"
Conn.execute(sql) 'Så er det gemt i databsen.
end if
'Vis formen:
%><input type="text" name="tekst_til_kol1" size="20"> <input type="text"
                  name="tekst_til_kol2" size="20"> <input type="submit" name="Gem">
</p>
                </form>

der skulle stå:

Disse linier (63-69):

er var et par andre fejl ... jeg sender lige filen...

Hvordan kan det være at afgræsningen vi snakkede om i starten slet ikke vil virke..

lukker, det vil ikke.