FROM句の構文エラーですを解決したい

実現したいこと

なぜ「 FROM句の構文エラーです」が出るのか原因を知りたい

前提

AccessVBAでデータを更新する機能を追加しようとしています。
■■な機能を実装中に以下のエラーメッセージが発生しました。

発生している問題・エラーメッセージ

「実行時エラー　‐2147217900 (80040e14); FROM句の構文エラーです」

初めて質問します。よろしくお願いします。
下記の定義で実行しようとすると最終行で「実行時エラーFROM句の構文エラーです」
というエラーが出て先に進めません。

    '----------------------------------------------------------------------------------------------------
    Dim Cnn             As ADODB.Connection
    Dim rs           	As New ADODB.Recordset 
    Dim strSQL          As String
    '----------------------------------------------------------------------------------------------------
    '
    Set Cnn = CurrentProject.Connection
    strSQL = "SELECT * FROM [DBSV].[dbo].[T_あああああ];"
    rs.Open strSQL, Cnn, adOpenForwardOnly, adLockReadOnly

試したこと

SqlServerに貼って実行すると正しい結果が返ってきます

sk.exe

2023/07/19 05:51

カレントデータベース上のいずれかのテーブルを参照しようとしているのか、 SQL Server データベース上のいずれかのテーブルを（リンクテーブルを介さずに）参照しようとしてるのか、どちらなのでしょうか。前者の場合は、単にカレントデータベース上におけるそのテーブルの名前だけを FROM 句に記述すればよいだけです。 T-SQL のようにデータベースやスキーマまで指定するのはむしろ余計です。

m.ts10806

2023/07/19 06:15

現状提示されているのは実装であって定義ではないと思います。細かいですが大事です。 DB側の定義やDB接続の設定部分を提示したほうが良いかもしれません。

YT0014

2023/07/19 12:49

SQL文末の;(セミコロン)を外したらどうなりますか？

行動規範の内容に同意します

回答2件

多数のプログラムの中で単独で動くということで作成していて
久々の修正でグローバル変数のことすっぽり抜けており
Set Cnn = CurrentProject.Connectionの行では、デバッグしても想像する値が入ってきてなかったこと
ほかのプログラムを見て動きを調査したところ、そもそも個人で定義する必要がなく
グローバル変数を使っていなかったために起きた現象でした。
修正前は
strSQL = "SELECT * FROM [DBSV].[dbo].[T_あああああ];"の記述は
DefaultDatabaseをグローバル変数から正しい値を取得したことで
strSQL = "SELECT * FROM T_YI_債務者名読替"
のみの記述ですみました。