我无法访问我的sql数据库中的所有表
请有人可以帮我解决这个问题。 我有一个VBA中的表单，从此我想运行一些SQL查询，并从我的数据库中检索数据，然后将结果放在窗体（GUI）中的文本框中，
我在我的数据库中有大约20个表，但令人惊讶的是我只能访问第一个表（InventoryCompleteList）。 每个尝试访问另一个表返回一个错误，例如（Invalidobject名'functionalTestResults'），而当我运行查询（inventoryCompleteList），似乎是工作。 注意functionalTestResults和inventoryCompleteList都是我的sql服务器中的表请任何人都可以帮我找出问题可能是什么。 以下是我的数据库的视图
`Private Sub ENTER_Click() Dim cn As Object Dim rs As Object Dim strFile As String Dim strCon As String Dim strSQL, strInput As String strCon = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=True;Initial Catalog=KBOW;Data Source=10.23.30.8\KBOW;Use Procedure for Prepare=1;Auto Translate=True;Packet Size=4096;Workstation ID=ULWW101;Use Encryption for Data=False;Tag with column collation when possible=False;" Set cn = CreateObject("ADODB.Connection") cn.Open strCon strSQL = "SELECT Date,Location FROM functionalTestResults;" 'Added the following four lines Set rs = CreateObject("ADODB.RECORDSET") rs.ActiveConnection = cn rs.Open strSQL Sheet1.Range("A1").CopyFromRecordset rs Result.Text = "CopyFromRecordset rs" 'removed 'cn.Execute strSQL rs.Close cn.Close Set cn = Nothing End Sub `
您需要在这些表上被授予“select”，因为您目前似乎没有此权限。
与您的dba谈谈被授予访问此表的权限。