SQL - Udtræk

Så kan du bruge IN i en SQL sætning og loop gennem og udskrive en information ad gangen:


'Tjek om der er noget information at vise:
if len("" & rs("produktinfo")) > 0 then
  SQL = "SELECT * FROM Information WHERE ID IN (" & rs("produktinfo") & ")"
  Set Irs = ConnectionObjectNavn.Execute(SQL)
  do while not Irs.EOF
    Response.write Irs("Info")
    Irs.MoveNext
    if not Irs.EOF then Response.write ","
  loop
end if

Hmmm kan du uddybe lidt? Kan ikke rigtig få den til at skrive noget som helst, den er blot blank, men får ingen fejl?!

Det skal bygges ind hvor du vil havde informationen til at stå.. Eks hvis du har et sted hvor der står rs("produktinfo") men den skriver "4,1,14" så skal du skifte koden ud med den linje...


Eller så et eks med lidt mere.:


'Udskriver alle produkter.:

SQL = "SELECT * FROM Produkt"
Set rs = Conn.Execute(SQL)
do while not rs.EOF

  Response.write "ID på productet : " & rs("ID") & "<br>"
  Response.write "Navn på productet : " & rs("Navn") & "<br>"

  'Tjek om der er noget information at vise:
  if len("" & rs("produktinfo")) > 0 then
    SQL = "SELECT * FROM Information WHERE ID IN (" & rs("produktinfo") & ")"
    Set Irs = ConnectionObjectNavn.Execute(SQL)
    do while not Irs.EOF
      Response.write Irs("Info")
      Irs.MoveNext
      if not Irs.EOF then Response.write ","
    loop
  end if
 
  rs.Movenext
loop

[Microsoft][ODBC Microsoft Access-driver] Der er en syntaksfejl, fordi der mangler en operator. i forespørgselsudtrykket "ID IN ( )".

Kan rs("produktinfo") være tom?

Hmmm... det underlige er at hvis jeg laver en test fil med indholdet du skrev virker det.. ?!

Nej det er den nu ikke.. hmm roder lige lidt mere med det, løsningen må være lige foran mig :) Jeg accepetere så snart jeg har fået det til at fungere!!

Så prøv at vise koden, men hvis rs("produktinfo") kan være tom, så der ikke skal vises noget information skal du havde denne if sætning med som vist ovenfor. Den tjekker på længeden af rs("produktinfo") og er den 0 viser den inden information.

if len("" & rs("produktinfo")) > 0 then

Kan du ikke lave et join i stedet:

SELECT Navn, Info
FROM Produkt INNER JOIN Information ON ProduktInfo = Information.ID

Så får du både produktnavn og information i det samme recordset.

/venne

Har fået det til at virke, men får en fejl allersidst.. ADODB.Field fejl '80020009'

Enten er BOF eller EOF sand, eller den aktuelle post er blevet slettet. Den anmodede handling kræver en aktuel post.

/default.asp, linje 0

Husk de to recordset skal havde hvert sit navn.
Et til at hendte produkter ud rs
Et til at hendte information ud Irs
Har du lavet det sådan ??

Ja det har jeg sørget for, men den løber hele recordsettet igennenm og smider det også korrekt ud, men komer med den fejl til allersidst!

hm underligt så .. Har du en linje uden for loop'et som uskriver fra recordsetet eller en rs.movenext efter loop'et?

Nu har jeg arbejdet de sidste 14 timer og nu må jeg sku holde ;) Havde skrevet es.movenext ;) Kæmpe tastefejl!!!

Nå men du får tak!