关键词搜索

源码搜索 ×
×

vb.net 教程 8-3 数据库操作8

发布2021-09-13浏览313次

详情内容

版权声明:本文为博主原创文章,转载请在显著位置标明本文出处以及作者网名,未经作者允许不得用于商业目的。

本节再接再厉,看看数据库还有些什么样的架构

上一节的学习,我们已经知道使用 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版权协议,转载请附上原文出处链接及本声明。

相关技术文章

点击QQ咨询
开通会员
返回顶部
×
微信扫码支付
微信扫码支付
确定支付下载
请使用微信描二维码支付
×

提示信息

×

选择支付方式

  • 微信支付
  • 支付宝付款
确定支付下载