--- title: "cdonts och loop" type: "forum-thread" url: "https://www.webforum.nu/amne/asp/47288-cdonts-och-loop" topic: "ASP" topic_url: "https://www.webforum.nu/amne/asp" author: "pellsäter" published: "2002-07-06T07:54:44.000Z" updated: "2002-07-06T12:44:08.000Z" replies: 11 views: 273 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/47288-cdonts-och-loop" --- # cdonts och loop ## #1 — pellsäter, 2002-07-06T07:54Z Vill loopa igenom all poster i databasen med vissa kriterier men den tar bara med den sista posten, var lägger jag loopen?? \<% Set conn = Server.CreateObject("ADODB.Connection") set rs = Server.CreateObject("ADODB.Recordset") Conn.Open "xxxx" sql= "select k.epost, o.orderID,o.datum,o.antal,o.smak,o.storlek, p.vara, p.pris from kunder k, orderRad o, produkter p where o.artikelid = p.prodid and o.datum = date() and o.kundid = "&kund rs.open sql,conn do until (rs.eof) orderid = rs("orderid") vara = rs("vara") smak = rs("smak") storlek = rs("storlek") antal = rs("antal") pris = rs("pris") summa = totalsumma epost = rs("epost") uppg = "Du har beställt följande från Muskelbutiken" & vbCrLf & vbCrLf uppg = uppg & "OrderID: " & orderid & vbCrLf uppg = uppg & "Vara: " & vara & vbCrLf uppg = uppg & "Smak: " & smak & vbCrLf uppg = uppg & "Storlek: " & storlek & vbCrLf uppg = uppg & "Antal: " & antal & vbCrLf uppg = uppg & "Pris: " & pris &":-" & vbCrLf rs.movenext loop uppg = uppg & "Summa: " & summa &":- " & "inklusive frakt och postförskott" & vbCrLf & vbCrLf uppg = uppg & "Med vänliga hälsningar" & vbCrLf uppg = uppg & "xxx" Set mail = Server.CreateObject("CDONTS.NewMail") mail.Subject = "Order" mail.Body = uppg mail.From = "info@blabla" mail.Host = "mail.bla.com" mail.To = epost Mail.Bcc = "bengt.pellster@telia.com" mail.Send set mail = Nothing Permalänk: https://www.webforum.nu/p/47288 ## #2 — @nders, 2002-07-06T08:11Z Flytta upp den här raden till ovanför Do-raden: ``` uppg = "Du har beställt följande från Muskelbutiken" & vbCrLf & vbCrLf ``` Använd gärna webForums \[kod\]-taggar så blir din kod mer lättläst. Mvh, Permalänk: https://www.webforum.nu/p/713958 ## #3 — pellsäter, 2002-07-06T09:03Z mycket bättre men varje produkt visas nu i mailet,, 7ggr???? OrderID: 116095772 Vara: Kreatin 5 Smak: Choklad Storlek: Antal: 1 Pris: 99:- OrderID: 116095772 Vara: Kreatin 6 Smak: Storlek: Antal: 1 Pris: 59:- OrderID: 116095772 Vara: Kreatin 5 Smak: Choklad Storlek: Antal: 1 Pris: 99:- OrderID: 116095772 Vara: Kreatin 6 Smak: Storlek: Antal: 1 Pris: 59:- osv....... och sist i mailet är det ett = tecken??? Plus att jag får 3 st mail...det borde vara 2 st, ett till kunden och ett till mig Permalänk: https://www.webforum.nu/p/713968 ## #4 — @nders, 2002-07-06T09:09Z Om du lägger till DISTINCT i din SELECT-fråga då? Får du rätt resultat om du ställer SQL-frågan direkt i Access? Permalänk: https://www.webforum.nu/p/713971 ## #5 — pellsäter, 2002-07-06T09:53Z hjälper inte med distinct och jag får intetill frågan i Access.... vet inte hur man gör faktiskt Permalänk: https://www.webforum.nu/p/713982 ## #6 — @nders, 2002-07-06T10:04Z Öppna databasen i access, välj Frågor, sedan 'Skapa en fråga i designläge'. Stäng dialogrutan 'Visa tabell'. Uppe till vänster finns en knapp (precis under Arkiv-menyn), som det hos mig står SQL på. Klicka på den, sedan är det bara att klistra in din SQL-fråga i fönstret. Klicka på ! för att exekvera frågan. Mvh, Permalänk: https://www.webforum.nu/p/713984 ## #7 — pellsäter, 2002-07-06T10:09Z det står att det finns ord eller argument som är reserverade eller felaktiga eller så är skiljetecknen felaktiga så här står de nu i access SELECT;k.epost, o.orderID,o.datum,o.antal,o.smak,o.storlek, p.vara, p.pris from kunder k, orderRad o, produkter p where o.artikelid = p.prodid and o.datum = date() and o.kundid = "&kund Permalänk: https://www.webforum.nu/p/713987 ## #8 — @nders, 2002-07-06T10:11Z Ta bort semikolonet efter select, och ersätt din asp-kod på slutet med det kundnummer du använder på asp-sidan. Permalänk: https://www.webforum.nu/p/713989 ## #9 — pellsäter, 2002-07-06T10:21Z den visar alla kunder!!! och det är 7 st testkunder..... varför gör den så Permalänk: https://www.webforum.nu/p/713994 ## #10 — @nders, 2002-07-06T11:37Z Du har inte med tabellen kunder i din wheresats. Prova: ``` sql= "select k.epost, o.orderID,o.datum,o.antal,o.smak,o.storlek, p.vara, p.pris from kunder k, orderRad o, produkter p where o.artikelid = p.prodid and o.datum = date() and k.kundid=o.kundid and o.kundid = "&kund ``` Jag har antagit att fältet kundid finns även i tabellen kunder. Mvh, Permalänk: https://www.webforum.nu/p/714032 ## #11 — pellsäter, 2002-07-06T11:48Z tack Anders!! Nu funkar det perfekt!!! Utm att den skickar 3 st likadana mail... jag har bara t mailadresser som den skickar till ju!! Nu åker jag på semester en hel vecka... ska bli gott ha det bra Permalänk: https://www.webforum.nu/p/714043 ## #12 — solbulle, 2002-07-06T12:44Z 3 likadana mail? Vilken mailadress är det som får dubbelt? Permalänk: https://www.webforum.nu/p/714083 --- Tråden på webben: https://www.webforum.nu/amne/asp/47288-cdonts-och-loop