Avatar billede kagge Nybegynder
29. november 2002 - 10:53 Der er 1 kommentar og
1 løsning

Denne kode skal være dynamisk

Er ikke så meget inde i asp, så hvordan får jeg lavet nedenstående kode dynamisk:

Som koden er nu bliver den sidste post i databasen hevet ud og præsenteret i en tabel. Men hvis man nu f.eks. skal have hevet de sidste 3 poster ud og præsenteret i hver sin tabel, så skal nedenstående kode være dynamisk og oprette nedenstående tabel alt efter hvor mange poster man trækker ud.

Så hvis der er nogle hajer som kan putte nedenstående kode ind i nogle løkker osv., så layoutet bliver som det er nu, men at det bare bliver dynamisk.

Håber i forstår spørgsmålet og kan hjælpe

connectionString = "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("hotlineopkald.mdb")
          Set forbindelse = Server.CreateObject("ADODB.Connection")
          Set recordSet = Server.CreateObject("ADODB.recordSet")
          forbindelse.Open connectionString, CONN_USER, CONN_PASS

          strSQL1 = "SELECT TOP 1 Nr, Dato, Initialer, Problemområde, Overskrift, Hint FROM Hints h ORDER BY h.Nr DESC"

          recordSet.Open strSQL1, forbindelse, adOpenStatic, adLockReadOnly, adCmdText

          nr = recordSet("Nr")
          da = recordSet("Dato")
          ini = recordSet("Initialer")
          pr = recordSet("Problemområde")
          ov = recordSet("Overskrift")
          hi = recordSet("Hint")

          recordSet.Close
          forbindelse.close

          Set recordSet = Nothing
          Set forbindelse = Nothing

%>

<TABLE BORDER=1 WIDTH="100%" frame=above>
  <TR>
    <TD bgcolor="steelblue"><B><%=ov%></B></TD><TD WIDTH=200 align=center bgcolor="steelblue">
      <A HREF="xxx">Rediger</A> | <A HREF="xxx">Slet</A> | <A HREF="xxx">Kommentar</A> </TD>
  </TR>
</TABLE>
<TABLE BORDER=1 WIDTH="100%">
  <TR>
    <TD WIDTH=80 VALIGN=top bgcolor="white">
      <IMG SRC="/billeder/sag.gif" alt="Sagsnummer"> <font color=red size=2><%=nr%></font>
      <BR>
      <IMG SRC="/billeder/forfatter.gif" alt="Forfatter"> <font color=red size=2><%=ini%></font>
      <BR>
      <IMG SRC="/billeder/dato.gif" alt="Dato for indlæg"> <font color=red size=2><%=da%></font>
      <BR>
      <IMG SRC="/billeder/spm.gif" alt="Problemområde"> <font color=red size=2><%=pr%></font>
    </TD>
    <TD VALIGN=top ><%=hi%></TD>
  </TR>
</TABLE>
Avatar billede mik.mak Nybegynder
29. november 2002 - 11:13 #1
Prøv følgende :


connectionString = "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("hotlineopkald.mdb")
          Set forbindelse = Server.CreateObject("ADODB.Connection")
          Set recordSet = Server.CreateObject("ADODB.recordSet")
          forbindelse.Open connectionString, CONN_USER, CONN_PASS

          strSQL1 = "SELECT TOP 3 Nr, Dato, Initialer, Problemområde, Overskrift, Hint FROM Hints h ORDER BY h.Nr DESC"

          recordSet.Open strSQL1, forbindelse, adOpenStatic, adLockReadOnly, adCmdText

do while not recordset.eof
%>
<TABLE BORDER=1 WIDTH="100%" frame=above>
  <TR>
    <TD bgcolor="steelblue"><B><%=ov%></B></TD><TD WIDTH=200 align=center bgcolor="steelblue">
      <A HREF="xxx">Rediger</A> | <A HREF="xxx">Slet</A> | <A HREF="xxx">Kommentar</A> </TD>
  </TR>
</TABLE>
<TABLE BORDER=1 WIDTH="100%">
  <TR>
    <TD WIDTH=80 VALIGN=top bgcolor="white">
      <IMG SRC="/billeder/sag.gif" alt="Sagsnummer"> <font color=red size=2><%=recordset("nr")%></font>
      <BR>
      <IMG SRC="/billeder/forfatter.gif" alt="Forfatter"> <font color=red size=2><%=recordset("initialer")%></font>
      <BR>
      <IMG SRC="/billeder/dato.gif" alt="Dato for indlæg"> <font color=red size=2><%=recordset("dato")%></font>
      <BR>
      <IMG SRC="/billeder/spm.gif" alt="Problemområde"> <font color=red size=2><%=recordset("problemområde")%></font>
    </TD>
    <TD VALIGN=top ><%=recordset("hint")%></TD>
  </TR>
</TABLE>

<%
recordset.movenext
loop

recordSet.Close
forbindelse.close

Set recordSet = Nothing
Set forbindelse = Nothing
%>
Avatar billede kagge Nybegynder
29. november 2002 - 11:29 #2
Godt gået mik.mak

Det var lige præcis sådan jeg ville have det. Helt kanon

Tusind tak for hjælpen
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