HOME > 即効テクニック > AccessVBA > クエリ・SQL > SQLを実行する

即効テクニック
クエリ・SQL

SQLを実行する

(Access 2000/2002/2003)
●概要●
構文  expression.RunSQL(SQLStatement, UseTransaction)




設定項目内容
expressionDoCmdオブジェクト［省略不可］
SQLStatementSQLステートメントを文字列式で指定［省略不可］
UseTransactionトランザクションを使用するか否かを指定［省略可能］

アクションクエリに相当するSQLステートメントを実行します。クエリを作成することなく、アクションクエリに相当する動作を、コードから直接実行することができます。引数にSQLステートメントを記述します。引数には、TrueまたはFalseを指定します。Trueを指定すると、このSQLをトランザクションに含めます。Falseを指定すると、トランザクションを使用しません。省略するとTrueを指定したこととなります。
●サンプル●
Sub RunSQLSample()
　　'エラーの場合、myErr:　へ
    On Error GoTo myErr
    '［2500円以上の書籍］テーブルを新しく作成する
    DoCmd.RunSQL "SELECT 書籍テーブル.book_name, 書籍テーブル.book_price " _
        & "INTO 2500円以上の書籍 " _
        & "FROM 書籍テーブル WHERE 書籍テーブル.book_price>=2500"
　　'プロシージャを終了
    Exit Sub
myErr:
　　'エラーメッセージを出す
    MsgBox Err.Description
End Sub
ビジネス統計スペシャリスト VBAエキスパート