.NET开发

本类阅读TOP10

·NHibernate快速指南(翻译)
·vs.net 2005中文版下载地址收藏
·【小技巧】一个判断session是否过期的小技巧
·VB/ASP 调用 SQL Server 的存储过程
·?dos下编译.net程序找不到csc.exe文件
·通过Web Services上传和下载文件
·学习笔记(补)《.NET框架程序设计(修订版)》--目录
·VB.NET实现DirectDraw9 (2) 动画
·VB.NET实现DirectDraw9 (1) 托管的DDraw
·建站框架规范书之——文件命名

分类导航
VC语言Delphi
VB语言ASP
PerlJava
Script数据库
其他语言游戏开发
文件格式网站制作
软件工程.NET开发
利用OleDb的GetOLEDBSchemaTable方法得到数据库架构信息

作者:未知 来源:月光软件站 加入时间:2005-2-28 月光软件站

利用OleDb的GetOLEDBSchemaTable方法得到数据库架构信息
作者:孟宪会 出自:【孟宪会之精彩世界】 发布日期:2003年7月2日 9点16分16秒

我们可以利用OleDb的GetOLEDBSchemaTable方法得到数据库的所有视图,表,存储过程等信息。

GetDataBaseSchema.aspx

<%@ Page Language="vb" AutoEventWireup="false" Codebehind="GetDataBaseSchema.aspx.vb" Inherits="aspxWeb.GetDataBaseSchema"%> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML> <HEAD> <title>GetDataBaseSchama</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"> <form id="Form1" method="post" runat="server"> <asp:DataGrid id="DataGrid1" runat="server"></asp:DataGrid><br> <asp:DataGrid id="DataGrid2" runat="server"></asp:DataGrid><br> <asp:DataGrid id="DataGrid3" runat="server"></asp:DataGrid><br> <asp:DataGrid id="DataGrid4" runat="server"></asp:DataGrid><br> <asp:DataGrid id="Datagrid5" runat="server"></asp:DataGrid><br> <asp:DataGrid id="Datagrid6" runat="server"></asp:DataGrid> </form> </body> </HTML>

GetDataBaseSchema.aspx.vb

Imports System Imports System.Data Imports System.Data.OleDb Public Class GetDataBaseSchema Inherits System.Web.UI.Page Protected WithEvents DataGrid2 As System.Web.UI.WebControls.DataGrid Protected WithEvents DataGrid3 As System.Web.UI.WebControls.DataGrid Protected WithEvents DataGrid4 As System.Web.UI.WebControls.DataGrid Protected WithEvents Datagrid5 As System.Web.UI.WebControls.DataGrid Protected WithEvents Datagrid6 As System.Web.UI.WebControls.DataGrid Protected WithEvents DataGrid1 As System.Web.UI.WebControls.DataGrid #Region " Web Form Designer Generated Code " <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 InitializeComponent() End Sub #End Region Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) _ Handles MyBase.Load '如何得到数据库中的架构信息? 'GetOLEDBSchemaTable函数有两个方法: 'OLEDBSchemaGUID 'Restrictions '参数OLEDBSchemaGUID 的成员:Tables, Procedures, Views, Columns, Catlogs 等 '参数restrictions为限制条件,是一个对象数组,原来过虑架构结果信息, '每一个对象映射到所返回的datacolumn的值。 Dim strCnn As String strCnn = "Provider=SqlOLEDB; Data Source=.\NetSDK; Initial Catalog=pubs;User ID=sa;Password=;" Dim dataConn As New OleDbConnection(strCnn) Try dataConn.Open() Dim schemaTable As DataTable schemaTable = dataConn.GetOleDbSchemaTable(OleDbSchemaGuid.Tables, Nothing) '得到全部的表、视图 DataGrid1.DataSource = schemaTable DataGrid1.DataBind() schemaTable = dataConn.GetOleDbSchemaTable(OleDbSchemaGuid.Tables, New Object() {Nothing, Nothing, Nothing, "TABLE"}) '得到全部的用户表,用户表类型为Table,进行过虑 DataGrid2.DataSource = schemaTable DataGrid2.DataBind() schemaTable = dataConn.GetOleDbSchemaTable(OleDbSchemaGuid.Tables, New Object() {Nothing, Nothing, Nothing, "VIEW"}) '得到全部的视图 DataGrid3.DataSource = schemaTable DataGrid3.DataBind() schemaTable = dataConn.GetOleDbSchemaTable(OleDbSchemaGuid.Procedures, Nothing) '得到全部的存储过程 DataGrid4.DataSource = schemaTable DataGrid4.DataBind() schemaTable = dataConn.GetOleDbSchemaTable(OleDbSchemaGuid.Provider_Types, Nothing) '得到全部支持的数据类型 Datagrid5.DataSource = schemaTable Datagrid5.DataBind() schemaTable = dataConn.GetOleDbSchemaTable(OleDbSchemaGuid.Primary_Keys, Nothing) Datagrid6.DataSource = schemaTable Datagrid6.DataBind() Catch ex As Exception Response.Write(ex.Message.ToString()) Finally dataConn.Close() End Try End Sub End Class



相关文章

相关软件