[WSH]VBSからAccessのアクションクエリを実行する方法 (ADO)

VBSのコード

Option Explicit

Dim cn

Dim rs

Set cn= CreateObject("ADODB.Connection")

Set rs = CreateObject("ADODB.Recordset")

cn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=C:￥～￥ファイル名.mdb;"

rs.Open "Q_del", cn

rs.Open "Q_add", cn

cn.Close

Set rs = Nothing

Set cn = Nothing

MsgBox "完了しますた。"