Avatar billede no_doubt Nybegynder
09. oktober 2006 - 14:53 Der er 23 kommentarer og
1 løsning

distinct og order by sum

Jeg har en database med f.eks
betjentaf    -      dato        - pris
MM                09-10-2006        1000,00
MM                09-10-2006        500,00
MM                09-09-2006        250,00
LL                09-10-2006        2000,00
LL                09-10-2006        755,00
LL                09-10-2006          13,00
LL                09-11-2006          25,00

Kan det nu lade sig gøre at få et output der ser sådan ud, hvis request.querystring("md") = 10

MM                2 betalinger      1500,00
LL                3 betalinger      2768,00

???
Avatar billede no_doubt Nybegynder
09. oktober 2006 - 15:01 #1
outputtet skal selvf. være
LL                3 betalinger      2768,00
MM                2 betalinger      1500,00
Avatar billede no_doubt Nybegynder
09. oktober 2006 - 15:04 #2
prøver lige at formulere det bedre.
er det muligt at lave en select af en enkelt måned, lave en sum af prisen og sortere efter betjentaf så outputtet f.eks. ser sådan her ud
Avatar billede nielle Nybegynder
09. oktober 2006 - 18:54 #3
Prøv dette her:

SELECT betjentaf, count(*) AS antalBetalinger, sum(pris) AS totalPris
FROM dinTabel
WHERE year(dato) = 2006 AND month(dato) = 10
GROUP BY betjentAf
Avatar billede no_doubt Nybegynder
09. oktober 2006 - 19:07 #4
Kunne du ikke se om du kan finde fejlen i denne: http://www.firmdesign.dk/e/help2/test3.asp?sort=sammenligning
Avatar billede no_doubt Nybegynder
09. oktober 2006 - 19:08 #5
den kode der har sammenligningstallet 2 bliver kun hentet en gang
Avatar billede nielle Nybegynder
09. oktober 2006 - 19:16 #6
Jeg har nok en bedre chance hvis du poster din kode.
Avatar billede no_doubt Nybegynder
09. oktober 2006 - 19:17 #7
Avatar billede nielle Nybegynder
09. oktober 2006 - 19:22 #8
Nu er koden jo ikke større end at du lige så godt kan poste den her. Så har andre også en mulighed for at lære noget af dette spørgsmål:

