Avatar billede no_doubt Nybegynder
16. oktober 2002 - 01:55 Der er 14 kommentarer og
1 løsning

SPECIELT LOOP

Jeg ved det meget kode men poster nu alligevel
Den følgende kode udgør et loop som udskriver alle navne osv. fra tabellen barometer
problemet ligger i at der inden i loopet skal loopes samlet (et tal) som kommer fra en forespørgsel der hedder samlet
<html>

<head>
<title></title>
</head>

<body>
<div align="center"><center>

<table border="1" width="918" bgcolor="#A0B3C8" bordercolor="#000000" height="71">
  <tr>
    <strong><small><td width="68" align="center" height="16" valign="middle"><p align="center"><font
    face="Arial"><!--webbot bot="HTMLMarkup" startspan --><% if session("lvl") >= "3" then %>
<small><font face="Arial">Billede</font></small>
<% Else %>
<small><font face="Arial">Billede</font></small>
<% end if %><!--webbot bot="HTMLMarkup"
    endspan --><%
order = request.querystring("sort")
if order = "alder" then
strSQL = "Select * From barometer order by alder DESC"
elseif order = "samlet" then
strSQL = "Select * From barometer order by samlet DESC"
elseif order = "patter" then
strSQL = "Select * From barometer order by patter DESC"
elseif order = "roev" then
strSQL = "Select * From barometer order by roev DESC"
elseif order = "krop" then
strSQL = "Select * From barometer order by krop DESC"
elseif order = "charme" then
strSQL = "Select * From barometer order by cme DESC"
elseif order = "klasse" then
strSQL = "Select * From barometer order by klasse ASC"
elseif order = "fornavn" then
strSQL = "Select * From barometer order by fornavn ASC"
elseif order = "mellemnavn" then
strSQL = "Select * From barometer order by mellemnavn ASC"
elseif order = "efternavn" then
strSQL = "Select * From barometer order by efternavn ASC"
elseif order = "aksp" then
strSQL = "Select * From barometer order by aksp DESC"
else
strSQL = "select * from barometer"
end if
Set rs = Conn.Execute(strSQL)
%> </font></small></td>
    <td width="229" align="center" height="16" valign="middle"><font face="Arial"><!--webbot
    bot="HTMLMarkup" startspan --><% if session("lvl") >= "3" then %>
<p><font face="Arial" color="#000000"><small><a href="default1.asp?sort=fornavn"
style="color: rgb(0,0,0)">Fornavn</a> - <a href="default1.asp?sort=mellemnavn"
style="color: rgb(0,0,0)">Mellemnavn</a> - <a href="default1.asp?sort=efternavn"
style="color: rgb(0,0,0)">Efternavn</a></small></font>
<% Else %>
<small><font face="Arial">
<p>Navn - Mellemnavn - Efternavn</font></small> <% end if %><!--webbot bot="HTMLMarkup" endspan --></font></td>
    <td width="58" align="center" height="16" valign="middle"><font face="Arial"><!--webbot
    bot="HTMLMarkup" startspan --><% if session("lvl") >= "3" then %>
<a href="default1.asp?sort=alder"><font
face="Arial" color="#000000"><small>Alder</small></font></a>
<% Else %>
<small><font face="Arial">Alder</font></small>
<% end if %><!--webbot bot="HTMLMarkup" endspan --></font></td>
    <td width="60" align="center" height="16" valign="middle"><font face="Arial"><!--webbot
    bot="HTMLMarkup" startspan --><% if session("lvl") >= "3" then %>
<a href="default1.asp?sort=klasse"><font
face="Arial" color="#000000"><small>Klasse</small></font></a>
<% Else %>
<small><font face="Arial">Klasse</font></small>
<% end if %><!--webbot bot="HTMLMarkup" endspan --></font></td>
    <td width="56" align="center" height="16" valign="middle"><font face="Arial"><!--webbot
    bot="HTMLMarkup" startspan --><% if session("lvl") >= "3" then %>
<a href="default1.asp?sort=samlet"><font
face="Arial" color="#000000"><small>Samlet</small></font></a>
<% Else %>
<small><font face="Arial">Samlet</font></small>
<% end if %><!--webbot bot="HTMLMarkup" endspan --></font></td>
    <td width="58" align="center" height="16" valign="middle"><font face="Arial"><!--webbot
    bot="HTMLMarkup" startspan --><% if session("lvl") >= "3" then %>
