---
title: "Markera dagens"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/96469-markera-dagens"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Meng"
published: "2004-02-03T12:19:09.000Z"
updated: "2004-02-05T15:57:51.000Z"
replies: 13
views: 267
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/96469-markera-dagens"
---

# Markera dagens

## #1 — Meng, 2004-02-03T12:19Z

Kan man göra dagens inlägg markerade genom en funktion? allså typ 

```
style="color: #FF0000"
```

 allså hämtar datum från "datum" och kollar om det är från idag och sedan gör "rubrik" i den färgen?

Permalänk: https://www.webforum.nu/p/96469

## #2 — Engine^, 2004-02-03T12:26Z

Ja det kan man

```
If objRS("datum") = Date() Then
  strColor = "#FF0000"
Else
  strColor = "#000000"
End If

Response.Write "<span style=""color:" & strColor & """>"
```

*objRS* är det recordset i vilket du har läst in dina datum.

Hur du nu väljer att skriva ut detta är ju helt upp till dig... ;)

Permalänk: https://www.webforum.nu/p/1268273

## #3 — J.N., 2004-02-03T12:29Z

HEJ!

Klart du kan.

Den enkla varianten:
if datum=dagens then r.w färgen (css-class?)

Den bästa:
call rubrik(rs("datum")

Rubrik tar sedan emot datumet, kollar om den är rätt, och är den det, sätt färgen.
Vill man skoja till det kan man köra else-satser och olika färger för olika datum/intervall  :P

Permalänk: https://www.webforum.nu/p/1268276

## #4 — Meng, 2004-02-05T09:02Z

> **Engine^ skrev:**
>
> Ja det kan man
>
> ```
> If objRS("datum") = Date() Then
>   strColor = "#FF0000"
> Else
>   strColor = "#000000"
> End If
> 
> Response.Write "<span style=""color:" & strColor & """>"
> ```
>
> 
> *objRS* är det recordset i vilket du har läst in dina datum.
> 
> Hur du nu väljer att skriva ut detta är ju helt upp till dig... ;)

hur menar du? det funkar inte vad jag än skriver ist för "objRS" och sen är väl inte denna funktionen intregrerad med bara "Rubrik" utan med hela posten?

Permalänk: https://www.webforum.nu/p/1269374

## #5 — Engine^, 2004-02-05T10:06Z

Hur skriver du ut dina poster?

Permalänk: https://www.webforum.nu/p/1269423

## #6 — Meng, 2004-02-05T10:09Z

Like this

```
  <tr height="20">
    <td align="left" width="25"><img src="bilder/ico_<%=RecSet("iconid")%>.gif" width="15" height="15"></td>
    <td align="left" width="150"><b><a href="opgave.asp?ID=<%=RecSet("ID")%>"><%If Len(RecSet("opgave")) > 20 Then%><%=Left(RecSet("opgave"),20)%>...<%Else%><%=RecSet("opgave")%><%End If%></a></b></td>
    <td align="left" width="150<%=FormatDateTime(RecSet("datum"),2)%> (<%=FormatDateTime(RecSet("datum"),4)%>)</td>
    <td align="left" width="60"><%=RecSet("til")%></td>
    <td align="left" width="60"><%If Len(RecSet("vem")) > 6 Then%><%=Left(RecSet("vem"),6)%>...<%Else%><%=RecSet("vem")%><%End If%></td>
    <td align="left" width="60"><%If Len(RecSet("placering")) > 5 Then%><%=Left(RecSet("placering"),5)%>...<%Else%><%=RecSet("placering")%><%End If%></td>
    <td align="left" width="150"><%If Len(RecSet("info2")) > 20 Then%><%=Left(RecSet("info2"),20)%>...<%Else%><%=RecSet("info2")%><%End If%></td>
    <td align="center" valign="middle" width="50"><img src="bilder/prioritet_<%=RecSet("prioritet")%>.gif" width="26" height="7"></td>
    <td align="center" width="40"><img src="bilder/status_<%=RecSet("status")%>.gif" width="17" height="17"></td>
  </tr>
```

Permalänk: https://www.webforum.nu/p/1269425

## #7 — Engine^, 2004-02-05T10:46Z

Lägg till min lilla funktion innan du skriver ut posten och lägg till följande för dom \<td\> som utgör rubriken

```
<td align="left" width="xx" style="color:<%=strColor%>">
```

Och för att If-satsen ska fungera byter du objRS("datum") mot RecSet("datum")... och nu verkar ditt datum ha med klockslag också, så If-satsen blir såhär

```
If FormatDateTime(RecSet("datum"), 2) = Date() Then
```

Permalänk: https://www.webforum.nu/p/1269451