<% if request.querystring("sort") = "sammenligning" then %>
<br>
<p align="center">
<select onchange="location.href=this.value;" size="1" name="md1">
<option>Vælg måned</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=01&md2=<%=request.querystring("md2")%>">Januar</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=02&md2=<%=request.querystring("md2")%>">Februar</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=03&md2=<%=request.querystring("md2")%>">Marts</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=04&md2=<%=request.querystring("md2")%>">April</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=05&md2=<%=request.querystring("md2")%>">Maj</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=06&md2=<%=request.querystring("md2")%>">Juni</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=07&md2=<%=request.querystring("md2")%>">Juli</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=08&md2=<%=request.querystring("md2")%>">August</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=09&md2=<%=request.querystring("md2")%>">September</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=10&md2=<%=request.querystring("md2")%>">Oktober</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=11&md2=<%=request.querystring("md2")%>">November</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=12&md2=<%=request.querystring("md2")%>">December</option>
</select> /
<select onchange="location.href=this.value;" size="1" name="md2">
<option>Vælg måned</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=request.querystring("md1")%>&md2=01">Januar</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=request.querystring("md1")%>&md2=02">Februar</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=request.querystring("md1")%>&md2=03">Marts</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=request.querystring("md1")%>&md2=04">April</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=request.querystring("md1")%>&md2=05">Maj</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=request.querystring("md1")%>&md2=06">Juni</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=request.querystring("md1")%>&md2=07">Juli</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=request.querystring("md1")%>&md2=08">August</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=request.querystring("md1")%>&md2=09">September</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=request.querystring("md1")%>&md2=10">Oktober</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=request.querystring("md1")%>&md2=11">November</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=request.querystring("md1")%>&md2=12">December</option>
</select>
<br>
<b><font face="Arial" size="2">
<% if request.querystring("md1") = 01 then response.write "Januar" end if %>
<% if request.querystring("md1") = 02 then response.write "Februar" end if %>
<% if request.querystring("md1") = 03 then response.write "Marts" end if %>
<% if request.querystring("md1") = 04 then response.write "April" end if %>
<% if request.querystring("md1") = 05 then response.write "Maj" end if %>
<% if request.querystring("md1") = 06 then response.write "Juni" end if %>
<% if request.querystring("md1") = 07 then response.write "Juli" end if %>
<% if request.querystring("md1") = 08 then response.write "August" end if %>
<% if request.querystring("md1") = 09 then response.write "September" end if %>
<% if request.querystring("md1") = 10 then response.write "Oktober" end if %>
<% if request.querystring("md1") = 11 then response.write "November" end if %>
<% if request.querystring("md1") = 12 then response.write "December" end if %>
/
<% if request.querystring("md2") = 01 then response.write "Januar" end if %>
<% if request.querystring("md2") = 02 then response.write "Februar" end if %>
<% if request.querystring("md2") = 03 then response.write "Marts" end if %>
<% if request.querystring("md2") = 04 then response.write "April" end if %>
<% if request.querystring("md2") = 05 then response.write "Maj" end if %>
<% if request.querystring("md2") = 06 then response.write "Juni" end if %>
<% if request.querystring("md2") = 07 then response.write "Juli" end if %>
<% if request.querystring("md2") = 08 then response.write "August" end if %>
<% if request.querystring("md2") = 09 then response.write "September" end if %>
<% if request.querystring("md2") = 10 then response.write "Oktober" end if %>
<% if request.querystring("md2") = 11 then response.write "November" end if %>
<% if request.querystring("md2") = 12 then response.write "December" end if %>
</font></b>
<%
if request.querystring("md1") <> "" AND request.querystring("md2") <> "" then
%>
<%
Set conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("db.mdb")
sql = "SELECT betjentaf, COUNT(*) as Antal, SUM(pris) as totalpris FROM ordre WHERE MONTH(dato) = " & request.querystring("md1") &" GROUP BY betjentaf order by SUM(pris) desc;"
set rs = Conn.Execute(sql)
sql3 = "SELECT betjentaf, COUNT(*) as Antal, SUM(pris) as totalpris FROM ordre WHERE MONTH(dato) = " & request.querystring("md2") &" GROUP BY betjentaf order by SUM(pris) desc;"
set rs3 = Conn.Execute(sql3)
%>
<br>
</p>
<div align="center">
<table border="0" width="66%">
    <tr>
        <td align="center" style="border-style: solid; border-width: 1px; padding-left: 0px; padding-right: 0px; padding-top: 1px; padding-bottom: 1px" bordercolor="#000000">
        <b>
        <font face="Arial" size="2">Ansat</font></b></td>
        <td align="center" style="border-style: solid; border-width: 1px; padding-left: 0px; padding-right: 0px; padding-top: 1px; padding-bottom: 1px" bordercolor="#000000">
        <b>
        <font face="Arial" size="2">Antal kunder</font></b></td>
        <td width="227" align="center" style="border-style: solid; border-width: 1px; padding-left: 0px; padding-right: 0px; padding-top: 1px; padding-bottom: 1px" bordercolor="#000000">
        <b>
        <font face="Arial" size="2">Beløb</font></b></td>
    </tr>
    <% do while not rs.EOF %>
    <%
    Sql2 = "select * from ansatte where mid = '" & rs("betjentaf") & "'"
    Set rs2 = Conn.Execute(sql2)
    %>
    <tr>
        <td style="border-style: dashed; border-width: 1px" bordercolor="#000000">
        <% if rs("totalpris") > rs3("totalpris") then%><font face="Arial" size="2" color="#008000"><%=rs2("navn")%></font><% end if %>
        <% if rs("totalpris") = rs3("totalpris") then%><font face="Arial" size="2" color="#000000"><%=rs2("navn")%></font><% end if %>
        <% if rs("totalpris") < rs3("totalpris") then%><font face="Arial" size="2" color="#FF0000"><%=rs2("navn")%></font><% end if %>
        </td>
        <td align="right" style="border-style: dashed; border-width: 1px" bordercolor="#000000">
        <font face="Arial" size="2"><%=rs("Antal") & " kunde(r)"%> / <%=rs3("Antal") & " kunde(r)"%></font></td>
        <td align="right" width="225" style="border-style: dashed; border-width: 1px" bordercolor="#000000">
        <font face="Arial" size="2"><%=formatnumber(rs("totalpris"),2) & " DKK"%> / <%=formatnumber(rs3("totalpris"),2) & " DKK"%></font></td>
    </tr>
    <%
    rs.movenext
    loop
    %>
    </table>
    </div>
    <p align="center">
    <% else %>
    <b><font face="Arial" size="2">
    <br>
    <br>
    Vælg sammenligningsgrundlag
    </font></b>
    <% end if %><% end if %>
