SELECT Kunde.Foto1, Kunde.Beliggenhed, Kunde.Postnr, Kunde.By, Kunde.Kontant, Kunde.Netto, Kunde.Kvm, Kunde.Grund, Kunde.Sagsnr FROM Kunde WHERE (((Kunde.Dato) In (Select Max(Dato) From Kunde)));
Det får jeg til:
SQL = \"Select Kunde.Foto1, Kunde.Beliggenhed, Kunde.Postnr, Kunde.By, Kunde.Kontant, Kunde.Netto, Kunde.Kvm, Kunde.Grund, top 1 * from (Select top \" & x & \" * from Kunde order by dato asc) as da order by dato desc\"
Der er en syntaksfejl, fordi der mangler en operator. i forespørgsesudtrykket \"top1 *\".
Med: Select Kunde.Foto1, Kunde.Beliggenhed, Kunde.Postnr, Kunde.By, Kunde.Kontant, Kunde.Netto, Kunde.Kvm, Kunde.Grund, top 1 * from (Select top \" & 20 & \" * from Kunde order by dato asc) as da order by dato desc\"
Select top 1 * from (Select top \" & 20 & \" Kunde.Foto1, Kunde.Beliggenhed, Kunde.Postnr, Kunde.By, Kunde.Kontant, Kunde.Netto, Kunde.Kvm, Kunde.Grund from Kunde order by dato asc) as da order by dato desc
Set Conn = Server.CreateObject(\"ADODB.Connection\") Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath (\"Ejendomme.mdb\") \'Her tages posten strSQL = \"Select top 1 * from (Select top \" & 20 & \" Kunde.Foto1, Kunde.Beliggenhed, Kunde.Postnr, Kunde.By, Kunde.Kontant, Kunde.Netto, Kunde.Kvm, Kunde.Grund from Kunde order by dato asc) as da order by dato desc\" set rs = conn.execute(strSQL) do until rs.eof
Set Conn = Server.CreateObject(\"ADODB.Connection\") Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath (\"Ejendomme.mdb\") \'Her tages posten strSQL = \"Select top 1 * from (Select top \" & 20 & \" Kunde.Foto1, Kunde.Beliggenhed, Kunde.Postnr, Kunde.By, Kunde.Kontant, Kunde.Netto, Kunde.Kvm, Kunde.Grund from Kunde order by dato asc) as da order by dato desc\" set rs = conn.execute(strSQL) do until rs.eof
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.