Do while not RS("pay_cardnumber").EOF

Oder besser

Do until rs("pay_cardnumber").EOF


-----Urspr�ngliche Nachricht-----
Von: christian schlemmer [mailto:[EMAIL PROTECTED]] 
Gesendet: Dienstag, 22. Januar 2002 15:28
An: ActiveServerPages German
Betreff: [aspgerman] RE: looping

eben geht's nicht

Do While Not RS("pay_cardnumber") = EOF  funzt nicht

sowas in der art brauche ich

-----Original Message-----
From: Azubi IFK LabTec [mailto:[EMAIL PROTECTED]]
Sent: Dienstag, 22. Januar 2002 14:59
To: ActiveServerPages German
Subject: [aspgerman] RE: looping


sieht gut aus...

was ist nun die Frage, oder das Problem?
W�rde meinen, dass es so funktioniert.

MfG

-----Original Message-----
From: christian schlemmer [mailto:[EMAIL PROTECTED]]
Sent: Dienstag, 22. Januar 2002 14:50
To: ActiveServerPages German
Subject: [aspgerman] looping


hallo,

wie kann ich mit asp auf dass Recordset in einer schleife zugreifen?

table account:
acc_nickname
acc_password
acc_saldo

table payment
pay_cardnumber
pay_nickname

nickname darf in account nur einmal stehen (prim-key)
nickname mit creditkarte darf in talbe payment mehrmals stehen

db: mysql (also keine 1 to many relationship m�glich)

die felder nickname, password und saldo haben immer jeweils nur einen
wert.
dass feld cardnumber mehrere - wie kann ich mit der WHILE schleife auf
dass
RS zugreifen?
ungef�hr so:

Do While Not RS("pay_cardnumber") = EOF
  Response.Write "<td><font face=""Arial, Helvetica, sans-serif""
size=""3""><b> " & RS("pay_cardnumber") & "</b></font></td>"
RS.MoveNext
Loop %>

so werden allerdings ALLE creditkartennummern ausgelesen.

mein code sieht folgendermassen aus:

strNickname = request.form("nickname")

                'auslesen der daten mit JOIN
            strSQL = "SELECT account.acc_nickname, account.acc_password,
account.acc_saldo, payment.pay_cardnumber FROM account, payment WHERE
account.acc_nickname = '"& strNickname &"'"
            %>
            <!-- #include file = "dbopen.asp" -->
            <% If RS.EOF Then %>
            <font face="Arial, Helvetica, sans-serif" size="3"><b><b>es
wurde
            leider kein Eintrag gefunden<br>
            bitte versuchen Sie es nochmals <a href="accounts.asp"><img
src="back.gif" width="60" height="22" border="0" alt="zur&uuml;ck zur
Suche"></a></b></b></font>
            <% Else %>
            <table border="0" cellspacing="0" cellpadding="0"
bgcolor="#6699FF" dwcopytype="CopyTableCell">
              <tr>
                <td>
                  <p><font face="Arial, Helvetica, sans-serif"
size="3"><b><font size="2"
color="#FFFFFF">Nickname:</font></b></font><b></b></p>
                </td>
                <td><b><font face="Arial, Helvetica, sans-serif"
size="3"><%=RS("acc_nickname")%></font></b></td>
              </tr>
              <tr>
                <td>&nbsp;</td>
                <td>&nbsp;</td>
              </tr>
              <tr>
                <td><font face="Arial, Helvetica, sans-serif"
size="3"><b><font size="2"
color="#FFFFFF">Passwort:</font></b></font></td>
                <td><font face="Arial, Helvetica, sans-serif"
size="3"><b><b><font face="Arial, Helvetica, sans-serif"
size="3"><%=RS("acc_password")%></font></b></b></font></td>
              </tr>
              <tr>
                <td>&nbsp;</td>
                <td>&nbsp;</td>
              </tr>
              <tr>
                <td><font face="Arial, Helvetica, sans-serif"
size="3"><b><font size="2" color="#FFFFFF">Saldo:</font></b></font></td>
                <td>
                  <input type="text" name="saldo"
value=<%=RS("acc_saldo")%>
size="5">
                </td>
              </tr>
              <tr>
                <td>&nbsp;</td>
                <td>&nbsp;</td>
              </tr>
              <tr>
                <%
                'get creditcardno. from table payment
                'strSQL = "SELECT pay_cardnumber FROM payment WHERE
pay_nickname = '"& strNickname &"'"
                %>
                <td><font face="Arial, Helvetica, sans-serif"
size="3"><b><font size="2"
color="#FFFFFF">Kreditkarten:&nbsp;&nbsp;&nbsp;&nbsp;</font></b></font><
/td>
              </tr>
              <tr>
                <td colspan="2">
                  <%Do While Not RS.EOF
                    Response.Write "<td><font face=""Arial, Helvetica,
sans-serif"" size=""3""><b> " & RS("pay_cardnumber") &
"</b></font></td>"
                    RS.MoveNext
                    Loop %>
                </td>
              </tr>
            </table>


viele gr�sse,
christian


| [aspgerman] als [EMAIL PROTECTED] subscribed
| http://www.aspgerman.com/archiv/aspgerman/ = Listenarchiv
| Sie k�nnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspgerman.asp

| [aspgerman] als [EMAIL PROTECTED] subscribed
| http://www.aspgerman.com/archiv/aspgerman/ = Listenarchiv
| Sie k�nnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspgerman.asp


| [aspgerman] als [EMAIL PROTECTED] subscribed
| http://www.aspgerman.com/archiv/aspgerman/ = Listenarchiv
| Sie k�nnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspgerman.asp




| [aspgerman] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspgerman/ = Listenarchiv
| Sie k�nnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspgerman.asp

Antwort per Email an