<a href="default1.asp?sort=patter"><font
face="Arial" color="#000000"><small>Patter</small></font></a>
<% Else %>
<small><font face="Arial">Patter</font></small>
<% end if %><!--webbot bot="HTMLMarkup" endspan --></font></td>
    <td width="58" align="center" height="16" valign="middle"><font face="Arial"><!--webbot
    bot="HTMLMarkup" startspan --><% if session("lvl") >= "3" then %>
<a href="default1.asp?sort=roev"><font
face="Arial" color="#000000"><small>Røv</small></font></a>
<% Else %>
<small><font face="Arial">Røv</font></small>
<% end if %><!--webbot bot="HTMLMarkup" endspan --></font></td>
    <td width="58" align="center" height="16" valign="middle"><font face="Arial"><!--webbot
    bot="HTMLMarkup" startspan --><% if session("lvl") >= "3" then %>
<a href="default1.asp?sort=krop"><font
face="Arial" color="#000000"><small>Krop</small></font></a>
<% Else %>
<small><font face="Arial">Krop</font></small>
<% end if %><!--webbot bot="HTMLMarkup" endspan --></font></td>
    <td width="59" align="center" height="16" valign="middle"><font face="Arial"><!--webbot
    bot="HTMLMarkup" startspan --><% if session("lvl") >= "3" then %>
<a href="default1.asp?sort=cme"><font
face="Arial" color="#000000"><small>Charme</small></font></a>
<% Else %>
<small><font face="Arial">Charme</font></small>
<% end if %><!--webbot bot="HTMLMarkup" endspan --></font></td>
    <td width="59" align="center" height="16" valign="middle"><font face="Arial"><!--webbot
    bot="HTMLMarkup" startspan --><% if session("lvl") >= "3" then %>
<a href="default1.asp?sort=aksp"><font
face="Arial" color="#000000"><small>AKSP</small></font></a>
<% Else %>
<small><font face="Arial">AKSP</font></small>
<% end if %><!--webbot bot="HTMLMarkup" endspan --></font></td>
    <td width="164" align="center" height="16" valign="middle"><font face="Arial"><!--webbot
    bot="HTMLMarkup" startspan --><% if session("lvl") >= "3" then %>
<small><font face="Arial">Kommentar</font></small>
<% Else %>
<small><font face="Arial">Kommentar</font></small>
<% end if %><!--webbot bot="HTMLMarkup" endspan --></font></td>
    </strong>
  </tr>
  <tr>
    <strong><td width="68" height="19" align="center"><!--webbot bot="HTMLMarkup" startspan --><% if session("lvl") >= "3" then %>
