Søg
Avatar billede inkognito1 Nybegynder
18. februar 2001 - 07:02 Der er 4 kommentarer og
1 løsning

Loop 2 adgangen istedet for 1 ....

Jeg har en lille ting her som sikkert ikke er så svær at lave, men den er nok lidt svær at forklare....

Jeg prøver

Bruger den her nu.
-----------------------------
<% If not (rs.BOF Or rs.EOF) Then %>
<% do while not rs.eof %>
<%
if page = \"0\" then
page = \"1\"
else
page = page + 1
end if
%>

\'Disse linier der skal ligges mærke til

<a href=\"paging.asp?page=<%=page%>&u=<%=ugenr%>\"><img border=\"0\" src=\"user/<%=rs(\"billedeurl\")%>\" width=\"100\" height=\"76\"></a>

\'slut

<%
rs.movenext
loop
%>
<%
conn.close
set conn = nothing
Set rs = Nothing
end if %>
--------------------------
Har mærket de linier der skal ligges mærke til...

Det virker fint men det er ikke helt sådan jeg vil have det.

Sådan her skulle det være
----------------------------
<table border=\"0\" cellpadding=\"0\" cellspacing=\"0\" width=\"235\">
<tr>
<td width=\"102\" height=\"78\" bgcolor=\"#CCCCCC\">
<p align=\"center\"><a href=\"paging.asp?page=<%=page%>&u=<%=ugenr%>\"><img border=\"0\" src=\"user/<%=rs(\"billedeurl\")%>\" width=\"100\" height=\"76\"></a>
</td>
<td width=\"10\" height=\"78\"></td>
<td width=\"102\" height=\"78\" bgcolor=\"#CCCCCC\">
<p align=\"center\"><a href=\"paging.asp?page=<%=page%>&u=<%=ugenr%>\"><img border=\"0\" src=\"user/<%=rs(\"billedeurl\")%>\" width=\"100\" height=\"76\"></a>
</td>
</tr>
<tr>
<td colspan=\"3\" height=\"10\"></td>
</tr>
</table>
------------------------------------´

Min idé er at jeg skal have den til at loop 2 ad gangen... istedet for en adgangen. Uden at den naturligvis gentager nogen.

Håber en kan hitte ud af det ... ellers spørg :o)
Avatar billede erikjacobsen Ekspert
18. februar 2001 - 08:21 #1
Det er utestet:

<%
taeller=0
If not (rs.BOF Or rs.EOF) Then %>
 
<table border=\"0\" cellpadding=\"0\" cellspacing=\"0\" width=\"235\">
<tr>
<%
  do while not rs.eof
    if page = \"0\" then
      page = \"1\"
    else
      page = page + 1
    end if
%>

\'Disse linier der skal ligges mærke til

<td width=\"102\" height=\"78\" bgcolor=\"#CCCCCC\">
<p align=\"center\"><a href=\"paging.asp?page=<%=page%>&u=<%=ugenr%>\"><img border=\"0\" src=\"user/<%=rs(\"billedeurl\")%>\" width=\"100\" height=\"76\"></a>
</td>
<%
if taeller=0 then
%>
  <td width=\"10\" height=\"78\"></td>
<% else %>
  </tr><tr>
<%
end if
taeller=1-taeller
%>
\'slut

<%
  rs.movenext
  loop
%>
</tr>
</table>

<%
  conn.close
  set conn = nothing
  Set rs = Nothing
end if
%>
Avatar billede eagleeye Praktikant
18. februar 2001 - 13:39 #2
Jeg har en lidt ande mode at skrive det på:

<%If Not rs.EOF Then %>
  <table border=1>
<%LinkCount = 0
  Do Until rs.EOF
    if page = \"0\" then
      page = 1
    else
      page = page + 1
    end if 
    \'Mod 2. 2 er antal kolonner med data:
    If LinkCount Mod 2 = 0 Then
      If LinkCount <> 0 Then Response.Write\"</tr>\"
    Else %>
      <td width=\"10\" height=\"78\"></td> <% \'Kolonne mellem data kolonner.
    End If %>
    <td width=\"102\" height=\"78\" bgcolor=\"#CCCCCC\">
    <p align=\"center\"><a href=\"paging.asp?page=<%=page%>&u=<%=ugenr%>\"><img border=\"0\" src=\"user/<%=rs(\"billedeurl\")%>\" width=\"100\" height=\"76\"></a>
    </td>
    <%
    LinkCount = LinkCount + 1
    rs.MoveNext
  Loop %>
  </tr></table>
  <%
