ADO(Active Data Object)

DB接続
・Connectionオブジェクト

	Set cn = CreateObject("ADODB.Connection")
	cn.Open( [接続先文字列], [ユーザＩＤ], [パスワード])
	接続先文字列：ODBCのデータソース名等

・Recordsetオブジェクト

	Set rs = CreateObject("ADODB.Recordset")
	rs.Open([DataSource], [Cinnection], [CursorType], [RockType], [評価方法])
	カーソルタイプ adOpenUnspecified -1 カーソルの種類を指定しない adOpenForwardOnly 0 前方スクロールカーソル（既定値） adOpenKeyset 1 キーセットカーソル adOpenDynamic 2 動的カーソル adOpenStatic 3 静的カーソル ロックタイプ adLockUnspecified -1 ロックの種類を指定しない adLockReadOnly 1 読取専用（既定値） adLockPessimistic 2 レコード単位で排他的ロック adLockOptimistic 3 レコード単位で共有的ロック adLockBatchOptimistic 4 共有的バッチ更新 評価方法 adCmdUnspecified -1 コマンドタイプ引数を指定しない adCmdText 1 コマンドをSQLステートメントとして評価 adCmdTable 2 コマンドをテーブル名として評価 adCmdStoreProc 4 コマンドをストアドプロシージャとして評価 adCmdUnknown 8 コマンドのタイプを指定しない（既定値） adCmdFile 256 永続的に保存されたRecordsetのファイル名 adCmdTableDirect 512 列がすべて返されるテーブル名
	パターン 読取用(静的、読取、テーブル名) 　rs.Open "Table01",cn, 3, 1, 2 読取用(静的、読取、SQL文) 　rs.Open "Select * From Table01",cn, 3, 1, 1 更新用(動的、排他、テーブル名) 　rs.Open "Table01", cn, 2, 2, 2 更新用(動的、排他、SQL文) 　rs.Open "Select * From Table01", cn, 2, 2, 1