スポンサーリンク

2007-06-17

Tips7 - SQL文 不等号に合ったレコードを全て更新

Dim SQL As String
SQL = "UPDATE テーブル SET 数量=500 WHERE 金額>3000"
CurrentDb.Execute SQL, dbFailOnError
上の場合、金額が3000円以上のデータの数量を500にセットします。
その他、「金額>=3000」「金額<3000」「金額<=3000」のように指定します。