Jag har försökt att endast visa annonser som är max 21 dagar gamla men utan att lyckas. Följande SQL-sats fungerade tills jag lade in rad 4. SQL_query = "SELECT * FROM Skanetorget WHERE Annonstext Provade men får felet SQL_query = "SELECT * FROM Skanetorget WHERE AnnonstextHittar inte felet själv
-----------------------------------------------------------------------------------
SQL_query = "SELECT * FROM Skanetorget WHERE Annonstext
LIKE '%" & Search & "%' And Annonstyp LIKE '%" & Atyp & "%' And
PostAdress LIKE '%" & PAdress & "%' And Kategori LIKE '%" & Br & "%'
And Datum > # " date() - 21 " ORDER BY DATUM DESC"
Set MyConn = Server.CreateObject("ADODB.Connection")
Set RS = Server.CreateObject("ADODB.RecordSet")
MyConn.Open "hemsidor"
RS.Open SQL_query, MyConn, 3
----------------------------------------------------------------------------------
Hoppas någon hittar felet eller har en bättre lösning.
/BosseSv: Hittar inte felet själv
LIKE '%" & Search & "%' And Annonstyp LIKE '%" & Atyp & "%' And
PostAdress LIKE '%" & PAdress & "%' And Kategori LIKE '%" & Br & "%'
And Datum > # " dateadd("d", - 21,now) & "# ORDER BY DATUM DESC"
Sv: Hittar inte felet själv
Error Type:
Microsoft VBScript compilation (0x800A0401)
Expected end of statement
/.../***.asp
line 157, column 209Sv: Hittar inte felet själv
LIKE '%" & Search & "%' And Annonstyp LIKE '%" & Atyp & "%' And
PostAdress LIKE '%" & PAdress & "%' And Kategori LIKE '%" & Br & "%'
And Datum > # " & dateadd("d", - 21,now) & "# ORDER BY DATUM DESC"
Det verkar saknas ett & innan dateadd.
\Leif