Notifikationer

Markér alle som læst Log ud

wip13 Nybegynder

01. september 2003 - 23:08 Der er 8 kommentarer og
2 løsninger

generere søjlediagram

Hej jeg har en .asp-side der hiver en masse variabler ud af en database og gemmer dem i nogle variabler:
rsbf4210
rsbf4215
rsbf4220
rsbf4225
rsbf4230
rsbf4235
de har så nogle værdier som jeg godt kunne tænke mig at få lavet et søjle diagram over således at de 6 variabler har hver deres søjle på x-aksen, og hvor højden så bestemes af variablens værdi. En lille finesse ville være hvis man kunne skrive værdien over søjlen.

Nogen der kan scripte det for mig, fortælle mig hvordan jeg skal gøre, eller bare kan henvise.

Der gives point for at der kan bruges - efter kvaliteten af det

Synes godt om

netro Nybegynder

01. september 2003 - 23:17 #1

Det bedste ville være, om du havde adgang til en grafkomponent.

Men det kan også sagtens lade sig gøre uden. Lav f.eks. et gif-billede med samme højde som dit diagram (f.eks. 300px) i en eller anden farve.
Dette billede kan du lade optræde som søjler ved at sætte 6 af dem ved siden af hinanden.

For i = 1 To 6
Response.Write "<img src='bar.gif' style='width:50px; height:" & Y & "px;'>"
Next

Response.Write "<table>"
Response.Write "<tr>"
For i = 1 To 6
Response.Write "<td style='width:50px;'>" & X & "</td>"
Next
Response.Write "</tr>"
Response.Write "</table>"

Synes godt om

netro Nybegynder

01. september 2003 - 23:25 #2

Jeg har lavet et lille eksempel til dig her: http://www.opfinderen.dk/graf.asp

Synes godt om

gertp Nybegynder

01. september 2003 - 23:27 #3

en lille simpel en :)
du kan selv udvide den og sætte databasefelterne ind
<body>
<% var1 = 50 %>
<% var2 = 250 %>
<table><tr><td valign="bottom">
<%=var1%> </td><td valign="bottom"><%=var2%>
</td>

<tr><td valign="bottom">
<hr width="5" size="<%=var1%>" color="#FF0000"></td><td valign="bottom">
<hr width="5" size="<%=var2%>" color="#00FF00"></td>

</table>

</body>

Synes godt om

wip13 Nybegynder

01. september 2003 - 23:31 #4

jeg fatter ikke dit eksempel gertp...er meget ny i asp

og netro, hvordan for man x til først at tage værdien af rsbf4210, derefter rsbf4215 osv?

Synes godt om

gertp Nybegynder

01. september 2003 - 23:38 #5

jeg har givet dine variabler en værdi, da jeg ikke ved hvad der kommer ud af din database (de første 6 linier efter <body>
<body>
<% rsbf4210 = 50 %>
<% rsbf4215 = 250 %>
<% rsbf4220 = 50 %>
<% rsbf4225 = 250 %>
<% rsbf4230 = 50 %>
<% rsbf4235 = 250 %>

<table><tr><td valign="bottom">
<%=rsbf4210%> </td><td valign="bottom"><%=rsbf4215%>
</td>
<td valign="bottom">
<%=rsbf4220%> </td><td valign="bottom"><%=rsbf4225%>
</td>
<td valign="bottom">
<%=rsbf4230%> </td><td valign="bottom"><%=rsbf4235%>
</td>

<tr><td valign="bottom">
<hr width="5" size="<%=rsbf4210%>" color="#FF0000"></td><td valign="bottom">
<hr width="5" size="<%=rsbf4215%>" color="#00FF00"></td><td valign="bottom">
<hr width="5" size="<%=rsbf4220%>" color="#0000FF"></td><td valign="bottom">
<hr width="5" size="<%=rsbf4225%>" color="#FF0000"></td><td valign="bottom">
<hr width="5" size="<%=rsbf4230%>" color="#00FF00"></td><td valign="bottom">
<hr width="5" size="<%=rsbf4235%>" color="#0000FF"></td>

</table>

</body>

Synes godt om

netro Nybegynder

01. september 2003 - 23:42 #6

Et eksempel med Access:
==============================

Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & ("c:\sti\til\database.mdb")
Conn.Open DSN

SQL = "Select X_Felt, Y_felt From Tabel"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open SQL Conn, 1, 3

While Not rs.EOF
Response.Write "<img src='bar.gif' style='width:50px; height:" & rs("Y_Felt") & "px;'>"
rs.MoveNext
Wend

rs.MoveFirst

Response.Write "<table>"
Response.Write "<tr>"
While Not rs.EOF
Response.Write "<td style='width:50px;'>" & rs("X_Felt") & "</td>"
rs.MoveNext
Wend
Response.Write "</tr>"
Response.Write "</table>"

rs.Close
Set rs = Nothing
Conn.Close
Set Conn = Nothing

Synes godt om

wip13 Nybegynder

01. september 2003 - 23:43 #7

hej igen, det ser godt ud. Jeg kikker på det imorgen når uni er forbi :)

Synes godt om

netro Nybegynder

01. september 2003 - 23:44 #8

Der mangler lige et komma efter rs.Open SQL

Synes godt om

wip13 Nybegynder

02. september 2003 - 15:45 #9

tja jeg har taget lidt fra jer begge nu, så vi splitter i porten, hvis det er okay :)

Synes godt om

netro Nybegynder

02. september 2003 - 17:04 #10

Helt fint ;)

Synes godt om

Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP	10	25/06/202622:20	04/09/202602:30
Tjek alle checkbox i form Af bsn i ASP	4	18/05/202601:57	19/05/202613:33
Lost focus Af bsn i ASP	1	07/11/202415:34	01/01/202514:58
ASP classic Af bsn i ASP	8	28/10/202423:11	30/10/202422:51
Classic - filer vist med sidste fil først Af bsn i ASP	5	23/05/202409:56	24/05/202400:02

Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS