added vb run script