folder.CreateTextFile(args(0)+".txt")

objFile = folder.CreateTextFile(args(0)+".txt")
objFile.Close()

var WshShell, FSO,args, folder, file, WshFldrs, d,e,FilePath, vbOkCancel, vbOk, Res;
var vbOkCancel=1, vbOk=1;
WshShell=WScript.CreateObject("WScript.Shell");
args=WScript.Arguments;
WScript.Echo("Аргументы сценария "+args(0)+" "+args(1)+" "+args(2));

FSO = WScript.CreateObject("Scripting.FileSystemObject");
folder = FSO.GetFolder("d:\\2250\\Fyodorova");

//Вывод диалогового окна
Res=WshShell.Popup("Проверить наличие файлов с такими именами?", 0, "", vbOkCancel);
if (Res==vbOk)
WScript.Sleep(1000);
else
{WScript.Echo("прекращение работы сценария");
WScript.Quit();}

WScript.Echo("Проверяем наличие файла с именем "+args(0));
WScript.Sleep(500);
if (FSO.FileExists(folder+"\\"+args(0)+".txt"))
    WScript.Echo("Файл " + args(0) + " существует")
else
    {Res=WshShell.Popup("Файл не найден. Создать файл с таким именем?", 0, "", vbOkCancel);
if (Res==vbOk)
{WScript.Echo("Создаем файл "+args(0));
WScript.Sleep(300);
folder.CreateTextFile(args(0)+".txt");
WScript.Sleep(10000);
WshShell.Run("notepad"+"d:\\2250\\Fyodorova\\1.txt");
WScript.Sleep(10000);
 Res=WshShell.Popup("Сохранить изменения?", 0, "", vbOkCancel);
   if (Res==vbOk)
{WshShell.AppActivate("notepad");
WScript.Sleep(500);
WshShell.SendKeys("%{F4}");
WScript.Sleep(800);
WshShell.SendKeys("~");}
}