Create activecomport.vbs