to where i en SQL linge

strSQL = "select * from bruger where online = 'yes' and lev = '1' order by username desc"
    set rs = Conn.Execute(strSQL)

strSQL = "select * from bruger where online = 'yes' and lev = '1' order by username desc"
    set rs = Conn.Execute(strSQL)

Lol :)

ja ik =) med det virker vist ikke lige

Microsoft OLE DB Provider for ODBC Drivers fejl '80040e07'

[Microsoft][ODBC Microsoft Access-driver] Datatyperne stemmer ikke overens i kriterieudtrykket.

/newhelpdesk/test.asp, line 7

det er hvis du ikke har nogle der er både online og 1....

hvad gør jeg så?

prøv:
strSQL = "select * from bruger where online = True and lev = '1' order by username desc"
    set rs = Conn.Execute(strSQL)

mener jeg... fatter ikke helt den danske iss :)
Ellers skal du lige indsætte en if not record.eof eller while not record.eof i din kode...

ameq: Kan du ikke poste noget mere af din kode?

virker min kode ikke?

arr det er både nolge som er online og lev 1

strSQL = "select * from bruger where online = True or lev = '1' order by username desc"
    set rs = Conn.Execute(strSQL)

<%    Set Conn = Server.CreateObject("ADODB.Connection")
    DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
    DSN = DSN & "DBQ=" & Server.MapPath("database.mdb")
    Conn.Open DSN
   
    strSQL = "select * from bruger where online = 'yes' and lev = '1' order by username desc"
    set rs = Conn.Execute(strSQL) %>
    <%=rs("id")%> - <%=rs("username")%>

^¨Det virker!

jaja... men du skal huske at hvis record.eof så skal den ikke udskrive recordet, ellers fucker den,....

<%    Set Conn = Server.CreateObject("ADODB.Connection")
    DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
    DSN = DSN & "DBQ=" & Server.MapPath("database.mdb")
    Conn.Open DSN
   
    strSQL = "select * from bruger where online = 'yes' and lev = '1' order by username desc"
    set rs = Conn.Execute(strSQL) %>
<% if not record.eof then %>
    <%=rs("id")%> - <%=rs("username")%>
<% end if %>

---- sådan noget lign.

Buha -> min kode virker ikke lige....

ellers rs.eof i dette tilfælde self. ;)

<%    Set Conn = Server.CreateObject("ADODB.Connection")
    DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
    DSN = DSN & "DBQ=" & Server.MapPath("database.mdb")
    Conn.Open DSN
  strSQL = "select * from bruger where online = True or lev = '1' order by username desc"

    set rs = Conn.Execute(strSQL)
do
response.write rs("id") & "-" & rs("username") & "."
loop until rs.EOF

<%    Set Conn = Server.CreateObject("ADODB.Connection")
    DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
    DSN = DSN & "DBQ=" & Server.MapPath("database.mdb")
    Conn.Open DSN
  strSQL = "select * from bruger where online = True or lev = '1' order by username desc"

    set rs = Conn.Execute(strSQL)
do
response.write rs("id") & "-" & rs("username") & "."
loop while not rs.EOF


Sådan! test det!!

online skal værer yes... med så hedder den bare 'yes' ik?

...ellers så post lige din kode her ameq...

ja!! jeg troede bare det var ja/nej i databasen!

