SQL i loop

du kan ikke oprette en dynamisk variabel/object Rs&Count kan ikke lade sig gøre

Ved ikke om dette vil hjælpe men prøve med Execute først...

counter = 0

    do while counter <= 3
    counter = counter + 1
    Execute SQL = "SELECT linknavn, adresse FROM links WHERE kategori = " & counter
    Execute set RS&counter = DB.Execute(SQL)
    loop

//>Rune

Nope, fungerer ik

Prøv at rette:
set RS&counter = DB.Execute(SQL)

Til:

Execute ("set RS"&counter & " = DB.Execute(SQL)")

Du er nød til at tænke om igen. Kan du ikke nøjes med at hente alt på en gang, og sorere efter kategori?


SELECT linknavn, adresse FROM links WHERE kategori = " & counter & " ORDER BY kateogri"

kan du ikke skrive din sql anderledes?
Sql = "SELECT linknavn, adresse FROM links WHERE kategori BETWEEN 1 AND 3" jeg er ikke lige sikker på syntax

grunden til jeg ville lave sql'en på den måde, var mest af dovenskab så jeg ikke skulle skrive 3 sql sætninger... jeg kan ikke rigtig bare nøjes med at sortere desværre :/

og jeg mente selvfølgelig:

"SELECT linknavn, adresse FROM links ORDER BY kategori"

Så er du nød til at forklare, hvorfor du vil have dem liggende i 3 variabler?

der er også noget der hedder IN, som virker som den du gerne vil bruge her:

Sql = "SELECT linknavn, adresse FROM links WHERE kategori IN (1,2,3)"

... strik selv 1,2,3 sammen...

Grunden til jeg vil have 3 forskelllige varible, er for der skal udskrives 3 forskellige steder på siden, og så synes jeg at jeg havde mere styr over det :)

er det ikke bare at ligge de forskellige værdier over i et array og så kalde dem når du skal bruge dem?

Hvis du laver det i EN query til dabasen skal du kun En gang ned til DBen.. og mht. de 3 forskellige steder på siden.....
<%
'* Sted 1
rs.movefirst
rs.filter = "katerori=1"
do until rs.eof
  rs.movenext
loop
%>

<%
'* Sted 2
rs.movefirst
rs.filter = "katerori=2"
do until rs.eof
  rs.movenext
loop
%>

<%
'* Sted 3
rs.movefirst
rs.filter = "katerori=3"
do until rs.eof
  rs.movenext
loop
%>

Du skal bare huske at lave dit recordset som et dynamisk clientside recordset da du ellers ikke kan gå frem og tilbage, eller filtrere :

set rs = server.createobject("adodb.recordset")
with rs
    .CursorType = 2 '* = adopenDynamic
    .CursorLocation = 3 '* = adUseClient
    .Source = sql
    .ActiveConnection = application("dbConn")
    .Open
    set .ActiveConnection = nothing
end with

Queryen skal så selvfølgelig også returnere katerori...

Hey tak du... det var sq smart :) Takker og nejer

Jeg sidder med samme problem. Kan du sende mig koden, som den så ud, da du fik det til at virke?