0040

行ロック後の削除(DELETE)

 

    ‘SQL文(SELECT)を編集する
    ‘「FOR UPDATE NOWAIT」で行ロックを指定。
    ‘バッチが動作してないときは「FOR UPDATE」
    strSql = “SELECT * FROM emp WHERE empno = 5555” & _
             “FOR UPDATE NOWAIT”

    ‘ダイナセットを作成し、データの読み込みを行う
    ‘データの読み込みと行ロックを行う
    Set OraDaynaset = OraDatabase.DbCreateDynaset(strSql, ORADYN_ORAMODE)

        ‘<★実際はここで検索した行が既に削除されてないか、又は必要であれば
        ‘更新カウントで、他のPCで更新されてないことを確認する。★>
        ‘更新カウントとは各テーブルに追加した数値項目。排他制御に使用

    ‘SQL文(DELETE)を編集する
    strSql2 = “DELETE FROM emp WHERE empno = 5555”

    ‘SQL文を実行する
    lngCnt = OraDatabase.ExecuteSQL (strSql2)
    ‘実行結果として処理したレコード(行)件数が戻される

    ‘※複数行のロック更新はｻﾝﾌﾟﾙコーディングを参照

 





OO4Oコーディング標準(VB)

初期登録日: 2003年11月12日

最終更新日: 2008年01月26日

< Home ヘ戻る >

キーボード

ブラウザ画面の文字サイズを変更するショートカットキー

  1. [ CTRL ] + [ + ]  :  文字を大きく
  2. [ CTRL ] + [ – ]  :  文字を小さく

Shortcut Keys

  1. [ CTRL ] + [ + ]  :  Up the font size
  2. [ CTRL ] + [ – ]  :  Down the font size