使用ADO+（二）, 设定 DataGrid 的外观
日期：2011-11-01 浏览次数：20435 次
<!-- <%@ Page Trace="True" %> -->
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.SqlClient" %>
<Html>
<Body BgColor="White">
<H3>使用 ADO+, 结合 DataGrid -- ado+.aspx <HR></H3>
<asp:DataGrid HeaderStyle-BackColor="Cyan" id="Grid1" runat="server"/>
</Body>
</Html>
<script Language="VB" runat="server">
Sub Page_Load(Src As Object, e As EventArgs)
Grid1.DataSource = CreateDataView( "pubs", "Authors" )
Grid1.DataBind()
End Sub
Function CreateDataView( Db As String, Table As String ) As DataView
Dim ConnStr, SQL As String
ConnStr = "server=hnby-dom;uid=sa;pwd=;database="&Db
Dim Conn As SqlConnection
Dim Cmd As SqlDataAdapter
Conn = new SqlConnection(ConnStr)
Cmd = New SqlDataAdapter( "Select * from " & Table, ConnStr )
Dim ds As DataSet = new DataSet()
Cmd.Fill(ds, Table)
CreateDataView = new DataView(ds.Tables(Table))
End Function
</script>
和使用ADO+（一）不同，这里用到一个函数CreateDataView，你可以单独吧这个函数做到一个包含页面里。
------------------------------------------------
以上在win2000server,win2000professional,sql6.0，Microsoft .NET Framework SDK beta2测试通过。
实例：http://202.102.247.235/aspx/ado2.aspx
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.SqlClient" %>
<Html>
<Body BgColor="White">
<H3>使用 ADO+, 结合 DataGrid -- ado+.aspx <HR></H3>
<asp:DataGrid HeaderStyle-BackColor="Cyan" id="Grid1" runat="server"/>
</Body>
</Html>
<script Language="VB" runat="server">
Sub Page_Load(Src As Object, e As EventArgs)
Grid1.DataSource = CreateDataView( "pubs", "Authors" )
Grid1.DataBind()
End Sub
Function CreateDataView( Db As String, Table As String ) As DataView
Dim ConnStr, SQL As String
ConnStr = "server=hnby-dom;uid=sa;pwd=;database="&Db
Dim Conn As SqlConnection
Dim Cmd As SqlDataAdapter
Conn = new SqlConnection(ConnStr)
Cmd = New SqlDataAdapter( "Select * from " & Table, ConnStr )
Dim ds As DataSet = new DataSet()
Cmd.Fill(ds, Table)
CreateDataView = new DataView(ds.Tables(Table))
End Function
</script>
和使用ADO+（一）不同，这里用到一个函数CreateDataView，你可以单独吧这个函数做到一个包含页面里。
------------------------------------------------
以上在win2000server,win2000professional,sql6.0，Microsoft .NET Framework SDK beta2测试通过。
实例：http://202.102.247.235/aspx/ado2.aspx
免责声明： 本文仅代表作者个人观点，与爱易网无关。其原创性以及文中陈述文字和内容未经本站证实，对本文以及其中全部或者部分内容、文字的真实性、完整性、及时性本站不作任何保证或承诺，请读者仅作参考，并请自行核实相关内容。
