Avatar billede ballum-it Praktikant
02. marts 2011 - 12:11 Der er 4 kommentarer og
1 løsning

Desc Limit

Hvordan er det lige jeg skriver, at hvis den viser de 5 første emner i listen skal den være class=1 ellers skal den ved de resterende være en anden class?

Jeg trækker oplysningerne ud fra mysql database med følgende record

<%
'--RSslides
Set myConn = Server.CreateObject("ADODB.Connection")
myConn.open(sConn)
set RSslidesSold=Server.CreateObject("ADODB.recordset")
RSslidesSold.Open "SELECT * FROM  slides WHERE type='"& salgstype &"' AND myType='"& myType &"' AND  sold= 0 order by id desc", myConn

%>


Det vil sige, at de første 5 den henter, skal være med rød tekst, de resterende skal være med sort.
Avatar billede softspot Forsker
02. marts 2011 - 13:20 #1
Noget i stil med dette (den konkrete formatering af det du udskriver må du selv lige forfatte, men det med fed er det vigtige i denne sammenhæng):

<%
'--RSslides
Set myConn = Server.CreateObject("ADODB.Connection")
myConn.open(sConn)
set RSslidesSold=Server.CreateObject("ADODB.recordset")
RSslidesSold.Open "SELECT * FROM  slides WHERE type='"& salgstype &"' AND myType='"& myType &"' AND  sold= 0 order by id desc", myConn

taeller = 1
do while not RSslidesSold.eof
  if taeller > 5 then
    aktuelClass = "anden-class"
  else
    aktuelClass = "1"
  end if

  taeller = taeller + 1

  response.write "<span class=""" & aktuelClass & """>"
  response.write RSslidesSold("felt1")
  response.write "</span>" & vbCrLf

  RSslidesSold.movenext
loop
RSslidesSold.close
%>
Avatar billede ballum-it Praktikant
02. marts 2011 - 14:27 #2
Det er lige sådan omtrent.

Jeg har den til at se sådan ud nu, og har ændret i styles.css, men den viser ikke en anden farve alligevel. Sletter jeg class=indhold i selve indholdet, får den slet ingen class med.  Hvad har jeg lige overset der?




<%
  counter = 0
  Do while not RSslides.eof
%> 

<td valign="top">
  <div align="left">
    <table border="0" cellspacing="0" cellpadding="0">
        <tr onmouseover="this.bgColor='#CCCCCC'"onmouseout="this.bgColor=''" onclick="document.getElementById('salgsdetails').contentWindow.location.href='salgsdetails.asp?id=<%=RSslides("id")%>'" style="cursor:pointer">
            <td><span class="indhold"><strong><%=(RSslides.Fields.Item("titelDa").Value)%></strong></span>
                <table width="200" border="0" align="left" cellpadding="0" cellspacing="0">
                    <tr >
                        <td height="15" align="left" valign="top" class="indhold" border="1"><strong><%=(RSslides.Fields.Item("amount").Value)%></strong> stk. <img src="images/layout/pil.gif" width="14" height="16" alt="Detaljer" border="0" />
                        </td>
                    </tr>
                </table>
            </td>
        /tr>
    </table><hr />
  </div>
</td>
                               


<%
  if counter > 5 then
    aktuelClass = "indhold"
  else
    aktuelClass = "ny"
  end if
  counter = counter + 1

  response.write "<span class=""" & aktuelClass & """>"
  response.write("</TR><TR>")
  response.write "</span>" & vbCrLf

  RSslides.movenext
loop
RSslides.close
%>
Avatar billede softspot Forsker
02. marts 2011 - 14:46 #3
Jeg antager at det er indhold-klassen der skal udskiftes med ny efter 5. element (baseret på klassernes navne .-)):

<%
counter = 0
Do while not RSslides.eof
  if counter > 5 then
    aktuelClass = "indhold"
  else
    aktuelClass = "ny"
  end if
  counter = counter + 1
%> 

<td valign="top">
  <div align="left">
    <table border="0" cellspacing="0" cellpadding="0">
        <tr onmouseover="this.bgColor='#CCCCCC'"
            onmouseout="this.bgColor=''"
            onclick="document.getElementById('salgsdetails').contentWindow.location.href='salgsdetails.asp?id=<%=RSslides("id")%>'"
            style="cursor:pointer">
            <td><span class="<%=aktuelClass%>"><strong><%=(RSslides.Fields.Item("titelDa").Value)%></strong></span>
                <table width="200" border="0" align="left" cellpadding="0" cellspacing="0">
                    <tr >
                        <td height="15" align="left"
                            valign="top"
                            class="<%=aktuelClass%>"
                            border="1">
                            <strong><%=(RSslides.Fields.Item("amount").Value)%></strong> stk.
                                <img src="images/layout/pil.gif" width="14" height="16" alt="Detaljer" border="0" /></strong>
                        </td>
                    </tr>
                </table>
            </td>
        /tr>
    </table><hr />
  </div>
</td>
<%
  RSslides.movenext
loop
RSslides.close
%>
Avatar billede ballum-it Praktikant
02. marts 2011 - 15:01 #4
Ja hvor dum kan jeg da lige være - det var jo bare det.  :o)


Mange tak for hjælpen - smider du et svar?
Avatar billede softspot Forsker
02. marts 2011 - 15:10 #5
Velbekomme :-)
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester