Skip to content

Instantly share code, notes, and snippets.

@cx20
Created June 10, 2012 13:46
Show Gist options
  • Select an option

  • Save cx20/2905698 to your computer and use it in GitHub Desktop.

Select an option

Save cx20/2905698 to your computer and use it in GitHub Desktop.
Hello, Jet Database World! (VBScript + DAO + Jet)
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
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment