如何： 检索从 Excel 浣跨敤 Visual C#.net 中的 GetOleDbSchemaTable 的元数据

回到顶端

该技术的说明

回到顶端

要求

• Microsoft Visual Studio.net 兼容的 Microsoft Windows 操作系统上安装。
• 至少一个 Microsoft Excel 工作簿 (.xls) 具有文件的一些行和列的数据。

• Microsoft Visual C#.net。
• Microsoft ADO.NET 数据访问。
• Microsoft Excel 工作簿和工作表。

回到顶端

示例

1. 启动 Visual Studio.net 并创建新的 Visual C# Windows 窗体应用项目。
2. 向 Form1 中添加三个 按钮 控件和两个 DataGrid 控件。 更改分别命名按钮 检索元数据、 格式的表格列表，和 格式列列表，Button 控件的 Text 属性。
3. 切换到代码模块中为窗体并添加任何其他代码之前下列语句：

   using System.ComponentModel;
   using System.Data;
   using System.Data.OleDb;
   					

4. Form 类中插入下面的模块级声明。 已连接到 Excel 工作簿文件包含一些行和列的数据点的字符串

          private  OleDbConnection cn;
          private String strCn = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=c:\\test.xls;Extended Properties=Excel 8.0";
          private DataTable dtTables;
          private CurrencyManager cm;
          private DataTable dtColumns;
          private DataView  dvColumns;
   					

5. Form 类中的 Windows 窗体设计器生成的代码节后插入下面的代码。 此代码调用 GetOleDbSchemaTable 加载表和列列出了、 填充 DataGrids 中，并且更新列列表中选定的表发生更改时

   private void button1_Click(object sender, System.EventArgs e)
   {
           GetTablesList();	
   }
   private void GetTablesList()
   {
   	try
   	{
   	        cn = new OleDbConnection(strCn);
   		cn.Open();
   		dtTables = cn.GetOleDbSchemaTable(OleDbSchemaGuid.Tables, new object[]{null,null,null,"TABLE"});
   		dataGrid1.DataSource = dtTables;
   		dataGrid1.ReadOnly = true;
   		cn.Close();
   	}
   	catch(System.Data.OleDb.OleDbException myException)
   	{
   		for (int i=0; i < myException.Errors.Count; i++)
   		{
   			MessageBox.Show("Index #" + i + "\n" +
   			"Message: " + myException.Errors[i].Message + "\n" +
   			"Native: " +                          
   myException.Errors[i].NativeError.ToString() + "\n" +
   			"Source: " + myException.Errors[i].Source + "\n" +
   			"SQL: " + myException.Errors[i].SQLState + "\n");
   		}
   	}
               
   	GetColumnsList();
   }
   
   private void GetColumnsList()
   {	
   	if( cm == null)
   		cm = (CurrencyManager)this.BindingContext [dtTables];
                   
   	cm.PositionChanged += new EventHandler(this.cm_PositionChanged );
   			
   	int r = cm.Position;
   
           String strTable = dtTables.Rows[r]["TABLE_NAME"].ToString ();
           cn = new OleDbConnection(strCn);
   	cn.Open();
   	dtColumns = cn.GetOleDbSchemaTable(OleDbSchemaGuid.Columns,new Object[]{null,null, strTable, null});
           dvColumns = new DataView(dtColumns);
           dvColumns.Sort = "ORDINAL_POSITION";
           dataGrid2.DataSource = dvColumns;
   	dataGrid2.ReadOnly = true;
   	cn.Close();
   }
   		
   private void cm_PositionChanged( object sender, System.EventArgs e)
   {
   	GetColumnsList();
   }
   								
   					

6. 插入版式和格式使用 TableStyles 的表 DataGrid 到下面的代码。 请注意 PropertyDescriptor，以便于非默认格式的日期列的使用

   private void button2_Click(object sender, System.EventArgs e)
   {
   	FormatTablesGrid(dtTables);
   }
   
   private void FormatTablesGrid(DataTable dt2format)
   {
   	DataGridTableStyle gs = new DataGridTableStyle();
           gs.MappingName = dt2format.TableName;
               
   	DataGridColumnStyle cs = new DataGridTextBoxColumn();
               
   	cs.MappingName = "TABLE_NAME";
   	cs.HeaderText = "Table Name";
   	cs.Width = 75;
   		
   	gs.GridColumnStyles.Add(cs);
   			
   	cs = new DataGridTextBoxColumn();
   	cs.MappingName = "TABLE_TYPE";
   	cs.HeaderText = "Table Type";
   	cs.Width = 75;
   		
   	gs.GridColumnStyles.Add(cs);
   
   	CurrencyManager cm = (CurrencyManager)this.BindingContext[dt2format];
   			
   	PropertyDescriptor pd = cm.GetItemProperties()["DATE_CREATED"];
   	
   	cs = new DataGridTextBoxColumn(pd, "d");
           cs.MappingName = "DATE_CREATED";
   	cs.HeaderText = "Date Created";
           cs.Width = 75;
   			
   	gs.GridColumnStyles.Add(cs);
   
   	cm = ( CurrencyManager)this.BindingContext[dt2format];
   	pd = cm.GetItemProperties()["DATE_MODIFIED"];
   
   	cs = new DataGridTextBoxColumn(pd, "d");
           cs.MappingName = "DATE_MODIFIED";
           cs.HeaderText = "Date Modified";
           cs.Width = 75;
   			
   	gs.GridColumnStyles.Add(cs);
   
   	dataGrid1.TableStyles.Add(gs);
   	button2.Enabled = false;
   
   }
   					

