Извлечение столбца с псевдонимом таблицы не работает в VBA

Question

Я пытаюсь подключиться к таблице Oracle через VBA и получать данные. Моя ситуация заключается в том, чтобы несколько раз ссылаться на одну таблицу, чтобы сделать поворот. Но во время выполнения запроса через VBA он выдает ошибку, поскольку я получаю данные через псевдоним таблицы: Ниже приведен фиктивный код.

Sub Button1_Click() 
    Dim strDataSource, strUsername, strPassword, strConnectionString, strquery As String 
    Dim objADODBConnection, objADODBRecordset As Object 
     strDataSource = "xxxx" 
     strUsername = "xxxx" 
     strPassword = "xxxx" 

     strConnectionString = "Provider=MSDAORA;Data Source=" & strDataSource & ";Persist Security Info=True;Password=" & strPassword & ";User ID=" & strUsername 
     Set objADODBConnection = CreateObject("ADODB.Connection") 

     objADODBConnection.Open strConnectionString 
     Set objADODBRecordset = CreateObject("ADODB.Recordset") 

     strquery = "SELECT T1.Column1 FROM Table1 AS T1 WHERE Column2='XXXX' AND Column3='XXXX'" 

     Set objADODBRecordset = objADODBConnection.Execute(strquery) 

     MsgBox objADODBRecordset.Fields(0).Value 

     objADODBRecordset.Close 
     objADODBConnection.Close 
     Set objADODBRecordset = Nothing 
     Set objADODBConnection = Nothing 

End Sub 

Тот же запрос работает без псевдонимов таблицы. Пожалуйста, предложите !!

Answer 1

FROM Table1 AS T1 

Вы должны удалить «AS» в из условия -

FROM Table1 T1