Added VB script for creating DB