Sortering i forespørgsel
Jeg har et problem med denne forespørgsel. Jeg vil gerne kunne sortere udtrækket efter "katalognummer ASC" hvor skal jeg indsætte det? Jeg har prøvet at indsætte det et par forskellige steder, men det hjælper ikke rigtig.SQL = "Select * From huse "
strSQL = "" 'indeholder where delen
If Request("omraade") <> "" Then strSQL = strSQL & " omraade = " & Request("omraade") & " AND"
If Request("personer") <> "" Then strSQL = strSQL & " personer = " & Request("personer") & " AND"
If Request("soverum") <> "" Then strSQL = strSQL & " soverum = " & Request("soverum") & " AND"
If Request("pool") <> "" Then strSQL = strSQL & " pool = " & Request("pool") & " AND"
If Request("spa") <> "" Then strSQL = strSQL & " spa = " & Request("spa") & " AND"
If Request("sauna") <> "" Then strSQL = strSQL & " sauna = " & Request("sauna") & " AND"
If Request("husdyr") <> "" Then strSQL = strSQL & " husdyr = " & Request("husdyr") & " AND"
If Request("tv") <> "" Then strSQL = strSQL & " tv = " & Request("tv") & " AND"
If Request("parabol") <> "" Then strSQL = strSQL & " parabol = " & Request("parabol") & " AND"
If Request("havudsigt") <> "" Then strSQL = strSQL & " havudsigt = " & Request("havudsigt") & " AND"
If Request("vaskemaskine") <> "" Then strSQL = strSQL & " vaskemaskine = " & Request("vaskemaskine") & " AND"
If Request("opvaskemaskine") <> "" Then strSQL = strSQL & " opvaskemaskine = " & Request("opvaskemaskine") & " AND"
If Request("braendeovn") <> "" Then strSQL = strSQL & " braendeovn = " & Request("braendeovn") & " AND"
If Request("tv") <> "" Then strSQL = strSQL & " tv = " & Request("tv") & " AND"
If Request("parabol") <> "" Then strSQL = strSQL & " parabol = " & Request("parabol") & " AND"
' slet evt. overskudende "AND" i strSQL strengen:
If Right(strSQL,3) = "AND" Then strSQL = Left( strSQL, (Len(strSQL)-3) )
'Hvis strSQL ikke er tom indsæt WHERE i SQL sætning:
if strSQL <> "" then SQL = SQL & " WHERE " & strSQL & ""
Set rs = Conn.Execute(SQL)
