Avatar billede michael_stim Ekspert
15. april 2003 - 21:38 Der er 2 kommentarer og
1 løsning

Lave en tabel der lägger records 2 og 2

Jeg har en masse poster der bliver kaldt på og dem vil ejg gerne have lagt 2 og 2 i en tabel.
Jeg har prövet med noget a lá dette her:
Dim cells
Dim cellcount
cells = 3
cellcount = 1
if cellcount = cells then
%>
</tr><tr> osv
men får det ikke til at fungerer.
Er der nogen der har et script er jeg taknemmelig.
//Michael
Avatar billede michael_stim Ekspert
15. april 2003 - 21:58 #1
Ok her er hele tabellen hvis det hjälper:
<table width="640" border="0" cellspacing="5" cellpadding="0">
  <tr align="left" valign="top">
    <%
    set conn = server.CreateObject("ADODB.CONNECTION")
    DSN = "PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" & Server.MapPath("..\..\db\eldAdmin.mdb")

    conn.Open DSN

    strSQL = "SELECT * FROM gaseldadeBrasor"
    ' SQL sætning eksekveres
    set RS = conn.execute(strSQL)
    do while not rs.EOF
    if LEN(TRIM(rs("thumb")))<>0 or LEN(TRIM(rs("thumb")))<>NULL then
            %>
            <td width="100"><a href="#" onClick="imgPopup('admin/upload/<%=rs("bild")%>',350,350); return false;"><img src="admin/upload/<%=rs("thumb")%>" alt=<%=rs("bild")%> width="100" height="100" border="1"></a><br>
            Klicka p&aring; bilden f&ouml;r st&ouml;rre bild. </td>

            <%
            else
            %>
              <td width="100"><img src="admin/upload/ingen_bild.gif" alt="Ingen bild" width="100" height="100" border="1"></td>
              <%
              end if
              %>
          <td><table width="200" border="0" cellspacing="1" cellpadding="3">
              <tr>
                <td colspan="2" align="left" valign="top" bgcolor="#CC6600"><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF"><b>
                  <%=rs("model") %> </b></font></td>
              </tr>
              <tr>
                <td align="left" valign="top" bgcolor="#F5F5F5"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">Bredd:
                  </font></td>
                <td bgcolor="#F5F5F5" align="right" valign="top"><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#990000"><%=rs("brannarBredd")%></font></td>
              </tr>
              <tr>
                <td bgcolor="#E5E5E5" align="left" valign="top"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">Djup:
                  </font></td>
                <td bgcolor="#E5E5E5" align="right" valign="top"><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#990000"><%=rs("djup")%></font></td>
              </tr>
              <tr>
                <td bgcolor="#F5F5F5" align="left" valign="top"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">H&ouml;jd:</font></td>
                <td bgcolor="#F5F5F5" align="right" valign="top"><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#990000"><%=rs("hojd")%> </font></td>
              </tr>
              <tr>
                <td bgcolor="#E5E5E5" align="left" valign="top"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">Maxeffekt:
                  </font></td>
                <td bgcolor="#E5E5E5" align="right" valign="top"><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#990000"><%=rs("effekt")%></font></td>
              </tr>
              <tr align="right">
                <td colspan="2" valign="top"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><a href="word/Produktoversikt_skiss_och_text.doc" target="_blank"><img src="bilder/knapp_produkt.gif" width="135" height="17" border="0"></a></font></td>
              </tr>
              <tr align="right">
                <td colspan="2" valign="top"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><a href="tekniskdata.html"><img src="bilder/knapp_teknisk.gif" width="120" height="17" border="0"></a></font></td>
              </tr>
        </table>
        <%
        Dim cells
        Dim cellcount
        cells = 3
        cellcount = 1
        if cellcount = cells then
        %>
        </tr><tr>


<%
    end if
    cellcount = cellcount + 1
    rs.moveNext
    loop
    conn.close

%>
Avatar billede peppino Nybegynder
16. april 2003 - 00:25 #2
Er det noget ala det her du mener?
http://www.eksperten.dk/spm/227042

/Peppino
Avatar billede michael_stim Ekspert
16. april 2003 - 10:58 #3
Ja ca.
//Michael
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