øhh hvad går der galt i min kode - SELECT COUNT WHERE

strSQL = "SELECT COUNT(*) AS antal1 FROM under25 WHERE jdate = " &request.Form("date")

Du får så sikkert problem med datoen. Er det Access skal der måske #...# omkring

Set objConn = Server.CreateObject("ADODB.Connection")
    objConn.Open "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("Data/data.mdb")
    strSQL = "SELECT COUNT(id) WHERE jdate = "&request.Form("date")&" AS antal1 FROM under25 "
    Set objRs = objConn.Execute(strSQL)

strSQL = "SELECT COUNT(*) AS antal1 FROM under25 WHERE jdate = " & request.Form("date")

Nu har jeg gentagende gange forsøgt med jeres muligheder.... Jeg får stadig samme fejl :(

Det kan ikke passe. Check venligst at den kode du rent faktisk kører er den
som du tror det er. Og vis os gerne den kode du har nu.

Feltet i MDB'en er et tekstfelt ved navn jdato ( har rettet min skrivefejl fra før (jdate))

Koden er:
    <td><%
    Set objConn = Server.CreateObject("ADODB.Connection")
    objConn.Open "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("db/kknet.mdb")
    strSQL = "SELECT COUNT(id) WHERE jdato = "&request.Form("date")&" AS antal1 FROM under25 "
    strSQL = "SELECT COUNT(*) WHERE jdato = "&request.Form("ldato")&" AS antal4 FROM under25 "
    Set objRs = objConn.Execute(strSQL)
response.Write(objRs("Antal4")&" personer <br>")

%>&nbsp;</td>

Du har altså slet ikke tænkt dig at følge de gode råd vi har givet dig?

Jo og jeg prøver skam også at "klippe og klistre" til den helt store guld medalje... men åbenbart ikke godt nok :(

    <td><%
    Set objConn = Server.CreateObject("ADODB.Connection")
    objConn.Open "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("db/kknet.mdb")
strSQL = "SELECT COUNT(*) AS antal4 FROM under25 WHERE jdato = " & request.Form("ldato")
''    strSQL = "SELECT COUNT(*) AS antal4 FROM under25 WHERE jdato = " &request.Form("ldato")
''    strSQL = "SELECT COUNT(id) WHERE jdato = "&request.Form("ldato")&" AS antal4 FROM under25 "
'    strSQL = "SELECT COUNT(*) WHERE jdato = "&request.Form("ldato")&" AS antal4 FROM under25 "
    Set objRs = objConn.Execute(strSQL)
response.Write(objRs("Antal4")&" personer mellem 18 og 25 er på nuværende tidspunkt tilmeldt jobmødet for ungeteam d. "& request.Form("date")&"<br>")
        u25 = objRs("Antal4")
    objConn.close
%></td>

Det der med de #....# fandt jeg ikke ud af hvordan fungerede....

Men den du viser her giver ikke samme fejl som før, vel?

Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression 'jdato ='.

/default.asp, line 330

Linie 330 er der hvor der står:     Set objRs = objConn.Execute(strSQL)

erikjacobsen >> Har du evt. en email adresse så vil jeg gerne sende dig hele default.asp ... Der er nemlig nogle andre funktioner som jeg er i tvivl om kan "lave splid" i det her der er opslået.... Men jeg er ikke interesseret i at "smide" hele koden på nettet til offentlig beskuelse...

DOH !!!! Jeg fandt fejlen.... Den kunne ikke læse indputtet i listboksen ldato

Det gør sikkert at den er tom. Er det et tekstfelt skal du også have '.....' omkring

Jeg prøver at bygge det lidt anderledes op.... Hvis det er... vil jeg godt uddele point for ulegligheden....

Hmmm