要么自己重绘,要么去下载第 3 方,如 ComponentOne,DevExpress,FlexCell 等
解决方案 »
- Repeater控件的怎样实现斑马线效果??
- 用TableAdapters 方式删除数据库中某个表中所有行的最佳方法是什么
- propertygrid中放入下拉框之后多余的一个基类属性如何去掉?要求以加载就没有。
- WinForm DataGrideView 添加控件问题
- C#操作WORD每个段落后面的属性会覆盖前面的
- =====郁闷的一个小问题======。
- 如果在数据表上实现查询操作???(高分求救)
- 水晶报表里的图片路径可不可以绑定到数据库的字段上????急...........
- 有没有深圳IBM公司的关于.net面试的题目?华为的也可以啊,
- Dev 控件SearchLookUpEdit 里面按钮设置
- 如何在c#中调用vb的方法?
- 从EXCEL里检索数据的问题?
我qq:54407265,
要例子发我
Inherits="aspxWeb.mengxianhui.com.ShowColSpanHeader"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<title id="lucky_elove" runat=server></title>
<meta name="GENERATOR" content="Microsoft Visual Studio.NET 7.0">
<meta name="CODE_LANGUAGE" content="Visual Basic 7.0">
<meta name="vs_defaultClientScript" content="JavaScript">
<meta name="vs_targetSchema" content="http://schemas.microsoft.com/intellisense/ie5">
</HEAD>
<body MS_POSITIONING="GridLayout" leftmargin="0">
<form id="Form1" method="post" runat="server">
<TABLE id="Table1" runat="server" cellSpacing="1" cellPadding="2" width="780" border="1"
bgcolor="#cc6633" bordercolor="#cc9966" style="FONT-SIZE:9pt;BORDER-BOTTOM:0px">
<TR align="center">
<TD colspan="2" width="580"></TD>
<TD width="200" colspan="2"></TD>
</TR>
<TR align="center">
<TD width="400" bgcolor="#66cc99"></TD>
<TD width="180" bgcolor="white"></TD>
<TD width="160" bgcolor="#99cccc"></TD>
<TD width="40" bgcolor="#009999"></TD>
</TR>
</TABLE>
<asp:DataGrid id="DataGrid1" width="780px" AlternatingItemStyle-BackColor="#6699ff"
CellPadding="2" CellSpacing="1" BorderWidth="1" BorderColor="#cc9966" Font-Size="9pt"
runat="server" ShowHeader="False" AutoGenerateColumns="False">
<Columns>
<asp:BoundColumn DataField="Title">
<ItemStyle Width="400px"></ItemStyle>
</asp:BoundColumn>
<asp:BoundColumn DataField="CreateDate">
<ItemStyle Width="180px"></ItemStyle>
</asp:BoundColumn>
<asp:BoundColumn DataField="pid">
<ItemStyle Width="160px"></ItemStyle>
</asp:BoundColumn>
<asp:BoundColumn DataField="HitCount">
<ItemStyle Width="40px"></ItemStyle>
</asp:BoundColumn>
</Columns>
</asp:DataGrid>
</form>
</body>
</HTML>ShowColSpanHeader.aspx.vbImports System
Imports System.Data
Imports System.Data.OleDb
Public Class ShowColSpanHeader
Inherits System.Web.UI.Page
Protected WithEvents Table1 As System.Web.UI.HtmlControls.HtmlTable
Protected WithEvents DataGrid1 As System.Web.UI.WebControls.DataGrid
Protected WithEvents lucky_elove As HtmlControls.HtmlGenericControl
#Region " Web Form Designer Generated Code "
'This call is required by the Web Form Designer.
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
End Sub
Private Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) _
Handles MyBase.Init
'CODEGEN: This method call is required by the Web Form Designer
'Do not modify it using the code editor.
InitializeComponent()
End Sub
#End Region
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) _
Handles MyBase.Load
lucky_elove.InnerText = "【孟宪会之精彩世界】 - 跨栏表头的实现"
Table1.Rows(0).Cells(0).InnerText = "【孟宪会之精彩世界】.NET版本之最新文章"
Table1.Rows(0).Cells(1).InnerText = "文章信息"
Table1.Rows(1).Cells(0).InnerText = "文章标题"
Table1.Rows(1).Cells(1).InnerText = "发布时间"
Table1.Rows(1).Cells(2).InnerText = "所属栏目"
Table1.Rows(1).Cells(3).InnerText = "点击率"
Table1.Rows(0).Style.Add("color", "white")
Table1.Rows(0).Style.Add("font-weight", "bold")
Table1.Rows(0).Cells(0).Attributes.Add("onclick", _
"window.open('http://lucky_elove.www1.dotnetplayground.com/')")
Table1.Rows(0).Cells(0).Style.Add("cursor", "hand")
Try
Dim cnString As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" _
+ Server.MapPath("Test.mdb")
Dim cn As New OleDbConnection(cnString)
cn.Open()
Dim strSQL As String = "SELECT TOP 20 D.Title,D.CreateDate,S.Title as pid,D.HitCount "_
+ "FROM Document D INNER JOIN Subject S ON D.pid = S.id ORDER BY CreateDate DESC"
Dim cmd As New OleDbCommand(strSQL, cn)
DataGrid1.DataSource = cmd.ExecuteReader
DataGrid1.DataBind()
cn.Close()
cn = Nothing
Catch eOle As OleDbException
Response.Write("产生错误:" + eOle.Message)
End Try
End Sub
Private Sub DataGrid1_ItemDataBound(ByVal sender As Object, _
ByVal e As System.Web.UI.WebControls.DataGridItemEventArgs) Handles DataGrid1.ItemDataBound
If e.Item.ItemType = ListItemType.Item Or e.Item.ItemType = ListItemType.AlternatingItem Then
If e.Item.Cells(0).Text.Length > 26 Then
e.Item.Cells(0).Attributes.Add("Title", e.Item.Cells(0).Text)
e.Item.Cells(0).Text = e.Item.Cells(0).Text.Substring(0, 26) + "…"
End If
e.Item.Cells(1).Text=Format(System.Convert.ToDateTime(e.Item.Cells(1).Text),"yyyy年M月d日 h点m分s秒")
End If
End Sub
End Class
这里面有很多不错的文章,你看看对你是否有帮助