Avatar billede nielle Nybegynder
09. oktober 2006 - 19:22 #9
Kigger på det.
Avatar billede no_doubt Nybegynder
09. oktober 2006 - 19:26 #10
okay, det er som om den ikke tager rs3("totalpris") med andet end EN gang
Avatar billede no_doubt Nybegynder
09. oktober 2006 - 19:26 #11
desuden melder den fejl hvis der ikke er noget at sammenligne med, hvis du kan trylle den væk må du gerne det også :-)
Avatar billede nielle Nybegynder
09. oktober 2006 - 19:58 #12
Prøv lige med denne reviderede version af koden:

<%
If Request.QueryString("sort") = "sammenligning" Then
%>
<br>
<p align="center">
<select onchange="location.href=this.value;" size="1" name="md1">
<option>Vælg måned</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=01&md2=<%=Request.QueryString("md2")%>">Januar</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=02&md2=<%=Request.QueryString("md2")%>">Februar</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=03&md2=<%=Request.QueryString("md2")%>">Marts</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=04&md2=<%=Request.QueryString("md2")%>">April</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=05&md2=<%=Request.QueryString("md2")%>">Maj</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=06&md2=<%=Request.QueryString("md2")%>">Juni</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=07&md2=<%=Request.QueryString("md2")%>">Juli</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=08&md2=<%=Request.QueryString("md2")%>">August</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=09&md2=<%=Request.QueryString("md2")%>">September</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=10&md2=<%=Request.QueryString("md2")%>">Oktober</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=11&md2=<%=Request.QueryString("md2")%>">November</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=12&md2=<%=Request.QueryString("md2")%>">December</option>
</select>
/
<select onchange="location.href=this.value;" size="1" name="md2">
<option>Vælg måned</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=Request.QueryString("md1")%>&md2=01">Januar</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=Request.QueryString("md1")%>&md2=02">Februar</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=Request.QueryString("md1")%>&md2=03">Marts</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=Request.QueryString("md1")%>&md2=04">April</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=Request.QueryString("md1")%>&md2=05">Maj</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=Request.QueryString("md1")%>&md2=06">Juni</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=Request.QueryString("md1")%>&md2=07">Juli</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=Request.QueryString("md1")%>&md2=08">August</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=Request.QueryString("md1")%>&md2=09">September</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=Request.QueryString("md1")%>&md2=10">Oktober</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=Request.QueryString("md1")%>&md2=11">November</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=Request.QueryString("md1")%>&md2=12">December</option>
</select>
<br>
<b><font face="Arial" size="2">
<%
    Select Case Request.QueryString("md1")
        Case 01 Response.Write "Januar"
        Case 02 Response.Write "Februar"
        Case 03 Response.Write "Marts"
        Case 04 Response.Write "April"
        Case 05 Response.Write "Maj"
        Case 06 Response.Write "Juni"
        Case 07 Response.Write "Juli"
        Case 08 Response.Write "August"
        Case 09 Response.Write "September"
        Case 10 Response.Write "Oktober"
        Case 11 Response.Write "November"
        Case 12 Response.Write "December"
    End Select
