|
|
|
ขอ code ดึงฐานข้อมูลมาทำเป็นกราฟหน่อย asp ครับ ขอ code ดึงฐานข้อมูลมาทำเป็นกราฟหน่อย asp ครับ |
|
|
|
|
|
|
|
กราฟอะไรล่ะครับ กราฟแท่งไม่ยากทำได้โดยไม่ต้องมี Component แต่ถ้าเป็น Pie (กราฟวงกลมอ่ะ) ต้องใช้ Component
|
|
|
|
|
Date :
22 พ.ค. 2551 20:27:52 |
By :
varayut |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
กราฟไรก้อได้ทั้งนั้นครับ
แท่งก้อดี
ขอบคุณมากๆ
|
|
|
|
|
Date :
22 พ.ค. 2551 21:44:48 |
By :
terayut |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Access นะ อันนี้กราฟแนวนอน
-----------------------------------------------
<%
xFactor =3 'ค่าตัวคูณสเกลแกน x มีผลกับความยาวของกราฟ
Bwidth = 10 'ความสูงของกราฟ
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("database/poll.mdb")
' หาคะแนนรวมจากการโหวตทังหมด
Set RS1 = Server.CreateObject("ADODB.Recordset")
RS1.Open "Select * from poll where show=true", Conn, 1, 3 'เลือกข้อมูลจากตาราง ผลสำรวจ
Set RS2 =Server.CreateObject("ADODB.Recordset")
RS2.open "Select * from heading", Conn, 1, 3 'เลือกข้อมูลจาก ชื่อผลสำรวจ
' หากทำรวมตารางเดียวกันก็ประยุกต์เอา
total = 0
Do while not RS1.EOF
total = total + RS1("vote")
RS1.MoveNext
Loop
RS1.close
RS1.Open "Select * from poll where show=true", Conn
%>
<table width="250" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="250" height="25" align="center" valign="middle"><% = RS2("result")%></td>
</tr>
<tr>
<td valign="top">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<%
if total = 0 then total = 1
Do while not RS1.EOF
votePcnt = RS1("vote") * 100 / Total
%>
<tr>
<td width="90" align="right" valign="middle"><%= RS1("item") %> : </td>
<td width="160" valign="middle"> <img src="<%= RS1("image")%>" height="<% = Bwidth%>" width="<% = votePcnt * xFactor%>" border=0><% = FormatNumber(votePcnt ,2) %>%</td>
</tr>
<%
RS1.MoveNext
Loop
RS1.Close
Conn.Close
%>
</table>
</td>
</tr>
<tr>
<td align="center" valign="middle">คะแนนรวม : <%=total%>
</td>
</tr>
</table>
ปล. ถ้าจะทำกราฟแนวตั้งก็เปลี่ยนค่าของ height ไปใช้ค่าของwidth แทน สลับกันอ่ะ ก็ปลี่ยนแนวแล้ว ก่อนอื่นจะเปลี่นแนวแล้วอย่าลืมปรับแต่งเลย์เอ้าใหม่ก่อนละ
เทพให้แน่ อย่าแพ้เด็ก ม.6 นะ หุหุ หัดถามเยอะ ๆ อานหนังสือเยอะ ๆ แล้วจะพอรู้คับ ผมก็ไม่เก่งหรอกแค่พอได้ ส่วนมากเรียนจากตามเว็บ แล้วก็หนังสืออ่ะครับ แล้วอีกอย่างเลยทำให้เราเข้าใจอะไรหลาย ๆ อย่าง แน่ ๆ คือเอาพวกที่ชาวบานเขาทำสำเร็จรูปมานั่งแกะเล่นอ่ะ ไปละคับ ทำเว็บไรอ่ะ ขอดูหน่อยดิ อยากเห็น กำลังรวมรวมข้อมูลเพิ่มด้วย
|
|
|
|
|
Date :
24 พ.ค. 2551 01:35:45 |
By :
varayut |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Load balance : Server 04
|