Hi,

Ich glaube ich spiele um diese Zeit fasst! Den Alleinunterhalter!

Sollte der ge�nderte Code nicht 100% funktionieren dann liegt es daran,
das ich in folgender Zeile einmal Enter vergessen habe. An der Stelle,
wo gleich das # erscheint da beginnt eine neue Zeile:

If rowCount = 4 then ' 4 weil Du bei 0 anf�ngst 0 bis 4 = 5 #rowCount =
0 %> </tr> <tr>

Jetzt aber N8 zusammen!

Mit freundlichen Gr��en
Frank Liebelt

-----Urspr�ngliche Nachricht-----
Von: Frank Liebelt [mailto:[EMAIL PROTECTED]] 
Gesendet: Samstag, 15. Dezember 2001 00:31
An: ASP Diskussionsliste fuer Anfaenger
Betreff: [aspdebeginners] AW: Ausgabe von Datensaetzen


Hallo nochmal,

Kaum auf Senden geklickt schon einen Fehler gefunden!!!
Das erste <TR> hinter :
rowCount = rowCount + 1
Muss vor 
<%
WHILE NOT prodRS.EOF AND rowCount < prodRS.PageSize...

gesetzt werden, damit es nicht nach jedem Datensatz neu geschrieben
wird. Und hier : <tr>
  <td colspan=2 align="center">
  &nbsp;
  </td>
</tr>

Muss noch ein <TR> angef�gt werden!
Damit wird erst sichergestellt, dass nach f�nf Eintr�gen auch eine neue
Zeile begonnen wird.

Weil es schon sp�t ist h�nge ich jetzt noch den kompletten ge�nderten
Quellcode hier dran:

########### LOS #############

<%
' Get the Current Page
pg = TRIM( Request( "pg" ) )
IF pg = "" THEN pg = 1

' Open the Recordset
Set prodRS = Server.CreateObject( "ADODB.Recordset" )
prodRS.ActiveConnection = Con prodRS.CursorType = adOpenStatic
prodRS.PageSize = 10 sqlString = "SELECT product_id, product_picture,
product_name, product_briefDesc " &_
  "FROM Products WHERE product_category='" & cat & "' " &_
  "AND product_status=1 " &_
  "ORDER BY product_name "
prodRS.Open sqlString
prodRS.AbsolutePage = pg
%>
<table width="550" border=0
 cellpadding=5 cellspacing=0>
<tr>
<%
WHILE NOT prodRS.EOF AND rowCount < prodRS.PageSize
rowCount = rowCount + 1
%>
<td>
  <% IF prodRS( "product_picture" ) <> "?????" THEN %>
  <IMG SRC="<%=prodRS( "product_picture" )%>"
   HSPACE=4 VSPACE=4 BORDER=0 align="center">
  <% END IF %>
  </td>
  <td>
  <a href="product.asp?pid=<%=prodRS( "product_id" )%>">
  <b><%=prodRS( "product_name" )%></b></a>
  <br><%=prodRS( "product_briefDesc" )%>
  <br><a href="product.asp?pid=<%=prodRS( "product_id" )%>">
  get more information</a>
  </td>
<%
If rowCount = 4 then ' 4 weil Du bei 0 anf�ngst 0 bis 4 = 5 rowCount = 0
%> </tr> <tr>
  <td colspan=2 align="center">
  &nbsp;
  </td>
</tr>
<tr>
<% end if %>

<%
prodRS.MoveNext
WEND
%>
<%
If rowCount < 4 then response.write("</TR>">)
%>
</table>

<%
IF prodRS.PageCount > 1 THEN
%>
<font color="darkgreen">
<b>Go to page: </b>
<%
  FOR i = 1 to prodRS.PageCount
  IF i <> cINT( pg ) THEN
%>
<a href="default.asp?cat=<%=cat%>&pg=<%=i%>">
<%=i%></a>&nbsp;
<% ELSE %>
<b><%=i%></b>&nbsp;
<% END IF %>
<%
  NEXT
%>
</font>
<%
END IF
%>

########## ENDE ############

Jetzt sollte alles stimmen und funktionieren. Gib mal ein Feedback in
die Runde!


Mit freundlichen Gr��en
Frank Liebelt



-----Urspr�ngliche Nachricht-----
Von: Frank Liebelt [mailto:[EMAIL PROTECTED]] 
Gesendet: Samstag, 15. Dezember 2001 00:21
An: ASP Diskussionsliste fuer Anfaenger
Betreff: [aspdebeginners] AW: Ausgabe von Datensaetzen


Hallo,