7. 插入以下代码以排列并通过使用 TableStyle 格式化列 DataGrid：

           private void button3_Click(object sender, System.EventArgs e)
   	{
   		FormatColumnsGrid(dtTables);
   	}
   		
   		
           private void FormatColumnsGrid(DataTable dt2format)
   	{
   	    DataGridTableStyle gs = new DataGridTableStyle();
               gs.MappingName = dtColumns.TableName;
               
   	    DataGridColumnStyle cs = new DataGridTextBoxColumn();
               cs.MappingName = "COLUMN_NAME";
               cs.HeaderText = "Column Name";
               cs.Width = 100;
   
   	    gs.GridColumnStyles.Add(cs);
   
   	    cs = new DataGridTextBoxColumn();
               cs.MappingName = "ORDINAL_POSITION";
               cs.HeaderText = "Ordinal Position";
               cs.Width = 100;
   
   			gs.GridColumnStyles.Add(cs);
   
               cs = new DataGridTextBoxColumn();
               cs.MappingName = "DATA_TYPE";
   	    cs.HeaderText = "Data Type";
   	    cs.Width = 75;
   
   	    gs.GridColumnStyles.Add(cs);
   
               cs = new DataGridTextBoxColumn();
               cs.MappingName = "CHARACTER_MAXIMUM_LENGTH";
               cs.HeaderText = "Text Length";
   	    cs.Width = 75;
   
   	    gs.GridColumnStyles.Add(cs);
   
               cs = new DataGridTextBoxColumn();
               cs.MappingName = "NUMERIC_PRECISION";
               cs.HeaderText = "Numeric Precision";
   	    cs.Width = 75;
   
   	    gs.GridColumnStyles.Add(cs);
               dataGrid2.TableStyles.Add(gs);
   
               button3.Enabled = false;
   
   	}
   					

8. 运行项目。
9. 单击 检索元数据 (Button1）。
   
   表 列表 (DataGrid1) 充满 GetOleDbSchemaTable 方法所返回的 Excel 工作簿中的每个表的信息的所有列。 列 列表中 (DataGrid2) 填充在同一时间与返回的列在 表 列表中第一个表中的信息的所有列。
10. 从 表 列表中选择一个不同的表。
    
    列列表中显示选定表 cm_PositionChanged 事件处理程序的列。
11. 单击 格式表列表 （Button2）。 这定义并应用一个 TableMappingStyle DataGrid1，以进行更友好的列标题和显示有用的数据中，只有四个列
    TABLE_NAME
    TABLE_TYPE
    DATE_CREATED
    DATE_MODIFIED
    而非九个 GetOleDbSchemaTable 方法所返回的列。
    
    空白单元格列未显示的是：
    TABLE_CATALOG
    TABLE_SCHEMA
    TABLE_GUID
    说明
    TABLE_PROPID
12. 单击 格式列列表 (Button3)。 这定义并应用一个 TableMappingStyle DataGrid2，以进行更友好的列标题和显示仅五个最有用的列从 28 列 COLUMN_NAME ORDINAL_POSITION DATA_TYPE MAXIMUM_CHARACTER_LENGTH NUMERIC_PRECISION GetOleDbSchemaTable 方法所返回的数据。
    
    列未显示的是：
    
    
    TABLE_CATALOG
    TABLE_SCHEMA
    TABLE_NAME (已知)
    COLUMN_GUID
    COLUMN_PROPID
    COLUMN_HASDEFAULT (总是 false)
    COLUMN_DEFAULT
    COLUMN_FLAGS
    IS_NULLABLE (始终 true)
    TYPE_GUID
    CHARACTER_OCTET_LENGTH
    NUMERIC_SCALE
    DATETIME_PRECISION
    CHARACTER_SET_CATALOG
    CHARACTER_SET_SCHEMA
    CHARACTER_SET_NAME
    COLLATION_CATALOG
    COLLATION_SCHEMA
    COLLATION_NAME
    DOMAIN_CATALOG
    DOMAIN_SCHEMA
    域名
    说明
13. 单击以选择另一个表的 DataGrid1 中不同的行。 自动更新列列表中。 以前应用于每个 DataGridTableStyles 仍然有效。

回到顶端

鐤戦毦瑙 g 瓟

• 对于 Excel 数据源 GetOleDbSchemaTable 方法返回列的数据类型不是在所有情况下要在早期版本的 ADO OpenSchema 方法所返回的数据类型相同：
  收起该表格展开该表格

  列类型	经典 ADO	ADO.Net (OleDb)
  数字	5 adDouble	5 OleDbType.Double
  货币	6 adCurrency	6 OleDbType.Currency
  日期/时间	7 adDate	7 OleDbType.Date
  布尔值	11 adBoolean	11 OleDbType.Boolean
  文本 < 255	202 adVarWChar	130 OleDbType.WChar
  备忘录	203 adLongVarWChar	130 OleDbType.WChar

  
  
• GetOleDbSchemaTable，类似于 OpenSchema，从空的 Excel 工作表中返回单个列 （"f1"） 时，在事实的方式数据表无数据或列标题都存在。

回到顶端