kombinere

hvilken fejl?

noget med at jeg ikke kunne et eller andet fordi den stadig var åben : det må så være databasen fejlmeldigen er om...

Vi du prøve at smække dem sammen hvis jeg zipper dem ?

nu ligger både min side og scriptet her : http://www.fredericia-bynight.dk/fredericia-bynight.zip

nej...

virker den det ene sted virker den også det andet med mindre man glemmer nogle ting eller laver kæmpe fejl - kom evt med den rigtige fejl eller et sted hvor det er forsøgt sat sammen

Nu ser det ud som om det virker men hvordan får jeg den til at skrive en fejlmelding et bestemt sted ?

hvilken fejl?

hvis passwordet ikke passer eller lign.

prøv at logge ind her : http://www.fredericia-bynight.dk/test/default.asp

tryme
tryme123

kan du se hva fejlen kan være ?

Du henviser til et felt i databasen (tabellen) som ikke findes. Dette kan eks. være ifm. SELECT, INSERT, UPDATE el. ved udskrift at værdier fra et recordset.

hvad er linie 54 i bruger.asp? umiddelbart lyder det som om at du henviser til en kolonne i din tabel der ikke eksisterer

Linje 54 : Bruger</b></font> <font size="2" face="Arial"><p align="left">Du er logget ind som: <%= rs("user")%><br>


tilhørende sql : <%
        sSQL = "SELECT * FROM users WHERE lbnr = " & Session("lbnr")

        Set Rs = Server.CreateObject("ADODB.RecordSet")
        Rs.Open sSQL, Conn, 3,3
%>

Det kan kun være feltet user. Har du eks. omdøbt det til username el.lign. ?

nej

Kontrollerer du om dit recordset er tomt med If Not Rs.EOF Then...

Det kan også skyldes at den ikke finder noget.

nej det kontrollere jeg ikke... men jeg har brugt præcis det samme som det jeg downloadede og det virkede..
har lige smidt det op jeg bruger : http://www.fredericia-bynight.dk/test/fredericia.zip

prøv at lav din sql om til;

sSQL = "SELECT user, lvl FROM users WHERE lbnr = " & Session("lbnr")

det giver den samme fejl

Aha, user er et reserveret ord i Access. Prøv med denne SQL:

sSQL = "SELECT [user] as Bruger, lvl FROM users WHERE lbnr = " & Session("lbnr")

Derefter henviser du til feltet med rs("Bruger")

det gav den samme fejl

Hvad er navn og datatype på dine felter i tabellen?

lbnr Autonummerering
user tekst
password tekst
lvl tal

hvis du bruger tmceu's svar fra 12/06-2002 10:57:12 skal du huske at ændre så der i stedet står

rs("bruger") og ikke rs("user")

hvade du gjort det?

Ja har jeg gjort

og den kommer stadig med samme fejl?

Ja

prøv at udskriv din sql så vi lige kan se hvordan den ser ud

og hvordan gør jeg det ?

response.write ssql

det skal gøres efter din sql, men før fejlen kommer - altså før linie 54

og vis os lige med det same hvordan linie 54 ser ud nu

SELECT [user] as Bruger, lvl FROM users WHERE lbnr = 1

og linie 54?

Bruger</b></font> <font size="2" face="Arial"><p align="left">Du er logget ind som: <%= rs("bruger")%><br>

ja - ikke godt at vide hvad det lige er der sker... har ikke umiddelbart flere gæt

prøv at kom med hele din bruger.asp engang

<!--#include virtual ="/include/UserTime.asp"-->
<% Response.buffer = true %>
<html>
<%
If Not Session("lvl") <> "" THEN
Response.redirect "default.asp"
End If

If request.querystring("action") = "Disconnect" THEN
Session.abandon
Response.redirect "default.asp"
End If
%>
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & server.mappath("data.mdb")
%>
<%
sSQL = "SELECT [user] as Bruger, lvl FROM users WHERE lbnr = " & Session("lbnr")

        Set Rs = Server.CreateObject("ADODB.RecordSet")
        Rs.Open sSQL, Conn, 3,3
