sql-server - エラー 3021 「現在のレコードがありません」

Question

フォルダーにある Access ファイルがあります。フォルダが会社のサーバーにリンクされていること。これは、社内のすべてのコンピューターから Access ファイルにアクセスできることを意味します。

私が抱えている問題は、あるコンピューターからはアクセス ファイルにログインできますが、別のコンピューターから同じファイルにログインしようとすると、「エラー 3021、現在のレコードがありません」というエラーが表示されることです。

これは私のコードです。

'Daily Material Record Code
sql = "select max(Date_Recorded) from Daily_Material"
Set rst = CurrentDb.OpenRecordset(sql)

If (rst.EOF Or IsNull(rst.Fields(0))) Then
        lastdate = "01/01/1990"
        LastYear = 1990
        LastID = 0
Else
        maxlastdate = rst.Fields(0)
        lastdate = DateValue(rst.Fields(0))
        lasttime = TimeValue(rst.Fields(0))
        LastYear = Year(rst.Fields(0))
        'LastID = Val(Mid(rst!ID, 6))
        sql = "select ID from Daily_Material where Date_Recorded = #" & maxlastdate & "# "
        Set rst = CurrentDb.OpenRecordset(sql)
        LastID = CStr(Val(Mid(rst.Fields(0), 6))) <---- This is where the error happens

End If

それはちょうど私を混乱させました。サーバーから同じファイルにログインするので、エラーは発生しませんか? このエラーは、別のコンピューターでアクセス ファイルにログインした場合にのみ発生します。

なぜこれが起こるのか、どうすれば解決できるのか誰か知っていますか?