Muss gerade auf einen Download warten ...

Deine Daten sind
K�se - Gouda
K�se - Schimmel
K�se - Leerdamer
Brot - Weiss
Brot - Grau

Wann hast Du einen Gruppenwechsel?  Am Anfang, wenn es mit K�se losgeht.
Zwischendrin beim Sprung von K�se auf Brot. Und am Ende ist da noch was,
wenn auch kein Gruppenwechsel mehr.

Was ist zu tun?
* Am Anfang erkennen dass es losgeht! Machst Du �ber die Erkennung ob die
Variable warwas leer ist. Gut.
* Gruppenwechsel mittendrin!  Erkennst Du dar�ber dass die Variable warwas
was anderes enth�lt als die gerade ankommende Spalte Produkt.

Im ersten Fall w�re [wenn man es genau macht] zu tun
* TR und evtl. TD aufmachen.
* Produkt ausgeben
* TD zumachen
* danach wie bei allen Datens�tzen auch: TD aufmachen, Beschreibung
ausgeben, TD zumachen

Solange kein weiterer Gruppenwechsel daherkommt immer
* danach wie bei allen Datens�tzen auch: TD aufmachen, Beschreibung
ausgeben, TD zumachen

Kommt der n�chste echte Gruppenwechsel daher, dann steht an
* TR zumachen
* neuen TR und evtl. TD aufmachen.
* Produkt ausgeben
* TD zumachen
* danach wie bei allen Datens�tzen auch: TD aufmachen, Beschreibung
ausgeben, TD zumachen

Und am Ende der Datenausgabe bliebe dann noch �brig
* TR zumachen.
(Tabelle auf und zu habe ich mal weggelassen)

Das w�rde zu EINER (von vielen m�glichen) Implementierungen f�hren

dim warwas
Response.write "<table width=""90%"" border=""1"">"
Do Until rs.eof
  ' --- hier neue Gruppe.
  if warwas = "" or (warwas <> rs("produkt")) then
    If warwas = "" Then
      ' --- neue Gruppe bzw. Zeile (erste Zeile)
      Response.write "<tr>"
    Else
      ' --- mittendrin - zuerst alte Zelle + Zeile
      ' --- zu- dann neue aufmachen
      Response.write "</td></tr><tr>"
    End If
    ' --- jetzt ist auf jeden Fall eine neue Zeile auf
    Response.write <td><b>" & _
    (rs("produkt")) & "</b></td><td>"
    ' --- jetzt ist auf jeden Fall eine neue Zelle auf
    warwas = rs("produkt")
  end if
  ' --- Ende Gruppenwechsel - hier nur Beschr. ausgeben
  Response.write   rs("beschreibung") & "<br>"
  rs.MoveNext
Loop
' --- hier letzte Zeile zumachen
' --- beinhaltet letzte Zelle zumachen
Response.write "</td></tr></table>"


Hab es nicht getestet. Vielleich noch ein kleiner Denkfehler drin.

--

Viele Gr��e
Hubert Daubmeier


| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
| Sie knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp

Antwort per Email an