VBScript - Create A Blank Database

This script file allows you to create a blank MS Access database.

VBScript

Add to collection

1 Open your favorite text editor. In our case we are going to use Notepad++

2 Copy the VBScript code from below.

3 Paste the code in the newly created file.

4 Save the file with a ".vbs" extension.

5 Run the script file by double-clicking on it or via the CMD console.

6 That's it!

Code

' This script creates a blank MS Access database.
Sub createBlankAccessDatabase()
	' Set variables
	Dim appAccess
	' Create new access application object
	Set appAccess = Wscript.CreateObject("Access.Application")
	' Add a new database
	appAccess.NewCurrentDatabase("F:\VBAmacros\VBScript\dbTest.accdb")
	' Release the access application object
	Set appAccess = Nothing
End Sub
' Run the procedure
Call createBlankAccessDatabase()