<<< 返回 access911.net 编程静态资料库索引页 使用 OpenSchema 方法来显示 Pubs 数据库中每个表的名称和类型 作者：MS cg1 摘自：ms access911.net 录入：cg1 时间：2003-3-15 浏览人次：1330
专题地址：http://access911.net/index.asp?u1=a&u2=73FAB61E17DC 如果需要更详细的评论或说明，请点击该地址。 简述：
方法一：
|
OpenSchema 方法范例 (VB)
本范例使用 OpenSchema 方法来显示 Pubs 数据库中每个表的名称和类型。 | Public Sub OpenSchemaX() Dim cnn1 As ADODB.Connection
Dim rstSchema As ADODB.Recordset
Dim strCnn As String
Set cnn1 = New ADODB.Connection
strCnn = "Provider=sqloledb;" & _
"Data Source=srv;Initial Catalog=Pubs;User Id=sa;Password=; "
cnn1.Open strCnn
Set rstSchema = cnn1.OpenSchema(adSchemaTables)
Do Until rstSchema.EOF
Debug.Print "Table name: " & _
rstSchema!TABLE_NAME & vbCr & _
"T.....................
........... |
|
| 
