--- title: "mellanrum när det är en ny dag." type: "forum-thread" url: "https://www.webforum.nu/amne/asp/58675-mellanrum-när-det-är-en-ny-dag" topic: "ASP" topic_url: "https://www.webforum.nu/amne/asp" author: "medialabs" published: "2002-11-10T19:53:30.000Z" updated: "2002-11-10T20:04:49.000Z" replies: 3 views: 180 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/58675-mellanrum-när-det-är-en-ny-dag" --- # mellanrum när det är en ny dag. ## #1 — medialabs, 2002-11-10T19:53Z Undrar hur man gör så att det blir ett mellanrum när det är en ny dag. så att det blir så här: 2002-11-11 9364632492 2002-11-10 fdsfjdfljdsf 2002-11-10 fdsfjdfljdsf 2002-11-10 fdsfjdfljdsf Iindex.asp sidans kod. ``` Artiklar <% Set Connect = Server.CreateObject("ADODB.Connection") Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("hacked.mdb") Set RecSet = Server.CreateObject("ADODB.Recordset") SQL = "SELECT * FROM tblhacked ORDER BY id DESC" RecSet.Open SQL, Connect, adOpenStatic, adLockOptimistic %>
Datum   Hackare   Original   Mirror
<% IF RecSet.EOF then %>              
<% ELSE Do until RecSet.EOF %><%=RecSet("datum")%>   <%=RecSet("hacker")%>   " target="top">Titta   " target="top">Titta    
<% RecSet.MoveNext Loop RecSet.Close Connect.Close Set RecSet = Nothing Set Connect = Nothing END IF %>                
``` Permalänk: https://www.webforum.nu/p/58675 ## #2 — Eitraz, 2002-11-10T19:58Z så här kan man göra... **lastdate = ""** Do until RecSet.EOF %\>\**\<% If NOT lastdate = RecSet("datum") Then %\>\\<% End If %\>**\<%=RecSet("datum")%\>\\ \ \ \\\<%=RecSet("hacker")%\>\\ \ \ \\" target="top"\>\Titta\\\ \ \ \\" target="top"\>\Titta\\\ \ \ \ \ \ \ \\<% **lastdate = RecSet("datum")** RecSet.MoveNext Loop Har alltså lagt in en "lastdate" som kollar om det är ett annorlunda datum \<% If NOT lastdate = RecSet("datum") Then %\>\\<% End If %\> och isåfall så lägger den in ett \ (du får ju ändra som du vill sen) sen lägger jag lastdate som RecSet("datum") där i slutet. \-Eitraz Permalänk: https://www.webforum.nu/p/851688 ## #3 — LarsG, 2002-11-10T20:00Z ``` [b]pDatum = ""[/b] Do until RecSet.EOF [b] if pDatum <> "" then if cDate(pDatum) <> cDate(RecSet("datum")) then pDatum = cDate(RecSet("datum")) response.write "
" end if else pDatum = cDate(RecSet("datum")) end if [/b] %><%=RecSet("datum")%> <%=RecSet("hacker")%> " target="top">Titta " target="top">Titta <% RecSet.MoveNext Loop ``` Permalänk: https://www.webforum.nu/p/851689 ## #4 — medialabs, 2002-11-10T20:04Z LarsG: Tack,tack,tack.... det funkar nu. Permalänk: https://www.webforum.nu/p/851692 --- Tråden på webben: https://www.webforum.nu/amne/asp/58675-mellanrum-när-det-är-en-ny-dag