%>
/
<%
    Select Case Request.QueryString("md2")
        Case 01 Response.Write "Januar"
        Case 02 Response.Write "Februar"
        Case 03 Response.Write "Marts"
        Case 04 Response.Write "April"
        Case 05 Response.Write "Maj"
        Case 06 Response.Write "Juni"
        Case 07 Response.Write "Juli"
        Case 08 Response.Write "August"
        Case 09 Response.Write "September"
        Case 10 Response.Write "Oktober"
        Case 11 Response.Write "November"
        Case 12 Response.Write "December"
    End Select
%>
</font></b>
<%
    If Request.QueryString("md1") <> "" And Request.QueryString("md2") <> "" Then
        Set conn = Server.CreateObject("ADODB.Connection")
        conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("db.mdb")

        sql = _
        "SELECT betjentAf, count(*) AS antal, sum(pris) AS totalPris " & _
        "FROM ordre " & _
        "WHERE month(dato) = " & Request.QueryString("md1") & " " & _
        "GROUP BY betjentAf " & _
        "ORDER BY totalPris DESC"

        Set rs = Conn.Execute(sql)

        sql3 = _
        "SELECT betjentAf, count(*) AS antal, sum(pris) AS totalPris " & _
        "FROM ordre " & _
        "WHERE month(dato) = " & Request.QueryString("md2") & " " & _
        "GROUP BY betjentAf " & _
        "ORDER BY totalPris DESC"

        Set rs3 = Conn.Execute(sql3)
%>
<br>
</p>
<div align="center">
<table border="0" width="66%">
    <tr>
        <td align="center" style="border-style: solid; border-width: 1px; padding-left: 0px; padding-right: 0px; padding-top: 1px; padding-bottom:

1px" bordercolor="#000000">
        <b>
        <font face="Arial" size="2">Ansat</font></b></td>
        <td align="center" style="border-style: solid; border-width: 1px; padding-left: 0px; padding-right: 0px; padding-top: 1px; padding-bottom:

1px" bordercolor="#000000">
        <b>
        <font face="Arial" size="2">Antal kunder</font></b></td>
        <td width="227" align="center" style="border-style: solid; border-width: 1px; padding-left: 0px; padding-right: 0px; padding-top: 1px;

padding-bottom: 1px" bordercolor="#000000">
        <b>
        <font face="Arial" size="2">Beløb</font></b></td>
    </tr>
<%
        Do While Not rs.EOF
            sql2 = "SELECT * FROM ansatte WHERE mid = '" & rs("betjentAf") & "'"
            Set rs2 = conn.Execute(sql2)
%>
    <tr>
        <td style="border-style: dashed; border-width: 1px" bordercolor="#000000">
<%
            If rs("totalPris") > rs3("totalPris") Then
%>
<font face="Arial" size="2" color="#008000"><%=rs2("navn")%></font>
<%
            ElseIf rs("totalpris") = rs3("totalpris") Then
%>
<font face="Arial" size="2" color="#000000"><%=rs2("navn")%></font>
<%
            Else
%>
<font face="Arial" size="2" color="#FF0000"><%=rs2("navn")%></font>
<%
            End If
%>
        </td>
        <td align="right" style="border-style: dashed; border-width: 1px" bordercolor="#000000">
        <font face="Arial" size="2"><%=rs("antal")%> kunde(r) / <%=rs3("antal")%> kunde(r)</font></td>
        <td align="right" width="225" style="border-style: dashed; border-width: 1px" bordercolor="#000000">
        <font face="Arial" size="2"><%=FormatNumber(rs("totalPris"), 2)%> DKK / <%=FormatNumber(rs3("totalPris"), 2)%> DKK</font></td>
    </tr>
