Неправильный синтаксис рядом с ">>". Excel VBA читает файл .SQL со смешными начальными символами (т.е. ï »¿выбрать 100 лучших * из теста). Проблема с кодировкой

У меня возникли проблемы с этим сценарием VBA, и он, кажется, продолжает добавлять забавные символы (т. Е. ») Каждый раз, когда читает файл .SQL. Я считаю, что это связано с кодировкой.

 Option Explicit

Sub SomeExtract()

With Application
    .ScreenUpdating = False: .DisplayAlerts = False: .Calculation = xlCalculationManual: .EnableEvents = False
End With

Dim strSQL As String, filePath As String, fileSQL As Integer, row As String
Dim connSQL As ADODB.Connection, serverName As String, databaseName As String, userID As String, userPassword As String, rs As ADODB.Recordset

fileSQL = FreeFile
strSQL = ""
filePath = Application.ThisWorkbook.Path & "\somesql.sql"

Open filePath For Input As fileSQL

Do Until EOF(fileSQL)
    Line Input #fileSQL, row
    strSQL = strSQL & row & vbNewLine
Loop

Close #fileSQL

serverName = "someserver"
databaseName = "somedb"

Set connSQL = New ADODB.Connection
Set rs = New ADODB.Recordset

connSQL.Open "Provider=SQLOLEDB;Server = " & serverName & ";Database = " & databaseName & _
";Trusted_connection=yes;"

rs.Open strSQL, connSQL, adOpenStatic

With ThisWorkbook.Sheets("test").Range("A1:Z1000000")
    .ClearContents
    .CopyFromRecordset rs
End With

With Application
    .ScreenUpdating = True: .DisplayAlerts = True: .Calculation = xlCalculationAutomatic: .EnableEvents = True
End With

 ExitPoint:
    With Application
       .ScreenUpdating = True: .DisplayAlerts = True: .Calculation = 
       xlCalculationAutomatic: .EnableEvents = True
   End With

    Set rs = Nothing
    Exit Sub


ErrHandler:
    With ThisWorkbook
       .Sheets("Control").Range("B1").Value = Err.Description
        .Sheets("Control").Range("C1").Value = strSQL
    End With

Resume ExitPoint

End Sub

В сообщении об ошибке говорится: «Ошибка выполнения '-2147217900 (80040e14)': неправильный синтаксис рядом с '>>';». В файле SQL нет >> или каких-либо других символов, как показано в сообщении об ошибке. Фактически, я заменил .sql, чтобы он содержал только прямой оператор SELECT. Но я все еще вижу, как забавные символы добавляются, когда он читается Excel VBA (например, ï »¿выбрать 100 лучших * из теста» вместо «выбрать 100 лучших * из теста»).