Set dbe = CreateObject("DAO.DBEngine.36")
Set db = dbe.OpenDatabase("Hello.mdb")
Set rs = db.OpenRecordset("SELECT 'Hello, Jet Database World!' AS Message")
WScript.Echo rs(0).Name
WScript.Echo "--------------------------"
WScript.Echo rs(0).Value