<%
            rs.MoveNext
        Loop
%>
    </table>
    </div>
    <p align="center">
<%
    Else
%>
    <b><font face="Arial" size="2">
    <br>
    <br>
    Vælg sammenligningsgrundlag
    </font></b>
<%
    End If
End If
%>
Avatar billede no_doubt Nybegynder
09. oktober 2006 - 20:08 #13
den ligger der nu...og melder fejl
Avatar billede nielle Nybegynder
09. oktober 2006 - 20:35 #14
Har du noget kode liggende før det jeg har postet? Jeg kan ikke lige se hvordan den ellers skulle fejle i linje 57?
Avatar billede nielle Nybegynder
09. oktober 2006 - 20:40 #15
Prøv lige disse smårettelser:

<%
If Request.QueryString("sort") = "sammenligning" Then
%>
<br>
<p align="center">
<select onchange="location.href=this.value;" size="1" name="md1">
<option>Vælg måned</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=01&md2=<%=Request.QueryString("md2")%>">Januar</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=02&md2=<%=Request.QueryString("md2")%>">Februar</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=03&md2=<%=Request.QueryString("md2")%>">Marts</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=04&md2=<%=Request.QueryString("md2")%>">April</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=05&md2=<%=Request.QueryString("md2")%>">Maj</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=06&md2=<%=Request.QueryString("md2")%>">Juni</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=07&md2=<%=Request.QueryString("md2")%>">Juli</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=08&md2=<%=Request.QueryString("md2")%>">August</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=09&md2=<%=Request.QueryString("md2")%>">September</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=10&md2=<%=Request.QueryString("md2")%>">Oktober</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=11&md2=<%=Request.QueryString("md2")%>">November</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=12&md2=<%=Request.QueryString("md2")%>">December</option>
</select>
/
<select onchange="location.href=this.value;" size="1" name="md2">
<option>Vælg måned</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=Request.QueryString("md1")%>&md2=01">Januar</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=Request.QueryString("md1")%>&md2=02">Februar</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=Request.QueryString("md1")%>&md2=03">Marts</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=Request.QueryString("md1")%>&md2=04">April</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=Request.QueryString("md1")%>&md2=05">Maj</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=Request.QueryString("md1")%>&md2=06">Juni</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=Request.QueryString("md1")%>&md2=07">Juli</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=Request.QueryString("md1")%>&md2=08">August</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=Request.QueryString("md1")%>&md2=09">September</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=Request.QueryString("md1")%>&md2=10">Oktober</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=Request.QueryString("md1")%>&md2=11">November</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=Request.QueryString("md1")%>&md2=12">December</option>
</select>
<br>
<b><font face="Arial" size="2">
<%
    Select Case "" & Request.QueryString("md1")
        Case 01 Response.Write "Januar"
        Case 02 Response.Write "Februar"
        Case 03 Response.Write "Marts"
        Case 04 Response.Write "April"
        Case 05 Response.Write "Maj"
        Case 06 Response.Write "Juni"
        Case 07 Response.Write "Juli"
        Case 08 Response.Write "August"
        Case 09 Response.Write "September"
        Case 10 Response.Write "Oktober"
        Case 11 Response.Write "November"
        Case 12 Response.Write "December"
    End Select
%>
/
<%
    Select Case "" & Request.QueryString("md2")
        Case 01 Response.Write "Januar"
        Case 02 Response.Write "Februar"
        Case 03 Response.Write "Marts"
        Case 04 Response.Write "April"
        Case 05 Response.Write "Maj"
        Case 06 Response.Write "Juni"
        Case 07 Response.Write "Juli"
        Case 08 Response.Write "August"
        Case 09 Response.Write "September"
        Case 10 Response.Write "Oktober"
        Case 11 Response.Write "November"
        Case 12 Response.Write "December"
    End Select
