JS: Скрипт для создания на рабочем столе RDP-подключений

var net = new ActiveXObject("WScript.Network");
var cmpn = net.ComputerName;

if(cmpn.indexOf('-SRV') + 1)
 { var z=1}
else
{var z=0}

if (z == 0)
{

a=new ShortCutter();
a.createrdpfile("RDP Касса",true,"auto","auto","192.168.0.230");


//====================
function ShortCutter()
{
this.createrdpfile=createrdpfile;
this.WshShell=WScript.CreateObject("WScript.Shell");
this.fso=new ActiveXObject("Scripting.FileSystemObject");
this.WshNetwork = WScript.CreateObject("WScript.Network");
this.user=this.WshNetwork.UserDomain + "\\" + this.WshNetwork.UserName;
//this.QueryWMI=QueryWMI;


function createrdpfile(name,fullscreen,resx,resy,server,user)
{
var WQL="Select ScreenHeight,ScreenWidth from Win32_DesktopMonitor where Availability=3";
var wbemFlagReturnImmediately = 0x10;
var wbemFlagForwardOnly = 0x20;
var compname, username, password;
var wmi_items;
var SWBemlocator = new ActiveXObject("WbemScripting.SWbemLocator");
var objWMIService = SWBemlocator.ConnectServer("localhost","\\root\\CIMV2","","");
var wmi_items = objWMIService.ExecQuery(WQL,"WQL",wbemFlagReturnImmediately | wbemFlagForwardOnly);
var wmi_enum = new Enumerator(wmi_items);
var wmi_item = wmi_enum.item();
if (resx=="auto") resx=wmi_item.ScreenWidth;
if (resy=="auto") resy=wmi_item.ScreenHeight
if (user == null) u=this.user; else u=user;
if (fullscreen==true) sm=2; else sm=1;
strDesktop = this.WshShell.SpecialFolders("Desktop");
fp=strDesktop + "\\"+name+".rdp"
//if (!this.fso.FileExists(fp)) //не создает файл, если он уже существует
{
fo = this.fso.CreateTextFile(fp,true);
s="screen mode id:i:2\n\
session bpp:i:16\n\
winposstr:s:0,0,0,0,"+resx+","+resy+"\n\
compression:i:1\n\
keyboardhook:i:2\n\
displayconnectionbar:i:1\n\
disable wallpaper:i:1\n\
disable full window drag:i:1\n\
allow desktop composition:i:0\n\
allow font smoothing:i:0\n\
disable menu anims:i:1\n\
disable themes:i:1\n\
disable cursor setting:i:0\n\
bitmapcachepersistenable:i:1\n\
audiomode:i:0\n\
redirectprinters:i:0\n\
redirectcomports:i:0\n\
redirectsmartcards:i:0\n\
redirectclipboard:i:1\n\
redirectposdevices:i:1\n\
redirectdrives:i:1\n\
autoreconnection enabled:i:1\n\
authentication level:i:0\n\
prompt for credentials:i:0\n\
negotiate security layer:i:1\n\
remoteapplicationmode:i:0\n\
alternate shell:s:\"%PROGRAMFILES(x86)%\\1cv82\\8.2.15.289\\bin\\1cv8.exe\" enterprise /s buh8-srv:1741\\SeydKassa /L RU\n\
shell working directory:s:%PROGRAMFILES(x86)%\\1cv82\\8.2.15.289\\bin\n\
gatewayhostname:s:\n\
gatewayusagemethod:i:4\n\
gatewaycredentialssource:i:4\n\
gatewayprofileusagemethod:i:0\n\
promptcredentialonce:i:1\n\
drivestoredirect:s:*\n"
s=s+"full address:s:"+server+
"\nusername:s:"+u+"\ndesktopwidth:i:"+resx+
"\ndesktopheight:i:"+resy+"\n"+
"screen mode id:i:"+sm+"\n";
 fo.Write(s);
 fo.Close();
}
delete wmi_enum;
delete fso;
delete SWBemlocator;
}

}
}

if (resx=="auto") resx=wmi_item.ScreenWidth;
if (resy=="auto") resy=wmi_item.ScreenHeight