Object required.

<%       
SQL2 = "select count(*) as antal from mail WHERE mailmodtager = '" & Session("user") & "' AND mailread = false"

Set TheCount = Conn.Execute(SQL2)   
antal = TheCount("antal")%> 

//>Rune

Typsik kommer fejlen hvis du ikke har defineret objekterne´og det er Conn og TheCount i dette tilfælde:

Set Conn = Server.CreateObject("ADODB.Connection")

Hvis det ikke virker så prøv sådan her:

<%       
SQL2 = "select count(*) as antal from mail WHERE mailmodtager = '" & Session("user") & "' AND mailread = 'false'"

Set TheCount = Conn.Execute(SQL2)   
antal = TheCount("antal")%> 

//>Rune

Og så skal der også være en Connection ved Conn.Open hvis du ikke har det..:
 
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.Mappath("database.mdb")

Måske du også skal medtage denne for recordset normalt ikke nødvendig ved Set TheCount = Conn.execute.

Set TheCount = Server.CreateObject("ADODB.Recordset")

Skal jeg lave en connection når jeg bruger global.asa?

Intet virker... Måske der skal mere indsigt i koderne..

Her er mere af koderne. If session login, henter data fra en helt anden fil.
<%
        If Session("login") = False THEN
        %>
        <form method="post" name="adminlogin" action="login.asp">
        Brugernavn:<br><input class="bard" size="9" name="username" value="<%= Request.Form("Username")%>"><img src="gfx/profilimg.gif"><br>
          Password:<br><input class="bard" type="password" name="password"> <img src="gfx/laas.gif"><br>
        <input class="knap" type="image" src="gfx/login.gif"  name="Action">&nbsp;&nbsp;<a href="omlogin.asp" onclick="NewWindow(this.href,'link','215','205','no');return false;"><img src="gfx/question.gif" border="0"></a><br>
        <a href="login.asp" title="Opret ny bruger" class="pass">Opret bruger</a><br>
        <a href="login.asp" title="F&aring; tilsendt dit password" class="pass">Glemt password</a><br>

        </form>
<%       
SQL2 = "select count(*) as antal from mail WHERE mailmodtager = '" & Session("user") & "' AND mailread = 'false'"

Set TheCount = Conn.Execute(SQL2)   
antal = TheCount("antal")%>   

        <%
        Else
   
        Response.write("<b>Din pers. menu</b><br><img src='gfx/profilimg.gif'><a href='mail.asp?mode=own_profile'> Din profil</a><br>")
        Response.write("<img src='gfx/indbakkeimg.gif'><a href='mail.asp?mode=inbox'> Indbakke</a> (" & antal &") <br>")
        Response.write("<img src='gfx/brugerimg.gif'><a href='mail.asp?mode=bruger_list'> Brugere</a><br>")
        Response.write("<img src='gfx/forumimg.gif'><a href='forum.asp'> Forum</a><br>")
        Response.write("<img src='gfx/anmeldimg.gif'><a href='anmeld.asp'> Anmeld Film</a><br>")
        Response.write("<img src='gfx/forslaaimg.gif'><a href='forslaa.asp'> Forslå film</a><br><br>")
        Response.write("Du var sidst p&aring;<br>"& CreateDate(Session("lastlogon")) &"<br><br>")
        Response.write("<a href='logout.asp'><img src='gfx/logout.gif' border='0'></a>")
        End If
       
        %>

Har du i koden en connection defineret som hedder Conn?

Det kan være en skrive fejl:

eks hvis Response er stavet forkert jeg kan ikke umiddelbart se det i koden.

Nej.. resten er html. men denne fil er kun en del af siden.. Venstre del. Hele siden i sig selv, mener jeg har en Conn.

Ja hvad har du i globas.asa??
Der kan du kun ligge selve connection strengen du kan ikke åbne en conenction for generalt brug.

Det kode der er her nu, er det eneste i den fil.
Og det er først efter den første kode jeg viste at det giver fejl.

Her er min global:

<script language="vbscript" runat="server">
Sub Application_OnStart()
    Application("Online") = 0
    Application("Provider") = "Provider=Microsoft.Jet.Oledb.4.0;Data Source= " & server.MapPath("data.mdb")
End Sub

Sub Session_OnStart()
    Application.Lock
    Application("Online") = Application("Online") + 1
    Application.Unlock
    Session("login") = False
End Sub

Sub Session_OnEnd()
    Application.Lock
    Application("Online") = Application("Online") - 1
    Application.Unlock
End Sub
</script>

Du skal havde en Conn for hver fil som bruger den eller skal du havde Conn i en include fil.