%>
</font></b>
<%
    If Request.QueryString("md1") <> "" And Request.QueryString("md2") <> "" Then
        Set conn = Server.CreateObject("ADODB.Connection")
        conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("db.mdb")

        sql = _
        "SELECT betjentAf, count(*) AS antal, sum(pris) AS totalPris " & _
        "FROM ordre " & _
        "WHERE month(dato) = " & Request.QueryString("md1") & " " & _
        "GROUP BY betjentAf " & _
        "ORDER BY sum(pris) DESC"

        Response.Write "DEBUG (md1): " & sql & "<br>"
        Set rs = Conn.Execute(sql)

        sql3 = _
        "SELECT betjentAf, count(*) AS antal, sum(pris) AS totalPris " & _
        "FROM ordre " & _
        "WHERE month(dato) = " & Request.QueryString("md2") & " " & _
        "GROUP BY betjentAf " & _
        "ORDER BY sum(pris) DESC"

        Response.Write "DEBUG (md2): " & sql3 & "<br>"
        Set rs3 = Conn.Execute(sql3)
%>
<br>
</p>
<div align="center">
<table border="0" width="66%">
    <tr>
        <td align="center" style="border-style: solid; border-width: 1px; padding-left: 0px; padding-right: 0px; padding-top: 1px; padding-bottom: 1px" bordercolor="#000000">
        <b>
        <font face="Arial" size="2">Ansat</font></b></td>
        <td align="center" style="border-style: solid; border-width: 1px; padding-left: 0px; padding-right: 0px; padding-top: 1px; padding-bottom: 1px" bordercolor="#000000">
        <b>
        <font face="Arial" size="2">Antal kunder</font></b></td>
        <td width="227" align="center" style="border-style: solid; border-width: 1px; padding-left: 0px; padding-right: 0px; padding-top: 1px; padding-bottom: 1px" bordercolor="#000000">
        <b>
        <font face="Arial" size="2">Beløb</font></b></td>
    </tr>
<%
        Do While Not rs.EOF
            sql2 = "SELECT * FROM ansatte WHERE mid = '" & rs("betjentAf") & "'"
            Set rs2 = conn.Execute(sql2)
%>
    <tr>
        <td style="border-style: dashed; border-width: 1px" bordercolor="#000000">
<%
            If rs("totalPris") > rs3("totalPris") Then
%>
<font face="Arial" size="2" color="#008000"><%=rs2("navn")%></font>
<%
            ElseIf rs("totalpris") = rs3("totalpris") Then
%>
<font face="Arial" size="2" color="#000000"><%=rs2("navn")%></font>
<%
            Else
%>
<font face="Arial" size="2" color="#FF0000"><%=rs2("navn")%></font>
<%
            End If
%>
        </td>
        <td align="right" style="border-style: dashed; border-width: 1px" bordercolor="#000000">
        <font face="Arial" size="2"><%=rs("antal")%> kunde(r) / <%=rs3("antal")%> kunde(r)</font></td>
        <td align="right" width="225" style="border-style: dashed; border-width: 1px" bordercolor="#000000">
        <font face="Arial" size="2"><%=FormatNumber(rs("totalPris"), 2)%> DKK / <%=FormatNumber(rs3("totalPris"), 2)%> DKK</font></td>
    </tr>
<%
            rs.MoveNext
        Loop
%>
    </table>
    </div>
    <p align="center">
<%
    Else
%>
    <b><font face="Arial" size="2">
    <br>
    <br>
    Vælg sammenligningsgrundlag
    </font></b>
<%
    End If
End If
%>
Avatar billede no_doubt Nybegynder
09. oktober 2006 - 20:53 #16
nu ligger den overstående version oppe
Avatar billede nielle Nybegynder
09. oktober 2006 - 21:06 #17
Ja-j, vi skal nok nå det :^)