Else
  Response.Write \"Ingen ting at udskrive\"
End If
conn.close
set conn = nothing
Set rs = Nothing %>
Avatar billede inkognito1 Nybegynder
18. februar 2001 - 19:18 #3
<%If Not rs.EOF Then %>
  <table border=0>
<%LinkCount = 0
  Do Until rs.EOF
    if page = \"0\" then
      page = 1
    else
      page = page + 1
    end if 
    \'Mod 2. 2 er antal kolonner med data:
    If LinkCount Mod 2 = 0 Then
      If LinkCount <> 0 Then Response.Write\"</tr>\"
    Else %>
      <td width=\"1\"></td> <% \'Kolonne mellem data kolonner.
    End If %>
    <td width=\"102\" bgcolor=\"#000000\">
    <p align=\"center\"><a href=\"paging.asp?page=<%=page%>&u=<%=ugenr%>\"><img border=\"1\" src=\"user/<%=rs(\"billedeurl\")%>\" width=\"109\" height=\"82\"></a>
    </td>
  <%
taeller=0
If not (rs.BOF Or rs.EOF) Then %>
 
<table border=\"0\" cellpadding=\"0\" cellspacing=\"0\" width=\"235\">
<tr>
<%
  do while not rs.eof
    if page = \"0\" then
      page = \"1\"
    else
      page = page + 1
    end if
%>

\'Disse linier der skal ligges mærke til

<td width=\"102\" height=\"78\" bgcolor=\"#CCCCCC\">
<p align=\"center\"><a href=\"paging.asp?page=<%=page%>&u=<%=ugenr%>\"><img border=\"0\" src=\"user/<%=rs(\"billedeurl\")%>\" width=\"100\" height=\"76\"></a>
</td>
<%
if taeller=0 then
%>
  <td width=\"10\" height=\"78\"></td>
<% else %>
  </tr><tr>
<%
end if
taeller=1-taeller
%>
\'slut

<%
  rs.movenext
  loop
%>
</tr>
</table>

<%
  conn.close
  set conn = nothing
  Set rs = Nothing
end if
%> 
Avatar billede inkognito1 Nybegynder
18. februar 2001 - 19:19 #4
Har testet begge versioner og har brugt din eagleeye... dog har jeg rettet lidt til...

Men kunne gode lide den måde at kode på ..

Forøvrigt var der en Lopp fejl eller noget i din erikjacbsen...

Så point går til eagle ..


Jeg takkker :o)
Avatar billede erikjacobsen Ekspert
18. februar 2001 - 19:36 #5
Det skulle ikke undre mig, ink..., det med loops i ASP er ikke lige min
specialitet. Det er så svært at huske ;-)
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
Programmeringssprog kurser
Kurser inden for grundlæggende programmering
Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel Indlæg Oprettet Seneste aktivitet
ASP classic kopiere database fil på server Af bsn i ASP 7 31/10/202610:20 01/11/202620:28
Persits.Upload Af bsn i ASP 9 17/09/202611:37 21/09/202615:15
Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP 10 25/06/202622:20 04/09/202602:30
Tjek alle checkbox i form Af bsn i ASP 4 18/05/202601:57 19/05/202613:33
Lost focus Af bsn i ASP 1 07/11/202415:34 01/01/202514:58
Se alle spørgsmål i kategorien Opret spørgsmål

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.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I dag 08:39 Produktnøgle Af hkv i Office & Kontorpakker
I går 16:59 Bitlocker Af nico i Windows
12/1116:30 Wlan i windows 11 home Af dcedata1977 i Windows
11/1121:19 Irriterende ikon på proceslinjen Af ErikHg i Windows
11/1116:33 Kan man slippe af med "msn" ? Af Ikke-ekspert i Windows
White papers
Flere white papers »