Das Problem ist, das die HTML-Tags <TR> & </TR> in der Schleife liegen.
Dies bedeutet zwangsl�ufig, das nach jedem Record ein </TR> ausgef�hrt
wird, welches die Reihe schliesst und eine neue beginnt. Um dies zu
umgehen f�llt mir nur eine M�glichkeit ein! Eine IF Abfrage angelegt an
die Variable rowCount! Ich w�rde den Code folgend �ndern:

....
  <br><a href="product.asp?pid=<%=prodRS( "product_id" )%>">
  get more information</a>
  </td>

'######## SCHNIPP ##############
<%
If rowCount = 4 then ' 4 weil Du bei 0 anf�ngst 0 bis 4 = 5 rowCount = 0
%> ' ######## SCHNAPP ##############

</tr>
<tr>
  <td colspan=2 align="center">
  &nbsp;
  </td>
</tr>

'######## SCHNIPP ##############
<% end if %>
'######## SCHNAPP ##############


<%
prodRS.MoveNext
WEND
%>
Hiermit werden nun f�nf Datens�tze nebeneinander angezeigt.

Damit der Tag auch gesetzt wird wenn der Count < 4 ist (wenn kein
Datensatz mehr vorhanden ist) noch eine if Abfrage welche so lautet:

...
WEND
%>

'######## SCHNIPP ##############
<% If rowCount < 4 then response.write("</TR>">) %>
'######## SCHNAPP ##############

</table>

So kannst Du sicher sein, das die letzte Zeile mit einem Tag geschlossen
wird auch wenn die Reihe nicht aus f�nf Datens�tzen besteht. Was ja bei
z.B.: 23 Datens�tze der Fall w�hre.



Mit freundlichen Gr��en
Frank Liebelt





Hallo Alle zusammen,

ich bin neu hier, und habe auch schon ein bloedes Problem.

ich habe ein Listing, das mir Datensaetze aus einer Datenbank anzeigt.
Es schreibt alle Datensaetze untereinander. Aber genau das soll es
nicht, denn ich m�chte die Datensaetze in Fuenfergruppen nebeneinander
angeordnet haben. Ich habe nun schon alles M�gliche probiert, aber nie
erfolgreich.(die HTML-Tabelle geaendert ...- da stimmt die  IF-Schleife
innerhalb der HTML-Tabelle nicht mehr, aber ich kann es auch nicht
ausbessern, da ich nicht wirklich verstanden habe, was genau sie
tut.) Wie kann ich das regeln?

<%
' Get the Current Page
pg = TRIM( Request( "pg" ) )
IF pg = "" THEN pg = 1

' Open the Recordset
Set prodRS = Server.CreateObject( "ADODB.Recordset" )
prodRS.ActiveConnection = Con prodRS.CursorType = adOpenStatic
prodRS.PageSize = 10 sqlString = "SELECT product_id, product_picture,
product_name, product_briefDesc " &_
  "FROM Products WHERE product_category='" & cat & "' " &_
  "AND product_status=1 " &_
  "ORDER BY product_name "
prodRS.Open sqlString
prodRS.AbsolutePage = pg
%>
<table width="550" border=0
 cellpadding=5 cellspacing=0>
<%
WHILE NOT prodRS.EOF AND rowCount < prodRS.PageSize
rowCount = rowCount + 1
%>
<tr>
  <td>
  <% IF prodRS( "product_picture" ) <> "?????" THEN %>
  <IMG SRC="<%=prodRS( "product_picture" )%>"
   HSPACE=4 VSPACE=4 BORDER=0 align="center">
  <% END IF %>
  </td>
  <td>
  <a href="product.asp?pid=<%=prodRS( "product_id" )%>">
  <b><%=prodRS( "product_name" )%></b></a>
  <br><%=prodRS( "product_briefDesc" )%>
  <br><a href="product.asp?pid=<%=prodRS( "product_id" )%>">
  get more information</a>
  </td></tr>
<tr>
  <td colspan=2 align="center">
  &nbsp;
  </td>
</tr>
<%
prodRS.MoveNext
WEND
%>
</table><%
IF prodRS.PageCount > 1 THEN
%>
<font color="darkgreen">
<b>Go to page: </b>
<%
  FOR i = 1 to prodRS.PageCount
  IF i <> cINT( pg ) THEN
%>
<a href="default.asp?cat=<%=cat%>&pg=<%=i%>">
<%=i%></a>&nbsp;
<% ELSE %>
<b><%=i%></b>&nbsp;
<% END IF %>
<%
  NEXT
%>
</font>
<%
END IF
%>

Vielleicht koennt Ihr mir helfen. Vielen Dank!

Susan




| 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



| 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



| 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



| 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