[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 "完了しますた。"
カテゴリ: