vbsの作法 その47

概要

vbsの作法調べてみた。
win10、64bitでやってみた。
adodb叩いてみた。

環境

windows10 64bit
ms office 2007 pro

手順

batファイルで、黒い画面を開く

c:\Windows\SysWOW64\cmd.exe \c wscript test.vbs

wscript test.vbsで実行。

サンプルコード

Set db = CreateObject("ADODB.Connection")
db.Open "Provider=MSDASQL;Driver={Microsoft Access Driver (*.mdb)};DBQ=db1.mdb"
Set rs = db.Execute("SELECT * FROM are")
Do Until rs.EOF
	msgbox rs(0)
	rs.MoveNext
Loop
rs.close
db.close

以上。