VB.net 2010 视频教程 VB.net 2010 视频教程 python基础视频教程
SQL Server 2008 视频教程 c#入门经典教程 Visual Basic从门到精通视频教程
当前位置:
首页 > 编程开发 > vb >
  • vb.net 教程 8-3 数据库操作8

版权声明:本文为博主原创文章,转载请在显著位置标明本文出处以及作者网名,未经作者允许不得用于商业目的。
 
本节再接再厉,看看数据库还有些什么样的架构。
 
上一节的学习,我们已经知道使用 OleDbConnection.GetOleDbSchemaTable来获得数据库的架构,
 
GetOleDbSchemaTable 的声明如下:
 
Public Function GetOleDbSchemaTable ( schemaAs Guid, restrictions AsObject() ) As DataTable
 
schema是System.Data.OleDb.OleDbSchemaGuid类,实际使用的时候是使用的OleDbSchemaGuid 的值之一,
 
它指定要返回的架构表。MSDN解释中指明了该类有很多静态成员(以下是部分):
 
 
 
为了看看所有的表架构信息,可以将OleDbSchemaGuid成员一一列出来,再根据成员写代码,
 
但是
 
很麻烦。
 
所以
 
本例子中将使用一点高级的技术——反射:Reflection
 
通过反射获得所有的成员信息:
 
    Private Sub Form2_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Dim OleDbSchemaGuidType As Type = GetType(OleDbSchemaGuid)
        For Each OleDbSchemaGuidType_Member As Reflection.MemberInfo In OleDbSchemaGuidType.GetMembers
            If OleDbSchemaGuidType_Member.MemberType = Reflection.MemberTypes.Field Then
                ComboBox1.Items.Add(OleDbSchemaGuidType_Member.Name)
            End If
        Next
    End Sub
运行时可以看到,在ComboBox中列出了所有的OleDbSchemaGuid成员:
 
 
 
按下按钮后根据选择的表架构类型获得相应的信息填充到DataGridView中:
 
 
 
    Private Sub Button14_Click(sender As Object, e As EventArgs) Handles Button14.Click
        Dim OleDbSchemaGuidType As Type = GetType(OleDbSchemaGuid)
        For Each OleDbSchemaGuidType_Member As Reflection.MemberInfo In OleDbSchemaGuidType.GetMembers
            If OleDbSchemaGuidType_Member.Name = ComboBox1.Text Then
 
                Dim odc As New OleDbConnection()
                odc.ConnectionString = "Provider = Microsoft.ACE.OLEDB.12.0;data source=D:\save\博客教程\08 数据库\Northwind.mdb"
                Try
                    odc.Open()
                    Dim dt As DataTable
                    dt = odc.GetOleDbSchemaTable(OleDbSchemaGuidType.InvokeMember(OleDbSchemaGuidType_Member.Name, Reflection.BindingFlags.GetField, Nothing, Nothing, Nothing), Nothing)  ' (OleDbSchemaGuidType_Member.DeclaringType, Guid), Nothing)
 
                    DataGridView1.DataSource = dt
 
                Catch ex As Exception
                    MessageBox.Show("错误信息:" & ex.Message)
                Finally
                    odc.Close()
                End Try
 
            End If
        Next
    End Sub
比如选择Columns的架构信息:
 
 
 
 
 
当然并不是所有的架构信息都支持mdb数据库,幸好我们在代码中设置了Try...Catch...防止错误发生导致程序崩溃,仅仅出现一个提示:
 
 
 
 
 
由于本章属于数据库操作,所以对于反射不会详细讲解,大家掌握数据架构相关知识就行了。
 
以后有机会再慢慢讲讲反射。
 
 
 
 
 
由于.net平台下C#和vb.NET很相似,本文也可以为C#爱好者提供参考。
 
学习更多vb.net知识,请参看vb.net 教程 目录
 
 
————————————————
版权声明:本文为CSDN博主「VB.Net」的原创文章,遵循CC 4.0 BY-SA版权协议,转载请附上原文出处链接及本声明。
原文链接:https://blog.csdn.net/uruseibest/article/details/78796932

相关教程