Request

ups
her er den hele

Microsoft OLE DB Provider for ODBC Drivers error \'80040e10\'

[Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 1.

/smokers/nyhedersog.asp, line 9


dim soge
soge = request.querystring(\"text\")

set RS = Conn.Execute(\"SELECT * FROM news WHERE text LIKE soge ORDER BY ID DESC\")

det skal være

set RS = Conn.Execute(\"SELECT * FROM news WHERE text LIKE \'%\" & soge & \"&\' ORDER BY ID DESC\")

& -> %

set RS = Conn.Execute(\"SELECT * FROM news WHERE text LIKE \'%\" & soge & \"%\' ORDER BY ID DESC\") 

ADODB.Recordset error \'800a0bcd\'

Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.

/smokers/nyhedersog.asp, line 10


skal den være sådan her

<%
dim soge
soge = request.querystring(\"text\")

set RS = Conn.Execute(\"SELECT * FROM news WHERE text LIKE \'%\" & soge & \"&\' ORDER BY ID DESC\") 
RS.MoveFirst()
while not RS.EOF
%>
nyheden

<%
    RS.MoveNext()
WEND
%>
????

ja jeg fik en & ind i stedet for % sidst i SQL\'en:

set RS = Conn.Execute(\"SELECT * FROM news WHERE text LIKE \'%\" & soge & \"%\' ORDER BY ID DESC\")

RS.MoveFirst()
<--- men den siger fejlen er her!

nice den virker men kan jeg få den til at skrive hvormange resultater der er, og hvis at der unger resultater er?

ja det er fordi der ikke er noget resultat af søgeningen.

Det er heller ikke nødvendig at lave en RS.MoveFirst() lige når man åbner recordsetet. Hvis der er data i recordsetet vil den altid state på den første record.

men hvis man nu fx søger på den så skulle den vise dem alle ikke?

muligvis virker rs.recordCount men hvis den skriver -1 så skal du åbne recordsettet på en anden måder:

strSQL = \"SELECT * FROM news WHERE text LIKE \'%\" & soge & \"&\' ORDER BY ID DESC\"

rs.Open strSQL, myConn, 1, 3
Response.write \"Antal fundet : \" & rs.RecordCount

do while not rs.EOF

  \'UDSKRIV HER
  rs.MoveNext
loop
rs.Close

Det hvor du har skrevet :
nyheden

skal du udskrive fra dit record set:

rs(\"felt1\")
rs(\"felt2\")

nyheder =
<table border=0 cellpadding=0 cellspacing=0 width=390>
<tr><td>
<table border=0 cellpadding=0 cellspacing=0 width=100%>
<tr><td width=50% background=images/tabel_01.gif>
<b><% = RS.Fields(\"head\") %></b>
</td><td width=50% background=images/tabel_02.gif><p align=right>
<b><%=RS.Fields(\"user\")%></b>&nbsp;&nbsp;<b><%=RS.Fields(\"dato\")%></b>
</p></td></tr></table></td></tr><tr><td>
<% = RS.Fields(\"text\") %>
</td></tr>
</table>

Ja

skriver den ikke noget ud?

hvis den ikke skriver det ud så prøv med dette:
1)
lav en variable, rs.Dato = strDato
2)
response.write strDato

Det virkede en gang ved mig!

Sjovt spørgsmål nr. anyway ;-)

Sejt spm 123456

Tillykke med Spørgsmål nr. 123456