<%
If Request.QueryString("sort") = "sammenligning" Then

    md1 = "" & Request.QueryString("md1")
    md2 = "" & Request.QueryString("md2")
%>
<br>
<p align="center">
<select onchange="location.href=this.value;" size="1" name="md1">
<option>Vælg måned</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=01&md2=<%=md2%>">Januar</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=02&md2=<%=md2%>">Februar</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=03&md2=<%=md2%>">Marts</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=04&md2=<%=md2%>">April</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=05&md2=<%=md2%>">Maj</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=06&md2=<%=md2%>">Juni</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=07&md2=<%=md2%>">Juli</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=08&md2=<%=md2%>">August</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=09&md2=<%=md2%>">September</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=10&md2=<%=md2%>">Oktober</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=11&md2=<%=md2%>">November</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=12&md2=<%=md2%>">December</option>
</select>
/
<select onchange="location.href=this.value;" size="1" name="md2">
<option>Vælg måned</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=md1%>&md2=01">Januar</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=md1%>&md2=02">Februar</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=md1%>&md2=03">Marts</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=md1%>&md2=04">April</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=md1%>&md2=05">Maj</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=md1%>&md2=06">Juni</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=md1%>&md2=07">Juli</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=md1%>&md2=08">August</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=md1%>&md2=09">September</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=md1%>&md2=10">Oktober</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=md1%>&md2=11">November</option>
<option value="test3.asp?vis=stats&sort=sammenligning&md1=<%=md1%>&md2=12">December</option>
</select>
<br>
<b><font face="Arial" size="2">
<%
    Select Case md1
        Case 01 Response.Write "Januar"
        Case 02 Response.Write "Februar"
        Case 03 Response.Write "Marts"
        Case 04 Response.Write "April"
        Case 05 Response.Write "Maj"
        Case 06 Response.Write "Juni"
        Case 07 Response.Write "Juli"
        Case 08 Response.Write "August"
        Case 09 Response.Write "September"
        Case 10 Response.Write "Oktober"
        Case 11 Response.Write "November"
        Case 12 Response.Write "December"
    End Select
%>
/
<%
    Select Case md2
        Case 01 Response.Write "Januar"
        Case 02 Response.Write "Februar"
        Case 03 Response.Write "Marts"
        Case 04 Response.Write "April"
        Case 05 Response.Write "Maj"
        Case 06 Response.Write "Juni"
        Case 07 Response.Write "Juli"
        Case 08 Response.Write "August"
        Case 09 Response.Write "September"
        Case 10 Response.Write "Oktober"
        Case 11 Response.Write "November"
        Case 12 Response.Write "December"
    End Select
%>
</font></b>
<%
    If md1 <> "" And md2 <> "" Then
        Set conn = Server.CreateObject("ADODB.Connection")
        conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("db.mdb")

        sql = _
        "SELECT betjentAf, count(*) AS antal, sum(pris) AS totalPris " & _
        "FROM ordre " & _
        "WHERE month(dato) = " & md1 & " " & _
        "GROUP BY betjentAf " & _
        "ORDER BY sum(pris) DESC"

        Response.Write "DEBUG (md1): " & sql & "<br>"
        Set rs = Conn.Execute(sql)

        sql3 = _
        "SELECT betjentAf, count(*) AS antal, sum(pris) AS totalPris " & _
        "FROM ordre " & _
        "WHERE month(dato) = " & md2 & " " & _
        "GROUP BY betjentAf " & _
        "ORDER BY sum(pris) DESC"

        Response.Write "DEBUG (md2): " & sql3 & "<br>"
        Set rs3 = Conn.Execute(sql3)