nope den samme fejl =(

jo

strSQL = "select * from bruger where online = 'yes' and lev = '1' order by username desc"
    set rs = Conn.Execute(strSQL)

hvad er typerne i databasen??

...ellers så post lige din kode her ameq...  -> ??

ja, resten af din kode som laver fejl...

online er text og lev er tal

kom med hele koden tak!!

den buha laver samme fejl som min =( så der er den

<%    Set Conn = Server.CreateObject("ADODB.Connection")
    DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
    DSN = DSN & "DBQ=" & Server.MapPath("database.mdb")
    Conn.Open DSN
  strSQL = "select * from bruger where online = 'yes' or lev = '1' order by username desc"

    set rs = Conn.Execute(strSQL)
do
response.write rs("id") & "-" & rs("username") & "."
loop until rs.EOF %>

hele koden!

ja det er den.... =)

hvilke felter har du i din database?

hele kode er 250 linger lang "det er en chat"

online er text og lev er tal

<%    Set Conn = Server.CreateObject("ADODB.Connection")
    DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
    DSN = DSN & "DBQ=" & Server.MapPath("database.mdb")
    Conn.Open DSN
  strSQL = "select * from bruger where online = 'yes' or lev = '1' order by username desc"

    set rs = Conn.Execute(strSQL)
do while not rs.EOF
response.write rs("id") & "-" & rs("username") & "."
rs.movenext
loop%>

***************
prøv det

nope
Microsoft OLE DB Provider for ODBC Drivers fejl '80040e07'

[Microsoft][ODBC Microsoft Access-driver] Datatyperne stemmer ikke overens i kriterieudtrykket.

/newhelpdesk/test.asp, line 7

du må havde stavet forkert i online eller lev

ja, der er noget galt med dine database felter...

skal du have et screen shot?

check at du har username, id, lev og online i din database, og at de staves ens i database og kode...

ja tak! gør det hvor der også står hvad typer de er!

er du sikker på at det er den kode der er noget galt med og ikke resten?
hvilken en er linje 7?

http://www.helpdesk.tsr.dk/table.jpg
http://www.helpdesk.tsr.dk/table2.jpg

prøv at sætte online til ja/nej og brug dette script:
<%    Set Conn = Server.CreateObject("ADODB.Connection")
    DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
    DSN = DSN & "DBQ=" & Server.MapPath("database.mdb")
    Conn.Open DSN
  strSQL = "select * from bruger where online = True or lev = '1' order by username desc"

    set rs = Conn.Execute(strSQL)
do
response.write rs("id") & "-" & rs("username") & "."
loop until rs.EOF

fordi Username er med stort og det er ID oxo tror jeg

Microsoft OLE DB Provider for ODBC Drivers fejl '80040e07'

[Microsoft][ODBC Microsoft Access-driver] Datatyperne stemmer ikke overens i kriterieudtrykket.

/newhelpdesk/test.asp, line 7
samme fejl som at tid =)

at = altid

wtf... nu fatter jeg snart minus... har en sidste ting du kan prøve, men så er det vist oxo ved at knibe...
****************************************************
<%
Response.Buffer = True
Set Con = Server.CreateObject("ADODB.Connection")
Con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("database.mdb")
  strSQL = "select * from bruger where online = 'yes' or lev = '1' order by username desc"

    set rs = Conn.Execute(strSQL)
do while not rs.EOF
response.write rs("ID") & "-" & rs("Username") & "."
rs.movenext
loop%>

Der opstod en Microsoft VBScript-kørselsfejl fejl '800a01a8'

Et objekt er obligatorisk: 'Conn'

/newhelpdesk/test.asp, line 7
den fatter jeg ikke lige =)

Sorry... my bad
****************************************************
<%
Response.Buffer = True
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("database.mdb")
  strSQL = "select * from bruger where online = 'yes' or lev = '1' order by username desc"

    set rs = Conn.Execute(strSQL)
do while not rs.EOF
response.write rs("ID") & "-" & rs("Username") & "."
rs.movenext
loop%>

he
Microsoft JET Database Engine fejl '80040e07'

Datatyperne stemmer ikke overens i kriterieudtrykket.

/newhelpdesk/test.asp, line 7

den går helt af amork =)

har du ikke mulighed for at prøve det på en anden server eller noget?

jo prøver lige

på den anden server
Microsoft JET Database Engine error '80040e07'

Data type mismatch in criteria expression.

/yo/test.asp, line 7

Prøv dette istedet:

<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("database.mdb")
Conn.Open DSN

strSQL = "select * from bruger where online = 'yes' or lev = '1' order by username desc"

set rs = Conn.Execute(strSQL)
do while not rs.EOF
response.write rs("ID") & "-" & rs("Username") & "."
rs.movenext
loop
%>

/Snuseren.dk

nope det skal ikke værer eller det SKAL værer og

jeg har fixede det når det er at tal i database skal der ikke  ' ' ude om =) så....

når ja det glemte jeg!!