## #8 — Meng, 2004-02-05T11:27Z

```
<%

If RecSet("datum") = Date() Then
  strColor = "#FF0000"
Else
  strColor = "#000000"
End If

Response.Write "<span style=""color:" & strColor & """>"

%>
  <tr height="20">
    <td align="left" width="25"><img src="bilder/ico_<%=RecSet("iconid")%>.gif" width="15" height="15"></td>
    <td align="left" width="200" style="color:<%=strColor%>"><b><a href="opgave.asp?ID=<%=RecSet("ID")%>"><%If Len(RecSet("opgave")) > 33 Then%><%=Left(RecSet("opgave"),33)%>...<%Else%><%=RecSet("opgave")%><%End If%></a></b></td>
    <td align="left" width="100"><%response.write Day(recset("datum")) & " " & Monthname(Month(recset("datum")),true) & " (" & formatdatetime(recset("datum"),4) & ")"%></td>
    <td align="left" width="60"><%=RecSet("til")%></td>
    <td align="left" width="60"><%If Len(RecSet("vem")) > 6 Then%><%=Left(RecSet("vem"),6)%>...<%Else%><%=RecSet("vem")%><%End If%></td>
    <td align="left" width="60"><%If Len(RecSet("placering")) > 5 Then%><%=Left(RecSet("placering"),5)%>...<%Else%><%=RecSet("placering")%><%End If%></td>
    <td align="left" width="150"><%If Len(RecSet("info2")) > 20 Then%><%=Left(RecSet("info2"),20)%>...<%Else%><%=RecSet("info2")%><%End If%></td>
    <td align="center" valign="middle" width="50"><img src="bilder/prioritet_<%=RecSet("prioritet")%>.gif" width="26" height="7"></td>
    <td align="center" width="40"><img src="bilder/status_<%=RecSet("status")%>.gif" width="17" height="17"></td>
      </tr>
```

 

Har ingen effekt alls...

Inte heller med 

```
If FormatDateTime(RecSet("datum"), 2) = Date() Then
```

Permalänk: https://www.webforum.nu/p/1269497

## #9 — Engine^, 2004-02-05T12:33Z

```
<%
If FormatDateTime(RecSet("datum"), 2) = Date() Then
  strColor = "#ff0000"
Else
  strColor = "#000000"
End If
%>

<tr height="20">
  <td style="color:<%=strColor%>">Denna text är röd om <%=RecSet("datum")%> är idag.</td>
</tr>
```

Som så tänkte jag och den metoden fungerar. Men om du stoppar in en länk i din \<td\> så är det nog så att du får stoppa in styletaggen i din \<a\>. Mixtra på... :)

Permalänk: https://www.webforum.nu/p/1269543

## #10 — Meng, 2004-02-05T12:43Z

Allså din kod fungerar inte eftersom när jag bara skriver \<td style="color:#FF0000"\> så blir länken röd...

Kolla bilden, där används din kod.. och lägga den i \<a\> funkar inte heller.

Bilagor:

- [ex.gif](https://www.webforum.nu/a/2805.gif)

Permalänk: https://www.webforum.nu/p/1269553

## #11 — Engine^, 2004-02-05T13:15Z

Då verkar det bli fel i If-satsen, eftersom annars ska det ju helt enkelt fungera.

Om du testar att skriva ut FormatDateTime(RecSet("datum"), 2) och Date() så kan du ju se om det är samma eller inte.

Permalänk: https://www.webforum.nu/p/1269572

## #12 — Meng, 2004-02-05T13:19Z

Har redan testat =) verkar som den överhuvudtaget inte läser funktionen....

Permalänk: https://www.webforum.nu/p/1269574

## #13 — Meng, 2004-02-05T15:06Z

har lekt lite mer med koden nu, den fattar att den ska gå på "Else" allså att i dettafallet posten är mer än en dag gammal och är svart men den verkar inte fatta när posten är från idag att den då skall vara röd. Alltså måste felet ligga här: 

```
If FormatDateTime(RecSet("datum"), 2) = Date() Then
```

Vad betyder denna koden helt exakt?

Permalänk: https://www.webforum.nu/p/1269649

## #14 — Engine^, 2004-02-05T15:57Z

[FormatDateTime Function](http://msdn.microsoft.com/library/default.asp?url=/library/en-us/script56/html/vsfctformatdatetime.asp)

Just detta sätt gör om ett datum i formatet yyyy-mm-dd hh:mm:ss till yyyy-mm-dd.

Permalänk: https://www.webforum.nu/p/1269688

---

Tråden på webben: https://www.webforum.nu/amne/asp/96469-markera-dagens
