未定义类型“DBConfig.ClsDBConfig”。
'从指定INI文件中读取配置信息
Sub GetDBConfigAccess(ByVal mInIFileName As String, ByVal mKey As String, ByRef mDBConnstring As String, ByRef mDBConnstringPivot As String)
Try
Dim oDB As New DBConfig.ClsDBConfig(mInIFileName, DBConfig.ClsDBConfig.MyDataProvider.OleDb, mKey)
mDBConnstring = oDB.ReadDBConnstringFromInI()
mDBConnstringPivot = oDB.ReadDBConnstringPivotFromInI
Catch ex As Exception
MsgBox("读取配置文件失败,原因:" & ex.Message, MsgBoxStyle.OKOnly, "错误提示:")
End Try
End Sub