OK så skal du tilføje dette i koden før sql sætningen:

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open Application("Provider")

Hvis jeg sætter ind:
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.Mappath("data.mdb")     
SQL2 = "select count(*) as antal from mail WHERE mailmodtager = '" & Session("user") & "' AND mailread = 'false'"

får jeg følgende fejl:

Microsoft JET Database Engine error '80040e07'

Data type mismatch in criteria expression.

Samme fejl med:
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open Application("Provider")

Er mailread et Ja/Nej felt så ska lder ikke ' omkring false:

SQL2 = "select count(*) as antal from mail WHERE mailmodtager = '" & Session("user") & "' AND mailread = false"

mailread er ja/nej

Så prøv den sidste SQL jeg har vist.

Det virker nu.. :)

Det sidste var løsningen plus:
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open Application("Provider")

Tusind tak!

Efter denne linie:

antal = TheCount("antal")%>

Bør du tilføje kode som lukker for connection igen

antal = TheCount("antal")
Conn.Close
Set Conn = Nothing
%>

Den smækker jeg lige med :)

Hmmm.. Jeg får ingen fejl.. Prøvede at sende en mail, jeg ikke har læst. Men den tæller den ikke?
Der er bare (), og der burde jo stå 1.

Hvis du udskriver SQL2 passer Session navnet så med den som er modtager af mailen?

false/true skulle gerne virke på Ja/Nej felter eller så prøv med 0 for false, men så skulle den vil fejle med false i:

SQL2 = "select count(*) as antal from mail WHERE mailmodtager = '" & Session("user") & "' AND mailread = 0"

Du kan evt. prøve at logge ind på www.trailersiden.dk
Gæst
123456

Ja.. Session user er den der er logget ind.Og mailen skal ikke tælles forend user er logget på.

Det er uændret med 0 istedet for false.

Nu jeg ser efter.. I taballen hvor mailen er..Hedder kolonnen mailmodtager, og user er i en anden tabel.
Måske skal user byttes ud med mailmodtager?

Glem det sidste....Er vist træt..

Din kode som hendter antallet ligge inde i Then på denne if sætning:

If Session("login") = False THEN


Koden skal ligge et std hvor den bliver udført før denne linie:

Response.write("<img src='gfx/indbakkeimg.gif'><a href='mail.asp?mode=inbox'> Indbakke</a> (" & antal &") <br>")

Så den hendter kun antallet hvis man ikke er logget ind. Som jeg lige kan se.

Det gør den også..Den ligger mellem </form> og <% else derefter :
Response.write("<img src='gfx/indbakkeimg.gif'><a href='mail.asp?mode=inbox'> Indbakke</a> (" & antal &") <br>")

Okies.. Jeg er ikke lige med..

Skal den før if session("login")=false THEN ?

Nej det skal flyttes så det ligge lige efter Else og ikke lige før Else.

Som koden er nu:


      </form>
<%       
SQL2 = "select count(*) as antal from mail WHERE mailmodtager = '" & Session("user") & "' AND mailread = 'false'"

Set TheCount = Conn.Execute(SQL2)   
antal = TheCount("antal")%>   

        <%
        Else
   
        Response.write("<b>Din pers. menu</b><br><img src='gfx/profilimg.gif'><a href='mail.asp?mode=own_profile'> Din profil</a><br>")



Som koden skal være:


      </form>
        <%
        Else

       
SQL2 = "select count(*) as antal from mail WHERE mailmodtager = '" & Session("user") & "' AND mailread = 'false'"

Set TheCount = Conn.Execute(SQL2)   
antal = TheCount("antal")

   
        Response.write("<b>Din pers. menu</b><br><img src='gfx/profilimg.gif'><a href='mail.asp?mode=own_profile'> Din profil</a><br>")



BEMÆRK jeg har ikke Connection objectet med kun princippet i hvor det skal ligge.

:)

Jeg lagde det før if session("login")=false THEN

Nu virker det! :o) Tak for din tålmodighed!
Vil du have fler points?

Nej det behøves ikke, selv tak :)

Du skal næsten lige se:
Gæst
123456

har sendt en mail dertil

:-) Nu kan jeg sove roligt i nat :-)

Har du send den til Gæst?

Ja, jeg (også) smutter i seng nu, jeg skal tidligt op i morgen.

Jeg er imponeret over din side :) Den er rigtig flot lavet.

Tusind Tak :-) Det kan jeg takke Izemate for. Han er også herinde fra..
Der er mange gode folk herinde :-)

Kan du så kommer i seng! ;-)