--- title: "Två räknefrågor" type: "forum-thread" url: "https://www.webforum.nu/amne/asp/77090-två-räknefrågor" topic: "ASP" topic_url: "https://www.webforum.nu/amne/asp" author: "magnusfeldth" published: "2003-05-15T18:30:02.000Z" updated: "2003-06-03T21:03:22.000Z" replies: 16 views: 546 page: 1 pages: 1 language: "sv-SE" site: "webForum — webforum.nu" rights: "Upphovsrätten till varje inlägg tillhör dess författare." attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/77090-två-räknefrågor" --- # Två räknefrågor ## #1 — magnusfeldth, 2003-05-15T18:30Z Jag har två kolumner i en tabell, vi kan kalla dem "NumberOfVotes" och "Votes". Hur skall jag skriva för att få ut kvoten mellan dem? Går det med ``` <% = recset("Votes") / ("NumberOfVotes") %> ``` ?? Fråga nummer två: Om jag vill sortera ut de top 5 med högst kvot, hur skriver jag då? Permalänk: https://www.webforum.nu/p/77090 ## #2 — Peeer, 2003-05-15T18:32Z ``` <% = recset("Votes") / recset("NumberOfVotes") %> ``` Permalänk: https://www.webforum.nu/p/1050215 ## #3 — magnusfeldth, 2003-05-15T18:33Z tjohoo jag hade rätt! vad glad jag blir! och på fråga nummer två svarar ni? Permalänk: https://www.webforum.nu/p/1050217 ## #4 — Peeer, 2003-05-15T18:37Z Det får du lösa i sql-satsen. ``` select top 5 Votes,NumberOfVotes,(Votes+0.0)/(NumberOfVotes + 0.0) as medel from tabell order by medel desc ``` Behöver jag säga att jag hittade svaret genom att söka bland LarsG's tidigare inlägg Permalänk: https://www.webforum.nu/p/1050223 ## #5 — magnusfeldth, 2003-05-15T18:39Z På den första frågan, hur skriver jag för att bara visa två gällande siffror? ex 5,0 eller 4,8?? Permalänk: https://www.webforum.nu/p/1050225 ## #6 — solbulle, 2003-05-15T18:40Z > **magnusfeldth skrev:** > > tjohoo jag hade rätt! vad glad jag blir! > ... Åfan! ;) Permalänk: https://www.webforum.nu/p/1050227 ## #7 — Peeer, 2003-05-15T18:41Z ``` <% = round(recset("Votes") / recset("NumberOfVotes"),1) %> ``` Permalänk: https://www.webforum.nu/p/1050230 ## #8 — magnusfeldth, 2003-06-03T14:14Z problem med satsen: ``` Set Connect = Server.CreateObject("ADODB.Connection") Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" &Server.MapPath("addemalmbergadmin/tubsockan.mdb") SQL2 = "select top 5 rekom,rekomvotes,(rekom+0.0)/(rekomvotes + 0.0) as medel from sockrates order by medel desc" set RecSet = connect.execute(SQL2) <------- rad 38 ``` felmess: ``` Microsoft OLE DB Provider for ODBC Drivers error '80040e10' [Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 1. /rekommenderas.asp, line 38 ``` Permalänk: https://www.webforum.nu/p/1073071 ## #9 — @nders, 2003-06-03T14:17Z Om man använder Access kan man inte sortera genom att ange namnet på sitt i frågan skapade fält, utan måste ange ordningsnumret, dvs **3** istället. mvh Permalänk: https://www.webforum.nu/p/1073074 ## #10 — Sebbe, 2003-06-03T14:17Z ``` SQL2 = "select top 5 rekom,rekomvotes,(rekom+0.0)/(rekomvotes + 0.0) as medel from sockrates order by 3 desc" ``` **/red** Tusan, **@nders**! ;) Permalänk: https://www.webforum.nu/p/1073075 ## #11 — magnusfeldth, 2003-06-03T15:03Z still trouble: ``` ADODB.Recordset error '800a0cc1' Item cannot be found in the collection corresponding to the requested name or ordinal. /rekommenderas.asp, line 41 ``` den verkar inte ta emot mina andra kolumner ex rubrik, kategori, id och ingress...? Permalänk: https://www.webforum.nu/p/1073118 ## #12 — @nders, 2003-06-03T15:32Z > **magnusfeldth skrev:** > > den verkar inte ta emot mina andra kolumner ex rubrik, kategori, id och ingress...? Nej, du hämtar ju bara rekom, rekomvotes och medel? Permalänk: https://www.webforum.nu/p/1073151 ## #13 — magnusfeldth, 2003-06-03T15:55Z ska jag skriva: ``` SQL2 = "select top 5 id, rubrik, kategori, id, ingress, rekom,rekomvotes,(rekom+0.0)/(rekomvotes + 0.0) as medel from sockrates order by 3 desc" ``` för att få med dem? eller gör den att även dessa räknas in i "medel"? Permalänk: https://www.webforum.nu/p/1073168 ## #14 — @nders, 2003-06-03T16:02Z Vadå räknas in i medel? Du kan ju alltid testa frågan istället för att fråga oss om den fungerar. Du bör dock inte ha med id två gånger i select-listan. Permalänk: https://www.webforum.nu/p/1073176 ## #15 — magnusfeldth, 2003-06-03T16:08Z "Du kan ju alltid testa frågan istället för att fråga oss om den fungerar. " \- jo, men jag är pendlande student. Hemma i föräldrahemmet har jag bara bredband på en dator och av någon anledning gillar inte adsl-modemet min lap-top som jag jobbar på. Sålunda är jag fast vid uppringt internet vid webredigering och måste ringa upp, publicera websiten, kolla, stänga ner, fråga vad jag gjort för fel eftersom jag har xp home och inte någon webserver på datorn... så därför är jag lite besvärlig och frågar innan jag gör fel... :-) Permalänk: https://www.webforum.nu/p/1073180 ## #16 — magnusfeldth, 2003-06-03T19:35Z nånting måste vara fel, den visar 6 poster och inte 5 som den ska, samt att ordningen inte är korrekt... ``` <% Dim Color Color = "" Set Connect = Server.CreateObject("ADODB.Connection") Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" &Server.MapPath("addemalmbergadmin/tubsockan.mdb") SQL2 = "select top 5 id, rubrik, kategori, ingress, rekom,rekomvotes,(rekom+0.0)/(rekomvotes+0.0) as medel from sockrates order by 3" set RecSet = connect.execute(SQL2) Do Until RecSet.EOF If RecSet ("Kategori") = 1 Then Color = "#9FA989" ElseIf RecSet ("Kategori") = 2 Then Color = "#9FA989" ElseIf RecSet ("Kategori") = 3 Then Color = "#788068" End If %>

"><% = RecSet("Rubrik") %>

<% = RecSet("Ingress") %>

<% = round(recset("rekom") / recset("rekomvotes"),1) %>

<% Recset.MoveNext Loop Recset.Close Connect.Close Set Recset = Nothing Set Connect = Nothing %> ``` se resultatet live: Permalänk: https://www.webforum.nu/p/1073323 ## #17 — magnusfeldth, 2003-06-03T21:03Z kom på det själv, ändrade "3" till 5... Permalänk: https://www.webforum.nu/p/1073405 --- Tråden på webben: https://www.webforum.nu/amne/asp/77090-två-räknefrågor