webForumDet fria alternativet

Loop i loop?! (MySQL)

2 svar · 190 visningar · startad av henkepenka

henkepenkaMedlem sedan sep. 2002125 inlägg
#1

Tja...
Listar upp ett antal uteställen i en databas. Några av dessa uteställen är medlemar hos oss. Dessa uppgifter ligger i en annan databas.

Jag vill att när utestället är medlem ska det stå "Avsluta medlemskapet", är de medlemmar ska det stå "Påbörja medlemskapet" och när det är endast tio dagar eller mindre kvar på medlemskapet ska det stå "antal dagar kvar".
Skickar med koden så kanske ni kan lösa detta åt mig?!

<table width="100%" border="0" cellspacing="0" cellpadding="4">
  <%
      Set AOJ = Server.CreateObject("ADODB.Connection")
      OpenDatabaseAOJ
      Set RecSet = Server.CreateObject("ADODB.Recordset")

  Sidan = Request.QueryString("sida")
  If Sidan = "" then 
  sida = 1 
  Else 
  sida = Sidan 
  End If 

  With RecSet
  .CursorLocation = 3
  .CacheSize = 50
  End With
  
      SQL = "Select * From clubs Order by Name"
  RecSet.Open SQL, AOJ    
      
      
      
  If RecSet.EOF Then%>
  <tr>
  <td height="21" colspan="3" class="normal">Inga uteställen</td>
  </tr>
  <%Else  
  With RecSet
  .MoveFirst 
  .PageSize = 50
  .AbsolutePage = sida
  End With

  Sidor =  RecSet.PageCount
  Y = 0 
  Do While Not RecSet.EOF And Y < RecSet.PageSize%>
  <tr>
  <td width="80%" height="22" align="left" valign="top"><b><%=RecSet("Name")%></b></td>
  <td width="20%" height="22" align="left" valign="top"><%=RecSet("Phone")%></td>
  </tr>
          <tr bgcolor="#CCCCCC"> 
  <td height="1" colspan="2"> </td>
  </tr>
         <tr>
               <td align="left" valign="top"><%=RecSet("clubDesc")%><br>&nbsp;<br>
  <a href="utestallen.asp?do=andra&id=<%=RecSet("ClubID")%>"><font color="#FF0000">Ändra 
  eller ta bort</font></a>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
                  &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
                  
                       <a href="utestallen.asp?do=endmedlem&id=<%=RecSet("ClubID")%>"><%If DateDiff("d", Date, enddat) < 10 Then%><%=DateDiff("d", Date, enddat)%> dagar kvar<%Else%><font color="#ff0000" size="3"><b>Avsluta medlemsskap</b></font><%End If%></a>

                  <a href="utestallen.asp?do=blimedlem&id=<%=RecSet("ClubID")%>"><font color="#FF0000"><b>Påbörja medlemsskap</b></font></a>

                  <br>
  &nbsp;<br></td>
              <td><img src="../../images/clubs/<%=RecSet("ClubId")%>/1.jpg" width="75" height="56"><br>&nbsp;<br></td>
         </tr>
         
  <%Y = Y + 1
  RecSet.MoveNext
  Loop
  End If
      %>
  </table>

<%If Sidor > 1 Then%>
<table width="100%" border="0" cellspacing="0" cellpadding="4">
  <tr>
  <td style="border-top: 1px solid #000000">

  <%If (Int(sida)) <> 1 Then%>
  <a href="utestallen.asp?sida=<%=(Int(sida)-1)%>"><b>Bakåt</b></a> |
        <%Else
  Response.Write ""
  End If%>

  <%For Sid = 1 To Sidor
  If (Int(Sid)) = (Int(sida)) Then%><b><%=Sid%></b><%Else%> 
         <a href="utestallen.asp?sida=<%=Sid%>"><%=Sid%></a>
         <%     
          End If
  Next%>

  <%If (Int(sida)) <> (Int(Sidor)) Then%>
  | <a href="utestallen.asp?sida=<%=(Int(sida)+1)%>"><b>Framåt</b></a>

  
  <%Else
  Response.Write ""
  End If%>

  </td>
  </tr>
</table>
<%End If%>
Fredde MannenMedlem sedan nov. 20014 054 inlägg
#2

Kan du förklara detta

utestället är medlem ska det stå "Avsluta medlemskapet", är de medlemmar ska det stå "Påbörja medlemskapet"

Men om de nu är medlem står det "Avsluta medlemskap", men varför ska det skrivas över med "Påbörja medlemskap", menar du inte om de inte är medlem?

:q :OO

henkepenkaMedlem sedan sep. 2002125 inlägg
#3

Jo, det är klart du har rätt Fredde Mannen!
Fel av mig! =/

131 ms totalt · 3 externa anrop · v20260731065814-full.30151723
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
128 ms — hämta tråd, inlägg och bilagor (db)