Avanceret SQL

Mig ikke forstå. ?
Hvilke felter har du og hvad skal der udregnes. ?

Altså hvis jeg forstår dig rigtig så har en en tabel som indeholder prisen for en given uge(uge1,uge2 .. osv.) - hvor der pr. uge kan være forskellige priser. Men ????

i en SELECT kan du sagtens regne:

SELECT (felt1-felt3)*felt4, navn FROM .......

Men det ville være nemmere at stykke en SQL-streng sammen hvis man vidste noget om dit tabel-design. Hvad er databasem lavet i Access???

>Sonne, kan man? Jeg tester lige. Det skal jo være 2 poster der skal lægges sammen. ´Men du har nok ret, tester lige.....

Ehm, nej tror ikke lige den er god nok. Her er min kode (den funger) for hvis brugeren kun skulle leje bilen i 1 uge.

SQL = "SELECT Car_Id FROM Periode WHERE (Week = "& Uge & ") and (Price_Euro <= "& MAXPRIS &")" 

Uge er her = 1,
Det den skal gøre er at ligge Prisen for Uge(1) sammen med Prisen for Uge(2) og så checke om det er mindre en MAXPRIS. Fatter det ikke, hvis i kan finde ud af det, må i MEGET gerne skrive hvordan sætningen så skulle se ud.

Databasen er lavet i Access

Dette skulle virke:
SQL = "SELECT Car_Id FROM Periode WHERE (SELECT SUM(Price_Euro) FROM Periode a WHERE (a.Week >= " & Uge1 & ") AND (a.Week <= " & Uge2 & ") AND a.Car_Id = Periode.Car_ID) < " & MAXPRIS

mvh/Kenneth

Nope, den gider ikke Kenneth

Det virker på min Access2000.

Du kan alternativt bruge:

----KODE----
Dim rs
Set rs = Server.CreateObject("ADODB.Recordset")
Dim SQL

SQL = "SELECT Car_Id, SUM(Price_Euro) AS SumPris FROM Periode WHERE (Week >= " & Uge1 & ") AND (Week <= " & Uge2 & ");"

rs.open SQL,con,2,1
rs.Filter = "SumPris < " & MAXPRIS
----KODE SLUT----

Du har nu et recordset med de poster, der opfylder betingelserne.

Nope. Den laver lort i det. Er du sikker på at det er den præcise kode, har aldrig selv brugt ";" tegnet i vbscript. Æv hvor er det irriterende :(((((((((

Error Type:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][ODBC Microsoft Access Driver] You tried to execute a query that does not include the specified expression 'Car_Id' as part of an aggregate function.
/travel(ny)/test.asp, line 37

Og Car_Id eksisterer i tabellen ???????

Sorry...

Du skal ændre SQL'en til

SQL = "SELECT Car_Id, SUM(Price_Euro) AS SumPris FROM Periode WHERE (Week >= " & Uge1 & ") AND (Week <= " & Uge2 & ") GROUP BY Car_Id;"

Som jeg forstår så vil du have et udtræk af de biler der kan udlejes for en bestemt pris eller derunder i en eller fler uger. ?

Så har du brug for en SQL-sætning der ser sådan ud.
SQL = "SELECT Car_Id, Sum(Price_Euro) as SumPris FROM Periode WHERE (Week >= "& Uge1 & ") and (Week <= "& Uge2 & ") and (SumPris <= "& MAXPRIS &") group by car_id"

MEN - ovennævnte sætning kan ikke lade sig gøre. !
derfor er du nødt til at lave et udtræk med alle biler i de uger det drejer sig om og så gennemløbe recordsættet og sortere dem fra der overstiger MAXPRIS.

SQL = "SELECT Car_Id, Sum(Price_Euro) as SumPris FROM Periode WHERE (Week >= "& Uge1 & ") and (Week <= "& Uge2 & ") group by car_id"

do while not RS.EOF
  if (RS("SumPris") <= MAXPRIS then
    '  Den er go' nok
  end if
  RS.MoveNext
loop

Ok, tror det virker nu, checker lige