<% if rs("billede") <> "" then
response.write "<a href=""?billede=" & rs("id") & """><img border=""1"" src=""" & rs("billede") & """ width=""10"" height=""10"" style=""color: rgb(0,0,0); border: 1px solid rgb(0,0,0)""></a>"%>
<%else%>
<small><font
    face="Arial">Intet</font></small>
<%end if%>
<% Else %>
<small><font
    face="Arial">Intet</font></small>
<% end if %><!--webbot
    bot="HTMLMarkup" endspan --></td>
    <td width="229" height="19" align="center"><p align="left"><small><font face="Arial"><%if session("lvl") >= "3" then
if rs("mellemnavn") = null then
strNavn = rs("fornavn") & " " & rs("efternavn")
else
strNavn = rs("fornavn") & " " & rs("mellemnavn") & " " & rs("efternavn")
end if
response.write strNavn
else
response.write(rs("efternavn"))
end if%></font></small></td>
    <td width="58" height="19" align="center"><small><font face="Arial"><!--webbot
    bot="HTMLMarkup" startspan --><% if session("lvl") >= "2" then %>
<% if rs("alder") = 0 then
response.write "Ukendt"
else
response.write(rs("alder"))
end if%>
<% Else %>
<% Response.Write "X" %>
<% end if %><!--webbot bot="HTMLMarkup" endspan --></font></small></td>
    <td width="60" height="19" align="center"><small><font face="Arial"><!--webbot
    bot="HTMLMarkup" startspan --><% if session("lvl") >= "3" then %>
<% =rs("klasse")%>
<% Else %>
<% Response.Write "X" %>
<% end if %><!--webbot bot="HTMLMarkup" endspan --></font></small></td>
    <td width="56" height="19" align="center"><small><font face="Arial"><!--webbot
    bot="HTMLMarkup" startspan --><% if session("lvl") >= "3" then %>
<% =rs("samlet")%>
<% Else %>
<% Response.Write "X" %>
<% end if %><!--webbot bot="HTMLMarkup" endspan --></font></small></td>
    <td width="58" height="19" align="center"><small><font face="Arial"><!--webbot
    bot="HTMLMarkup" startspan --><% if session("lvl") >= "3" then %>
<% =rs("patter")%>
<% Else %>
<% Response.Write "X" %>
<% end if %><!--webbot bot="HTMLMarkup" endspan --></font></small></td>
    <td width="58" height="19" align="center"><small><font face="Arial"><!--webbot
    bot="HTMLMarkup" startspan --><% if session("lvl") >= "3" then %>
<% =rs("roev")%>
<% Else %>
<% Response.Write "X" %>
<% end if %><!--webbot bot="HTMLMarkup" endspan --></font></small></td>
    <td width="58" height="19" align="center"><small><font face="Arial"><!--webbot
    bot="HTMLMarkup" startspan --><% if session("lvl") >= "3" then %>
<% =rs("krop")%>
<% Else %>
<% Response.Write "X" %>
<% end if %><!--webbot bot="HTMLMarkup" endspan --></font></small></td>
    <td width="59" height="19" align="center"><small><font face="Arial"><!--webbot
    bot="HTMLMarkup" startspan --><% if session("lvl") >= "3" then %>
<% =rs("cme")%>
<% Else %>
<% Response.Write "X" %>
<% end if %><!--webbot bot="HTMLMarkup" endspan --></font></small></td>
    <td width="59" height="19" align="center"><small><font face="Arial"><!--webbot
    bot="HTMLMarkup" startspan --><% if session("lvl") >= "3" then %>
<% if rs("aksp") = 0 then
response.write "Ukendt"
else
response.write(rs("aksp"))
end if%>
<% Else %>
<% Response.Write "X" %>
<% end if %><!--webbot bot="HTMLMarkup" endspan --></font></small></td>
    <td width="164" height="19" align="center"><p align="left"><font face="Arial"><a
    href="file:///C:/DOCUME~1/MARKMI~1/LOCALS~1/Temp/default1.asp?id=<%=rs("id")%>"
    style="color: rgb(0,0,0)"><!--webbot bot="HTMLMarkup" startspan --><% if session("lvl") >= "3" then %>
<small><font face="Arial"><span
style="color: rgb(0,0,0)"><%=left(rs("kommentar"),20)%></span></font></small>
<% Else %>
<% Response.Write "" %>
<% end if %><!--webbot
    bot="HTMLMarkup" endspan --></a></font></td>
    </strong>
  </tr>
</table>
</center></div>
</body>
</html>

Hvordan kan jeg lave det sådan at samlet fra forespørgslen looper med det andet ?
Avatar billede no_doubt Nybegynder
16. oktober 2002 - 09:01 #1
nogen der evt. ville kunne hjælpe med denne ?
Avatar billede ras2000 Nybegynder
16. oktober 2002 - 10:08 #2
Der hvor du skriver <% =rs("samlet")%> skal det ikke være gennemsnittet af roev, patter, krop, og cme?
Jeg går ud fra at det er det samme som i http://www.eksperten.dk/spm/267861.
Du kan i stedet for <% =rs("samlet")%> skrive
<% = (rs(roev) + rs(patter) + rs(krop) + rs(cme))/4 %>
Avatar billede ras2000 Nybegynder
16. oktober 2002 - 10:09 #3
svar
Avatar billede no_doubt Nybegynder
16. oktober 2002 - 10:10 #4
Nej jeg for det fra en forespørgsel. Men hvordan jeg inden i midten af mit loop, laver et andet loop der kalder forspørgsel, er problemet.
Avatar billede ras2000 Nybegynder
16. oktober 2002 - 10:12 #5
Jeg ville samle de to forespørgsler til en. Hvordan ser de to forespørgsler ud?
Avatar billede no_doubt Nybegynder
16. oktober 2002 - 10:13 #6
der en forespørgsel, der ligge noget fra tabellen sammen og laver gennemsnittet i selve databasen. Men hvordan kan jeg inde mit i loopet få det ud.
Avatar billede no_doubt Nybegynder
16. oktober 2002 - 10:14 #7
først kommer kaldet til barometer til noget af de først rs'es derefter skal der kaldes til samlet (forespørgslen) og derefter igen til barometer, og det er hele løkken igennem.
Avatar billede ras2000 Nybegynder
16. oktober 2002 - 10:20 #8
En forespørgsel i denne sammenhæng her sql="select * from tabelnavn where betingelse order by id" De forespørgsler du laver i access kan du ikke bruge. Hvis du absolut vil bruge den forespørgsel du har lavet i access, så kan du åbne den, og i visning vælge sql, så får du koden for den. Den kan du så kalde. Men jeg tror altså du laver det meget mere vanskeligt for digselv end det behøver at være.
Har du prøvet mit første forslag? Det skulle jo virke.
Avatar billede no_doubt Nybegynder
16. oktober 2002 - 10:21 #9
ja problemet i din er at jeg ikke kan sortere så
Avatar billede no_doubt Nybegynder
16. oktober 2002 - 10:23 #10
SELECT [barometer].[id], [patter], [barometer].[roev], [barometer].[krop], [barometer].[cme], Sum([barometer]![patter]+[barometer]![roev]+[barometer]![krop]+[barometer]![cme])/4 AS samlet
FROM barometer
GROUP BY [barometer].[id], [barometer].[patter], [barometer].[roev], [barometer].[krop], [barometer].[cme];

Denne er min sql i databasens forespørgsel, men kan man ikke gøre noget ud fra den
Avatar billede ras2000 Nybegynder
16. oktober 2002 - 10:30 #11
Først ville jeg ændre hele denne smøre:
if order = "alder" then
strSQL = "Select * From barometer order by alder DESC"
elseif order = "samlet" then
strSQL = "Select * From barometer order by samlet DESC"
elseif order = "patter" then
strSQL = "Select * From barometer order by patter DESC"
elseif order = "roev" then
strSQL = "Select * From barometer order by roev DESC"
elseif order = "krop" then
strSQL = "Select * From barometer order by krop DESC"
elseif order = "charme" then
strSQL = "Select * From barometer order by cme DESC"
elseif order = "klasse" then
strSQL = "Select * From barometer order by klasse ASC"
elseif order = "fornavn" then
strSQL = "Select * From barometer order by fornavn ASC"
elseif order = "mellemnavn" then
strSQL = "Select * From barometer order by mellemnavn ASC"
elseif order = "efternavn" then
strSQL = "Select * From barometer order by efternavn ASC"
elseif order = "aksp" then
strSQL = "Select * From barometer order by aksp DESC"
else
strSQL = "select * from barometer"
end if
til :
if not isnull(order) then
sql = "Select *, Sum([barometer].[patter]+[barometer].[roev]+[barometer].[krop]+[barometer].[cme])/4 AS samlet From barometer Order by " & order & " DESC"
else
sql = "Select *, Sum([barometer].[patter]+[barometer].[roev]+[barometer].[krop]+[barometer].[cme])/4 AS samlet From barometer"
end if
Så skal du lave denne her om
<a href="default1.asp?sort=cme">
til
<a href="default1.asp?sort=charme">
og der hvor du vil have at den skal sortere efter samlet skal du lave en lappeløsning, men den kan vi lige tge, når du får det her til at virke.-
Avatar billede no_doubt Nybegynder
16. oktober 2002 - 14:50 #12
det er jo bare kaldet til forespørgsmlen samlet og kolonnen samlet jeg skal have ind i loopet
Avatar billede no_doubt Nybegynder
16. oktober 2002 - 15:28 #13
er der iikke nogen der er med
først kommer der start på loop
<% do while not rs.EOF %>
Derefter en masse udtræk fra tabellen barometer
Men så i  loopet skal der trækkes noget ud fra forespørgslen, ( http://www.1q.frip.dk/test.asp )
Derefter kommer der nogen flere udtræk fra tabellen barometer
og afsluttes selvfølgelig med
<% rs.movenext %>
<%loop %>
Avatar billede no_doubt Nybegynder
18. oktober 2002 - 00:22 #14
kan da smide 5 mere i som desperat forsøg
Avatar billede no_doubt Nybegynder
18. oktober 2002 - 01:42 #15
lukker ved sådan set ik hvad jeg gør
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