(How to add Bootsrap Tooltip in Checkboxlist) - Checkboxlist là Control cho phép người sử dụng chọn đồng thời nhiều giá trị tại một thời điểm. Do không gian bị hạn chế nên thông thường người lập trình thường hiển thị tên của từng giá trị trên danh sách Checkboxlist, và khi cần mô tả rõ ràng từng mục sẽ sử dụng Tooltip. Bài viết dưới đây sẽ giới thiệu với các bạn cách sử dụng Bootsrap Tooltip để thêm vào Checkboxlist.
- B1: Download CSDL Northwind tại đây và thực hiện công việc Restore Data.
- B1: Download CSDL Northwind tại đây và thực hiện công việc Restore Data.
- B2: Tạo Project trong Microsoft Visual Studio 2010
Trong Visual Studio tạo 1 Class có tên: Utility và nhập đoạn Code phía dưới cho Class này.
C# Code
using System;
using System.Collections.Generic;
using System.Linq;
using System.Web;
using System.Data.SqlClient;
using System.Data;
using System.Configuration;
namespace BootsrapTooltipToCheckboxlist
{
public class SqlDataProvider
{
#region "Membres Prives"
private string _connectionString;
#endregion
#region "Constructeurs"
public SqlDataProvider()
{
try
{
_connectionString = ConfigurationManager.ConnectionStrings["SiteSqlServer"].ConnectionString;
}
catch
{
}
}
#endregion
#region "Proprietes"
public string ConnectionString
{
get { return _connectionString; }
}
#endregion
#region "Functions"
public DataTable FillTable(string sql)
{
try
{
DataTable tb = new DataTable();
SqlDataAdapter adap = new SqlDataAdapter(sql, _connectionString);
adap.Fill(tb);
return tb;
}
catch
{
return null;
}
}
#endregion
}
}
VB.NET Code
Imports System.Data.SqlClient
Imports System.Data
Namespace BootsrapTooltipToCheckboxlist
Public Class SqlDataProvider
#Region "Membres Prives"
Shared _IsError As Boolean = False
Private _connectionString As String
#End Region
#Region "Constructeurs"
Public Sub New()
Try
_connectionString = ConfigurationManager.ConnectionStrings("SiteSqlServer").ConnectionString
_IsError = False
Catch ex As Exception
_IsError = True
End Try
End Sub
#End Region
#Region "Proprietes"
Public ReadOnly Property ConnectionString() As String
Get
Return _connectionString
End Get
End Property
#End Region
#Region "Functions"
Public Function FillTable(ByVal sql As String) As DataTable
Try
Dim tb As New DataTable
Dim adap As New SqlDataAdapter(sql, _connectionString)
adap.Fill(tb)
Return tb
Catch ex As Exception
Return Nothing
End Try
End Function
#End Region
End Class
Chú ý: Thuộc tính SiteSqlServer chính là chuỗi Connect với SQL Server trong file Web.Config
- B3: Mở file Site.Master dạng HTML và bổ xung đoạn mã phía dưới trong thẻ Head
<head runat="server">
<title>Add Bootsrap Tooltip to Checkboxlist in Asp.net</title>
<link href="~/Styles/Site.css"rel="stylesheet"type="text/css"/>
<link href="Styles/Button.css"rel="stylesheet"type="text/css"/>
<link href="Styles/bootstrap.css"rel="stylesheet"type="text/css"/>
<script type="text/javascript"src="https://ajax.googleapis.com/ajax/libs/jquery/1.11.1/jquery.min.js"></script>
<script type="text/javascript"src="https://maxcdn.bootstrapcdn.com/bootstrap/3.2.0/js/bootstrap.min.js"></script>
<script type="text/javascript">
$(document).ready(function () {
$('[data-toggle="tooltip"]').tooltip({
});
});
</script>
<asp:ContentPlaceHolderID="HeadContent"runat="server">
</asp:ContentPlaceHolder>
</head>
- B4: Mở file Default.aspx dưới dạng HTML và nhập mã HTML
<%@ PageTitle="Add Bootsrap Tooltip to Checkboxlist in Asp.net" Language="C#"MasterPageFile="~/Site.master"AutoEventWireup="true"CodeBehind="Default.aspx.cs"Inherits="BootsrapTooltipToCheckboxlist._Default"%>
<asp:Content ID="HeaderContent" runat="server" ContentPlaceHolderID="HeadContent">
</asp:Content>
<asp:Content ID="BodyContent" runat="server" ContentPlaceHolderID="MainContent">
<div class="panel panel-default" style="width:65%;">
<div class="panel-heading">
<h3>Add Bootsrap Tooltip to Checkboxlist in Asp.net</h3>
</div>
<div class="panel-body">
<asp:checkboxlist id="chkCategories"runat="server"cellspacing="2"cellpadding="3"RepeatColumns="4"Width="100%"></asp:checkboxlist>
</div>
</div>
</asp:Content>
- B5: Viết Code cho file Default.aspx
C# Code
//Visit http://www.laptrinhdotnet.com for more ASP.NET Tutorials
using Microsoft.VisualBasic;
using System;
using System.Collections;
using System.Collections.Generic;
using System.Data;
using System.Diagnostics;
namespace BootsrapTooltipToCheckboxlist
{
public partial class _Default : System.Web.UI.Page
{
#region"Bind Data"
private voidBindData()
{
DataTableobjBind = new DataTable();
int i = 0;
string sTooltip = "";
objBind = GetData();
chkCategories.DataTextField = "CategoryName";
chkCategories.DataValueField = "CategoryID";
chkCategories.DataSource = objBind;
chkCategories.DataBind();
if (objBind != null)
{
if (objBind.Rows.Count > 0)
{
foreach (DataRowrow in objBind.Rows)
{
sTooltip = row["Description"].ToString();
chkCategories.Items[i].Attributes.Add("data-toggle", "tooltip");
chkCategories.Items[i].Attributes.Add("data-placement", "top");
chkCategories.Items[i].Attributes.Add("data-original-title", sTooltip);
i = i + 1;
}
}
}
}
private DataTableGetData()
{
SqlDataProviderobjSQL = new SqlDataProvider();
DataTable objBind = default(DataTable);
//Caching
if (Cache["Cache_Categories"] == null)
{
objBind = objSQL.FillTable("Select * from Categories");
Cache["Cache_Categories"] = objBind;
}
else
{
objBind = (DataTable)Cache["Cache_Categories"];
}
return objBind;
}
#endregion
#region"Event Handles"
protected voidPage_Load(object sender, System.EventArgs e)
{
try
{
if (!IsPostBack)
{
BindData();
}
}
catch
{
}
}
#endregion
}
}
VB.NET Code
'Visit http://www.laptrinhdotnet.com for more ASP.NET Tutorials
Namespace BootsrapTooltipToCheckboxlist
Public Class _Default
Inherits System.Web.UI.Page
#Region "Bind Data"
Private SubBindData()
Dim objBind As New DataTable
Dim i As Integer = 0
Dim sTooltip As String = ""
objBind = GetData()
chkCategories.DataTextField = "CategoryName"
chkCategories.DataValueField = "CategoryID"
chkCategories.DataSource = objBind
chkCategories.DataBind()
If Not objBind Is Nothing Then
If objBind.Rows.Count > 0 Then
For Eachrow As DataRowIn objBind.Rows
sTooltip = row("Description").ToString
chkCategories.Items(i).Attributes.Add("data-toggle", "tooltip")
chkCategories.Items(i).Attributes.Add("data-placement", "top")
chkCategories.Items(i).Attributes.Add("data-original-title", sTooltip)
i = i + 1
Next
End If
End If
End Sub
Private FunctionGetData() As DataTable
Dim objSQL As New SqlDataProvider
Dim objBind As DataTable
'Caching
If Cache("Cache_Categories") Is Nothing Then
objBind = objSQL.FillTable("Select * from Categories")
Cache("Cache_Categories") = objBind
Else
objBind = CType(Cache("Cache_Categories"), DataTable)
End If
Return objBind
End Function
#End Region
#Region "Event Handles"
Protected SubPage_Load(ByVal sender AsObject, ByVal e As System.EventArgs) Handles Me.Load
Try
If Page.IsPostBack = False Then
BindData()
End If
Catch ex As Exception
End Try
End Sub
#End Region
End Class
Chúc các bạn thành công!
Quang Bình
0 comments Blogger 0 Facebook
Post a Comment