---
title: "Räkna ner tid samt visa grafiskt..."
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/6533-räkna-ner-tid-samt-visa-grafiskt/page2"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Bire"
published: "2000-08-31T20:34:00.000Z"
updated: "2000-09-07T19:48:00.000Z"
replies: 21
views: 501
page: 2
pages: 2
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/6533-räkna-ner-tid-samt-visa-grafiskt"
---

# Räkna ner tid samt visa grafiskt...

_Sida 2 av 2._

## #21 — Johnsen, 2000-09-07T15:24Z

Nåja, så värst seriöst var det inte.
Fyra bilder (line_g.gif, line_r.gif, line_b.gif & end.gif)
och en lite databas med fyra fält (start, stopp, vid & bes).
Du kan ju se om du kan anväda det till något.

```
start="2000-05-06"  	'//Startdatum
stopp="2000-12-24"  	'//Stoppdatum
vid="xx"		'//Första delen av vecko-id
bes="julafton."		'//Rubrik

weeks= DatePart("ww", DateSerial(year(date),12,31), 2, 3) '//antal veckor för innevarande år
nowweek=DatePart("ww", date, 2, 3)			  '//nuvarande vecka
startweek=DatePart("ww", DateSerial(year(start),month(start),day(RecSet("start"))), 2, 3)
stoppweek=DatePart("ww", DateSerial(year(stopp),month(stopp),day(RecSet("stopp"))), 2, 3)

for i = 1 to startweek		'//vecka 1 till startveckan 
Response.write "<img src='line_b.gif'alt='det unika id´t: "&vid&i&"'>"
next

for i = 1 to nowweek-startweek	'//startveckan till nuvarande vekca
Response.write "<img src='line_g.gif'alt='det unika id´t: "&vid&startweek+i&"'>"
next

for i = 1 to stoppweek-nowweek	'//nuvarande vecka till slutveckan
Response.write "<img src='line_r.gif' alt='det unika id´t: "&vid&nowweek+i&"'>"
next

for i = 1 to weeks-stoppweek	'//slutveckan till resten av året
Response.write "<img src='line_b.gif' alt='det unika id´t: "&vid&stoppweek+i&"'>"
next

Response.write "<img src='end.gif'><br>" '//avslutnings bild
Response.write DateDiff("d", Date, stopp)&" dagar kvar till "&bes &"<br>"
Response.write "Mätningen startade "&start&" och avslutas "&stopp&".<hr>"
```

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

## #22 — Bire, 2000-09-07T19:48Z

Jag kollar! :e

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/6533-räkna-ner-tid-samt-visa-grafiskt/page2  
Föregående sida: https://www.webforum.nu/amne/asp/6533-räkna-ner-tid-samt-visa-grafiskt.md