%>
<%
response.write ssql
%>

<head>
<link rel="stylesheet" type="text/css" href="../styles.css">
<title>w w w . F r e d e r i c i a - B y N i g h t . dk</title>
</head>

<body bgcolor="#3288A4">
<div align="center"><center>

<table border="0" cellpadding="0" cellspacing="0" width="675">
  <tr>
    <td><img border="0" src="../top.gif" width="675" height="70"></td>
  </tr>
  <tr>
    <td height="4"></td>
  </tr>
  <tr>
    <td><div align="left"><table border="1" cellpadding="0" cellspacing="0" width="100%"
    bordercolor="#000000">
      <tr>
        <td><div align="left"><table border="0" cellpadding="0" cellspacing="5" width="671"
        bgcolor="#6C8892">
          <tr>
            <td width="154" valign="top" align="center"><!--#include Virtual="/include/menu.asp" --> </td>
            <td width="495" background="../mainbg.gif" height="0"
            style="background-repeat: repeat-y; border-right-style: solid; border-right-width: 1; border-top-style: solid; border-top-width: 1; border-bottom-style: solid; border-bottom-width: 1"
            bordercolor="#000000" valign="top"><div align="center"><center><table border="0"
            cellpadding="0" cellspacing="0" width="97%">
              <tr>
                <td valign="top"><font face="Arial"><b><br>
                Bruger</b></font> <font size="2" face="Arial"><p align="left">Du er logget ind som: <%= rs("bruger")%><br>
                Bruger niveauer:<br>
                &nbsp;&#149;&nbsp; 1 &gt; Administrator<br>
                &nbsp;&#149;&nbsp; 2 &gt; Poweruser<br>
                &nbsp;&#149;&nbsp; 3 &gt; User<br>
                &nbsp;&#149;&nbsp; 4 &gt; Guest<br>
                <br>
                Dit niveau: <%= rs("lvl")%><br>
                <br>
                <a Href="bruger.asp?Action=Disconnect">Log ud</a></font> </p>
                <p align="left">&nbsp;</td>
              </tr>
            </table>
            </center></div></td>
          </tr>
        </table>
        </div></td>
      </tr>
    </table>
    </div></td>
  </tr>
  <tr align="center">
    <td height="4"></td>
  </tr>
  <tr align="center">
    <td><img border="0" src="../bund.gif" width="675" height="16"> </td>
  </tr>
</table>
</center></div>
</body>
</html>
<%
Rs.Close
Set Rs = Nothing
%>

bruger du evt andre steder på din side nogle sql-sætninger som også giver et RS-recordsæt til din side?

jeg tænker ikke kun på bruger.asp, men generelt over hele siden...

du kunne evt på bruger.asp ændre RS til RSlogin over det hele

Hvis jeg retter alle RS til RSlogin kommer den med fejl
Microsoft VBScript runtime error '800a01a8'

Object required: ''

/test/default.asp, line 38

hvad er linie 38?

If Not (rs.BOF Or rs.EOF) Then

jeg sagde du skulle ændre ALLE dine rs...

hvis du nu kigger lidt på det, så burde du kunne se en meget stor fejl nu...

et recordset i default.asp og et i bruger.asp bliver jo blandet sammen eftersom de hedder det samme... du skal ind og ændre det så de bliver gjort forskellige fra hinanden!

danke...

Kan du fortælle mig hvilke kode jeg skal bruge for evt kun at vise noget til brugerlevel 1 (lvl)
?

kom det til at virke?

tænker du på hvis man er logget ind og kun dem med brugerlevel 1 må få vist en speciel ting?

ja
ja

så vil jeg da lige komme med et svar...

så skal du bare ind og tjecke noget på din session og indsætte passende indhold efter den... men da det ikke lige har noget med det oprindelige spm at gøre vil jeg lade resten stå hen i det uvisse

Og resten, hva gør jeg der ?

har du et eksempel på hvordan jeg bruger levelsne ?

nej - men det er da ret simpelt hvis du tænker dig om...

men som sagt; da det ikke har noget med det oprindelige spm at gøre vil jeg lade det stå hen i det uvisse