【发布时间】：2013-12-20 00:36:51
【问题描述】：
我有一个旧的 VB6 应用程序，我终于要更新到 .NET，但我遇到了一个绊脚石：它所做的一件事是使用 ADODB 提供与数据库的当前连接列表使用this GUID specified by Microsoft 发布的特定于提供程序的架构行集。这是工作的 ADODB 代码
Set RS = CN.OpenSchema(adSchemaProviderSpecific, , "{947bb102-5d43-11d1-bdbf-00c04fb92675}")
现在我知道，如果我要添加对最新 COM ActiveX 数据对象库的引用，我仍然可以使用此 ADODB 方法，但我真的很想避免这种情况，如果可能的话，并找到一种方法来做到这一点使用 OLEDB。
我创建了下面的函数，并尝试了 GetOleDbSchemaTable 和 GetSchema 的各种组合 - 有限制和无限制以及 GUID 作为字符串传递，但它总是出错或返回空表。
'Get a list of users connected to the core database
Public Function GetUserRoster() As DataTable
Dim connString As String = GetConnString(coreDB)
If String.IsNullOrEmpty(connString) Then Return Nothing
Using conn As New OleDbConnection(connString)
Try
conn.Open()
Dim oGUID As New Guid("{947bb102-5d43-11d1-bdbf-00c04fb92675}")
Dim restrictions() As String = {Nothing, Nothing, Nothing, "Table"}
Dim schemaTable As DataTable = conn.GetOleDbSchemaTable(oGUID, restrictions)
Return schemaTable
Catch ex As Exception
logger.Error("Failed to evaluate the database user roster. {0}{1}", vbCrLf, ex.ToString)
End Try
End Using
Return Nothing
End Function
那么，这是否可能，或者我除了使用旧的 COM ADODB 函数别无选择？
【问题讨论】：
-
@YuriyGalanter 是的，在过去的两天里，我已经阅读了那篇文章 - 以及其他几十篇文章，但我仍然没有更聪明。不幸的是，我发现的所有示例都只显示了如何检索表信息……我已经知道该怎么做了。
-
我也看了一点，显然 .NET 中没有直接关联，您可能必须通过 COM 互操作使用 ADODB
-
@YuriyGalanter 我很遗憾得出了同样的结论。但是，不得不使用旧的、被认为是“劣等”的方法来完成人们认为应该是相对简单的任务，这太烦人了。
标签： vb.net ms-access oledb jet