---
title: "diagram typ..."
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/14025-diagram-typ"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Cactuz"
published: "2002-01-25T20:18:00.000Z"
updated: "2002-01-26T22:30:00.000Z"
replies: 16
views: 351
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/14025-diagram-typ"
---

# diagram typ...

## #1 — Cactuz, 2002-01-25T20:18Z

hur gör man ett diagram i asp? en sån som ibland visar resultat i en omröstning...

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

## #2 — jorgen, 2002-01-25T20:23Z

Hej, utgå från 100 %

1 % motsvarar en bild med en tjocklek på 1 px. Gör uträkningen och tex:

60 / 100 = 0.60

vilket motsvarar 60 %, alltså ska bilden loopas ut 60 ggr.

mvh Jörgen :)

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

## #3 — Cactuz, 2002-01-25T20:30Z

hmm... kan du förklara lite bättre? :)

är inte bäst på asp... kan du visa hur scriptet ska se ut om den ska visa en stapel på 60% som ska "betyda" 320 o en på 90% som betyder 560? då kan jag lista ut hur det funkar :)

\[Redigerat av Cactuz den 25 jan 2002\]

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

## #4 — jorgen, 2002-01-25T20:48Z

Okey vi startar med lite matematik.

utgår från ett röstnings-script:

wF har fått 320 röster vilket motsvarar 60% av alla röster, antal röster totalt blir då:

1,6 \* 320 = 512

detta innebär att stapeln wF ska ha en bredd på 60 pixlar.

```
dim intTotal
dim intVotes
dim intImageWidth

intTotal = RS("intTotal")
intVotes = RS("intVotes")

intImageWidth = Round((intVotes/intTotal)*100, 0)

<img src="bild.gif" width="<%=intImageWidth %>">
```

ungefär så här, har du många olika alternativ får du loopa igen uträkningen.

RED: bild.gif är 1 px bred

mvh Jörgen :)

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

## #5 — Cactuz, 2002-01-26T19:29Z

den ska visa statistik över hur måsga besökare jag har olika datum... men jag får bara ut det senaste datumet...

```
<%
Do Until rs.EOF
%>

<%

SQL = "SELECT * FROM totalt"
Set rs = db.execute(SQL)

besok = "SELECT * FROM besok"
Set RecSet = db.execute(besok)

dim intTotal
dim intVotes
dim intImageWidth
intTotal = RS("besok")
intVotes = RecSet("antalbesok")
intImageWidth = Round((intVotes/intTotal)*100, 0)
%>

<%=RecSet("Datum")%><img src="kant.gif" height="10" width="1"><img src="bla.gif" height="10" width="<%=intImageWidth %>"><img src="kant.gif" height="10" width="1"><%=RecSet("Antalbesok")%>

<%
rs.MoveNext
Loop
%>
```

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

## #6 — LarsG, 2002-01-26T19:39Z

Vilka kolumner innehåller tabellerna besök och totalt och vad finns det för data i dom.

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

## #7 — Cactuz, 2002-01-26T19:43Z

i besok ligger antalbesok och datum... där ligger hur många besök det är ett visst datum... i totalt ligger besok som är summan av alla antalbesok... man kan säkert göra detta smidigare genom att lägga ihop alla antalbesok men jag vet inte hur...

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

## #8 — LarsG, 2002-01-26T19:55Z

```
<%
dim intTotal,besok,intVotes,intImageWidth,rs
sql = "SELECT total FROM totalt"
Set RS = db.execute(sql)
intTtotal = rs("total")
rs.close

SQL = "SELECT * FROM besok order by datum desc"
Set rs = db.execute(SQL)

Do Until rs.EOF
intVotes = RS("antalbesok")
intImageWidth = Round((intVotes/intTotal)*100, 0)
%>
<% =RS("Datum")%><img src="kant.gif" height="10" width="1"><img src="bla.gif" height="10" width="<%=intImageWidth %>"><img src="kant.gif" height="10" width="1"><%=intVotes%>

<%
rs.MoveNext
Loop
%>
```

Det är otestat, och så vet jag inte vad alla kolumnnamn heter.

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

## #9 — Cactuz, 2002-01-26T21:09Z

jag ändrade alla kolumnnamn

jag får felmeddelandet:

Körningsfel i Microsoft VBScript (0x800A000B)
Division med noll

det står att det ska vara fel här

intImageWidth = Round((intVotes/intTotal)\*100, 0)

\[Redigerat av Cactuz den 26 jan 2002\]

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

## #10 — LarsG, 2002-01-26T21:22Z

Då ligger det 0 i den första posten du får från tabellen totalt, men det finns poster i tabellen besok. 

Finns det flera poster i tabellen totalt så att du måste ha något villkor?

Du borde i och för sig ha en kontroll innan du går in i loopen

```
if clng(intTtotal) > 0 then
do until rs.eof
intVotes = RS("antalbesok")
intImageWidth = Round((intVotes/intTotal)*100, 0)
%>
<% =RS("Datum")%><img src="kant.gif" height="10" width="1"><img src="bla.gif" height="10" width="<%=intImageWidth %>"><img src="kant.gif" height="10" width="1"><%=intVotes%>

<%
rs.MoveNext
Loop
end if
%>
```

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

## #11 — Cactuz, 2002-01-26T21:38Z

hmm.. samma fel meddelande.. o det ligger inte 0 nånstans

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

## #12 — jorgen, 2002-01-26T21:50Z

Hej, värdet av intVote eller intTotal måste vara 0 på något ställe.

red: stavar som en kratta

mvh Jörgen :)

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

## #13 — Cactuz, 2002-01-26T22:07Z

Nu fixade det sig... intTotal hette intTtotal... jag fick oxå ta bort kontrollen för med den funkade det inte

\[Redigerat av Cactuz den 26 jan 2002\]

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

## #14 — Cactuz, 2002-01-26T22:10Z

men det är ytterligare ett problem... nu är den i px per nr... allså.. om det är 40 så är stapeln 40px lång... jag vill ju att den som har högst värde ska vara width="100%"

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

## #15 — Cactuz, 2002-01-26T22:11Z

det fixade sig tror jag :)

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

## #16 — Cactuz, 2002-01-26T22:14Z

nix.. det gjorde den inte... om värdet är typ 2000 så blir stapeln väldigt lång :)

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

## #17 — jorgen, 2002-01-26T22:30Z

Matematiskt sett kan den bara bli 100 px under förutsättning att intVotes inte är större än intTotal, vilket inte borde vara möjligt.

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/14025-diagram-typ