%>
<br>
</p>
<div align="center">
<table border="0" width="66%">
    <tr>
        <td align="center" style="border-style: solid; border-width: 1px; padding-left: 0px; padding-right: 0px; padding-top: 1px; padding-bottom: 1px" bordercolor="#000000">
        <b>
        <font face="Arial" size="2">Ansat</font></b></td>
        <td align="center" style="border-style: solid; border-width: 1px; padding-left: 0px; padding-right: 0px; padding-top: 1px; padding-bottom: 1px" bordercolor="#000000">
        <b>
        <font face="Arial" size="2">Antal kunder</font></b></td>
        <td width="227" align="center" style="border-style: solid; border-width: 1px; padding-left: 0px; padding-right: 0px; padding-top: 1px; padding-bottom: 1px" bordercolor="#000000">
        <b>
        <font face="Arial" size="2">Beløb</font></b></td>
    </tr>
<%
        Do While Not rs.EOF
            sql2 = "SELECT * FROM ansatte WHERE mid = '" & rs("betjentAf") & "'"
            Set rs2 = conn.Execute(sql2)
%>
    <tr>
        <td style="border-style: dashed; border-width: 1px" bordercolor="#000000">
<%
            If rs("totalPris") > rs3("totalPris") Then
%>
<font face="Arial" size="2" color="#008000"><%=rs2("navn")%></font>
<%
            ElseIf rs("totalpris") = rs3("totalpris") Then
%>
<font face="Arial" size="2" color="#000000"><%=rs2("navn")%></font>
<%
            Else
%>
<font face="Arial" size="2" color="#FF0000"><%=rs2("navn")%></font>
<%
            End If
%>
        </td>
        <td align="right" style="border-style: dashed; border-width: 1px" bordercolor="#000000">
        <font face="Arial" size="2"><%=rs("antal")%> kunde(r) / <%=rs3("antal")%> kunde(r)</font></td>
        <td align="right" width="225" style="border-style: dashed; border-width: 1px" bordercolor="#000000">
        <font face="Arial" size="2"><%=FormatNumber(rs("totalPris"), 2)%> DKK / <%=FormatNumber(rs3("totalPris"), 2)%> DKK</font></td>
    </tr>
<%
            rs.MoveNext
        Loop
%>
    </table>
    </div>
    <p align="center">
<%
    Else
%>
    <b><font face="Arial" size="2">
    <br>
    <br>
    Vælg sammenligningsgrundlag
    </font></b>
<%
    End If
End If
%>
Avatar billede no_doubt Nybegynder
09. oktober 2006 - 21:12 #18
så ligger den der...men stadig kun en rs3 der bliver brugt
Avatar billede nielle Nybegynder
09. oktober 2006 - 21:19 #19
Hvad mener de egentlig med det? Hvis jeg vælger September/September så får jeg tre rækker ud.
Avatar billede nielle Nybegynder
09. oktober 2006 - 21:20 #20
de -> du ... så formelle behøver vi heller ikke at være ;^)
Avatar billede no_doubt Nybegynder
09. oktober 2006 - 21:41 #21
ja, så skal de alle være sorte da du sammenligner 2 ens summer
Avatar billede nielle Nybegynder
09. oktober 2006 - 21:52 #22
Nej, det er ikke det koden gør:

Der er en loop som køre over rs, og den kommer igennem:

Jeppe Kirk med 1,588.00 DKK
Britt Mosegaard med 1,420.63 DKK
Mark Mikkelsen med 320.13 DKK

I hvert gennemløb at loop'en sammenlignes rs med *første* post i rs3 (denne bliver altid ved med at være på den første række da der kaldes nogen MoveNext for rs3 noget sted i koden).

rs3's første række er "Jeppe Kirk med 1,588.00 DKK" (når der vælges September / September), og derfor er det første beløb sort, men de to efterfølgende beløb er røde fordi at de er mindre end 1,588.00.
Avatar billede no_doubt Nybegynder
15. oktober 2006 - 17:45 #23
ligger nielle et svar ?
Avatar billede nielle Nybegynder
15. oktober 2006 - 18:20 #24
Så'gerne :^)
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