Microsoft Access 掲示板

ADOで該当フィールドの全レコードを削除する方法 / 11

11 コメント
views
4 フォロー
11
タークン 2023/08/24 (木) 12:02:47 33fc6@2705a

adoCn.Execute strSQL

daoCn.Execute strSQL
に変えるだけで良かったのですね。

    strSQL = "SELECT TOP " & i2 & Cd & " FROM " & Tn & " WHERE " & Sc & " ORDER BY 出勤データ.月日 DESC" '降順でi2番目までのデータを取得
    strSQL = "SELECT TOP 1 * FROM (" & strSQL & ") ORDER BY 出勤データ.月日" '上記のデータから昇順で1番目のデータを取得(結局降順でi2番目のデータ)

にした方が、並べ替えるだけなので、早いと思います。

色々と、有難うございました。

通報 ...