SQLの基本的なコードパターン

SQLの基本的なコードパターン　結果セットを返さないパターン

データの更新・追加・削除やテーブルの作成・削除と言った処理に使用。
いわゆる「アクションクエリ」に相当するパターン。

Commandオブジェクトを使用するパターン

Sub SQL実行パターン2_1()
Dim myCon As New ADODB.Connection, myCmd As New ADODB.Command
Dim mySrc As String, mySQL As String

'接続先データベース
mySrc = ThisWorkbook.Path & "\mdb\4-sampleDB.mdb"
'実行するSQL
mySQL = "update アルバイト set 手当 = 0;"

'接続
With myCon
  .Provider = "Microsoft.Jet.OLEDB.4.0"
  .Open mySrc
End With

'SQLを実行
With myCmd
  .ActiveConnection = myCon
  .CommandText = mySQL
  .Execute
End With

Set myCmd = Nothing
myCon.Close: Set myCon = Nothing

End Sub

ConnectionオブジェクトのExcuteメソッドを使用するパターン

Sub SQL実行パターン2_2()
Dim myCon As New ADODB.Connection
Dim mySrc As String, mySQL As String

'接続先データベース
mySrc = ThisWorkbook.Path & "\mdb\4-sampleDB.mdb"
'実行するSQL
mySQL = "update アルバイト set 手当 = 0;"

'接続して、SQLを実行
With myCon
  .Provider = "Microsoft.Jet.OLEDB.4.0"
  .Open mySrc
  .Execute mySQL
End With

myCon.Close: Set myCon = Nothing

End Sub