version visual basic script, no probado