我提供的範例,有些是給讀者的「售後服務」
本範例,是一個簡單的 ADO.NET程式(搭配資料庫)。
只會使用 Visual Studio的入門者,可能還要一段時間的努力才能做到這邊
上一篇文章:[習題]ASP.NET的 簡易投票區 #6 --直立的長條圖
在此提供範例給讀者參考。
關於投票區的所有文章,請看本網站的 --
http://www.dotblogs.com.tw/mis2000lab/Tags/%E6%8A%95%E7%A5%A8%E5%8D%80/default.aspx
補充下集(ASP.NET專題實務II -- 範例集與4.0新功能)的
第十一章「投票區與長條圖」
HTML畫面設計 --
<p>
EasyVote_1的投票結果(<span class="style1">直式</span>長條圖)</p>
<form id="form1" runat="server">
<div>
<hr />
<br />
<table border="1" width="100%" id="table1">
<tr>
<td>得票數<p>與</p><p>長條圖</td>
<asp:Label ID="Label1" runat="server"></asp:Label>
</tr>
<tr>
<td>候選人編號</td>
<asp:Label ID="Label2" runat="server"></asp:Label>
</tr>
</table>
<br />
<hr />
回到<a href="EasyVote_1.aspx">原本的投票區(EasyVote_1.aspx)</a></div>
</form>
後置程式碼(Code Behind) --
'----自己寫的 (宣告)----
Imports System
Imports System.Web.Configuration
Imports System.Data
Imports System.Data.SqlClient
'----自己寫的 (宣告)----
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim Conn As New SqlConnection(WebConfigurationManager.ConnectionStrings("存在Web.Config檔案裡面的資料庫連結字串").ConnectionString)
Conn.Open() '---- 連結DB
Dim dr As SqlDataReader = Nothing
Dim cmd As SqlCommand = New SqlCommand("select top 1 * from Vote_1 order by id DESC", Conn)
dr = cmd.ExecuteReader() '---- 執行SQL指令,取出每一位候選人的得票數
dr.Read() '-- 註解:本範例使用的 Vote_1資料表,請依照書中的範例來作。
Dim vote_no As Integer = 0
Dim end_str As String = Nothing
Dim no_str As String = Nothing
'***********************************************
For i As Integer = 1 To (dr.FieldCount - 1)
vote_no = dr(i)
end_str = end_str & "<td align=center valign=bottom><img src='images/sum" & i & ".gif' width=10 height=" & (vote_no * 10) & "></td>"
'—控制圖片高度,以「直式」長條圖來展示得票數。
no_str = no_str & "<td>號候選人的得票數:" & vote_no & "</td>"
Next
'***********************************************
Label1.Text = end_str
Label2.Text = no_str
If Not (dr Is Nothing) Then
cmd.Cancel()
dr.Close()
End If
If (Conn.State = ConnectionState.Open) Then
Conn.Close()
Conn.Dispose()
End If
End Sub
操作畫面如下 --
首先就是一個簡單的投票畫面~
投票完成後,立刻會看見「得票數」。我用「長條圖」來展示之,這是本文的重點所在~~
下圖的右下方,就是本文介紹的直立長條圖
您可以參閱以前的文章,
或是參閱我寫的書本「下集」,有比較詳細的解說。
我提供的範例,有些是給讀者的「售後服務」
上面的範例,是一個簡單的 ADO.NET程式(搭配資料庫)。
....雖然不難,但是......
只會使用 Visual Studio的入門者,可能還要一段時間的努力才能做到這邊
如果您不是本書讀者,而且自己底子不穩,....... 建議您三思。
(我沒有見過哪個人是可以上網隨手 Copy範例,瞬間就會變成高手的。 初學者請不要作大夢)
ADO.NET入門文章(書本文章公開 / 下載)#1 -- 各種基礎範例
ADO.NET入門文章(書本文章公開 / 下載)#2 -- Stored Procedure / NextResult方法 / MARS
ADO.NET入門文章(書本文章公開 / 下載)#3 -- MARS與簡單的「留言版」範例
=== 最後要打一下廣告 ==========================
1. 如果您覺得我的描述、寫作方式,符合您的胃口。
2. 如果您看完以後,知道我寫書、介紹一些控制項或是技術........不是「混過去」、「帶過去」而已,而是真真確確地蒐集 "有用的範例",讓您學得更深入!
3. 如果您覺得:我出完書以後,還不定期地提供售後服務,提供補充教材......這樣的互動是 "良性"的,是值得鼓勵的。......已經推出 兩百多篇 補充範例了
4. 如果您(尤其是學生)真的想把基礎學好,而不是 "混"過這一門課就好、而不是寫個(畢業專題的)屍體出來交差(能畢業就好).....那麼.......
請您購買下面的書籍,
東西多到您學不完
上 / 下兩集,兩本書的厚度(我蒐集的各種範例)將近 兩千頁 !!......絕對不會讓您失望
我將思想傳授他人, 他人之所得,亦無損於我之所有;
猶如一人以我的燭火點燭,光亮與他同在,我卻不因此身處黑暗。----Thomas Jefferson
線上課程教學,遠距教學 (Web Form 約 51hr) https://dotblogs.com.tw/mis2000lab/2016/02/01/aspnet_online_learning_distance_education_VS2015
線上課程教學,遠距教學 (ASP.NET MVC 約 140hr) https://dotblogs.com.tw/mis2000lab/2018/08/14/ASPnet_MVC_Online_Learning_MIS2000Lab
寫信給我,不要私訊 -- mis2000lab (at) yahoo.com.tw 或 school (at) mis2000lab.net
(1) 第一天 ASP.NET MVC5 完整影片(5.5小時 / .NET 4.x版)免費試聽。影片 https://youtu.be/9spaHik87-A
(2) 第一天 ASP.NET Core MVC 完整影片(3小時 / .NET Core 6.0~8.0)免費試聽。影片 https://youtu.be/TSmwpT-Bx4I
[學員感言] mis2000lab課程評價 - ASP.NET MVC , WebForm 。 https://mis2000lab.medium.com/%E5%AD%B8%E5%93%A1%E6%84%9F%E8%A8%80-mis2000lab%E8%AA%B2%E7%A8%8B%E8%A9%95%E5%83%B9-asp-net-mvc-webform-77903ce9680b
ASP.NET遠距教學、線上課程(Web Form + MVC)。 第一天課程, "完整" 試聽。
......... facebook社團 https://www.facebook.com/mis2000lab ......................
......... YouTube (ASP.NET) 線上教學影片 https://www.youtube.com/channel/UC6IPPf6tvsNG8zX3u1LddvA/
Blog文章 "附的範例" 無法下載,請看 https://dotblogs.com.tw/mis2000lab/2016/03/14/2008_2015_mis2000lab_sample_download
請看我們的「售後服務」範圍(嚴格認定)。
......................................................................................................................................................
ASP.NET MVC => .NET Core MVC 線上教學 ...... 第一天課程 完整內容 "免費"讓您評估 / 試聽
[遠距教學、教學影片] ASP.NET (Web Form) 課程 上線了!MIS2000Lab.主講 事先錄好的影片,並非上課側錄! 觀看時,有如「一對一」面對面講課。