>レコードセットを使わないSQL文の場合は
>ロックはどうやるんですか？

Application.Lockする方法もあるけど
やっぱり普通にエラーとラップと
トランザクションを組み合わせれば？