VB.Net 如何获取Access数据库中的表名称

呵呵，刚刚做这个，就借花献佛了

10余年的丰满网站建设经验，针对设计、前端、开发、售后、文案、推广等六对一服务，响应快，48小时及时工作处理。营销型网站建设的优势是能够根据用户设备显示端的尺寸不同，自动调整丰满建站的显示方式，使网站能够适用不同显示终端，在浏览器中调整网站的宽度，无论在任何一种浏览器上浏览网站，都能展现优雅布局与设计，从而大程度地提升浏览体验。创新互联建站从事“丰满网站设计”,“丰满网站推广”以来，每个客户项目都认真落实执行。

/// summary

/// 获得当前Access数据库的表

/// /summary

/// param name="Source"/param

/// returns/returns

public ArrayList DataScoreTableName(string Source)

{

ArrayList TableName = new ArrayList();

string ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + Source;

OleDbConnection conn = new OleDbConnection(ConnectionString);

conn.Open();

DataTable schemaTable = conn.GetOleDbSchemaTable(OleDbSchemaGuid.Tables,new object[] { null, null, null, "TABLE"});

foreach (DataRow dr in schemaTable.Rows)

{

TableName.Add(dr["TABLE_NAME"]);

}

conn.Close();

return TableName;

}

有一个access数据库里面有几张表，如何在vb.net里获取表的名字？

access数据库中所有的表名都存在一个叫做MSysObjects的表中了，所以在这个表中查询就可以了。以下是代码：

Dim L_dadap As New OleDb.OleDbDataAdapter("select * from MSysObjects ", L_conn)

Dim L_dtable As New DataTable

L_dadap.Fill(L_dtable)

Dim TabName(L_dtable.Rows.Count - 1)

For i = 0 To L_dtable.Rows.Count - 1

TabName(i) = L_dtable.Rows(i).Item("name")

Next

VB.NET操作SQLCE数据库，如何获取SQLCE数据库中所有表的表名 ？

sql

=

"select

name

from

sysobjects

where

type='U'"

获取所有表名，然后再遍历每个表的字段，获取字段名

网页名称：vb.net数据库表名 vbnet数据库编程例子
文章URL：http://myzitong.com/article/ddddddo.html