********************************************************************************
RTCSv1.10
RemoteTelnetConfigureScript,byzzzEVAzzz
Welcometovisitewww.isgrey.com
Usage:
cscriptc:scriptpathRTCS.vbetargetIPusernamepasswordNTLMAuthortelnetport
Itwillautochangestateoftargettelnetserver.
********************************************************************************
描述：远程开启/关闭目标telnet服务的windows脚本。
特点：不依赖于目标的ipc$开放与否。
原理：直接访问目标的windows管理规范服务（WMI）。该服务为系统重要服务，默认启动。
支持平台：win2kprowin2kserverwinxpwin.net
使用方法：
在命令行方式下使用windows自带的脚本宿主程序cscript.exe调用脚本，例如：
c:>cscriptRTCS.vbe<目标IP><用户名><密码><NTLM验证方式><telnet服务端口>
其中NTLM值可取0，1，2：
0:不使用NTLM身份验证；
1:先尝试NTLM身份验证。如果失败，再使用用户名和密码；
2:只使用NTLM身份验证。
空密码用两个双引号""表示。
脚本自动检查目标telnet服务情况，如果未启动则启动它，相反就关闭。
同一个命令执行两遍，就开/关一次服务。
关闭服务时也必须输入共5个参数，这样可以根据需要把服务设置还原为默认值（NTLM=2,端口23）。
如果telnet服务被禁用，将自动更改为“手动”。
如果要对本地使用，IP地址为127.0.0.1或者一个点（用.表示），用户名和密码都为空（用""表示）。
此脚本为自由软件，修改发布请著明原作者。谢谢合作。
本人提供有限技术支持，有问题请到论坛发短消息给我。我的ID是zzzevazzz
最后更新：2002-8-23
更新记录：
1.10更改了输出显示格式。
1.09解决了空密码的问题。
1.08代码加密并以测试版发布。
1.07增加对付服务被“禁用”的功能。
1.06解决在图形界面下运行的问题。
1.05对参数做简单判断，防止误操作。
1.04增加显示Usage和详细过程功能。
1.03增加关闭服务功能。
1.02增加手动设置端口和NTLM功能。
1.00完成基本功能，远程启动telnet服务，并设置NTLM=1。
复制代码 代码如下:
onerrorresumenext
setoutstreem=wscript.stdout
if(lcase(right(wscript.fullname,11))="wscript.exe")then
setobjShell=wscript.createObject("wscript.shell")
objShell.Run("cmd.exe/kcscript//nologo"&chr(34)&wscript.scriptfullname&chr(34))
wscript.quit
endif
ifwscript.arguments.count<5then
usage()
wscript.echo"Notenoughparameters."
wscript.quit
endif
ipaddress=wscript.arguments(0)
username=wscript.arguments(1)
password=wscript.arguments(2)
ntlm=wscript.arguments(3)
port=wscript.arguments(4)
ifnotisnumeric(ntlm)orntlm<0orntlm>2then
usage()
wscript.echo"ThevalueofNTMLiswrong."
wscript.quit
endif
ifnotisnumeric(port)then
usage()
wscript.echo"Thevalueofportiswrong."
wscript.quit
endif
usage()
outstreem.write"Conneting"&ipaddress&"...."
setobjlocator=createobject("wbemscripting.swbemlocator")
setobjswbemservices=objlocator.connectserver(ipaddress,"root/default",username,password)
showerror(err.number)
outstreem.write"SettingNTLM="&ntlm&"...."
setobjinstance=objswbemservices.get("stdregprov")
setobjmethod=objinstance.methods_("SetDWORDvalue")
setobjinparam=objmethod.inparameters.spawninstance_()
objinparam.hdefkey=&h80000002
objinparam.ssubkeyname="SOFTWAREMicrosoftTelnetServer1.0"
objinparam.svaluename="NTLM"
objinparam.uvalue=ntlm
setobjoutparam=objinstance.execmethod_("SetDWORDvalue",objinparam)
showerror(objoutparam.returnvalue)
outstreem.write"Settingport="&port&"...."
objinparam.svaluename="TelnetPort"
objinparam.uvalue=port
setobjoutparam=objinstance.execmethod_("SetDWORDvalue",objinparam)
showerror(objoutparam.returnvalue)
outstreem.write"Queryingstateoftelnetserver...."
setobjswbemservices=objlocator.connectserver(ipaddress,"rootcimv2",username,password)
setcolinstances=objswbemservices.execquery("select*fromwin32_servicewherename='tlntsvr'")
showerror(err.number)
foreachobjinstanceincolinstances
ifobjinstance.startmode="Disabled"then
outstreem.write"Telnetserverhasbeendisabled.Nowchangeingstartmodetomanual...."
setobjmethod=objinstance.methods_("changestartmode")
setobjinparam=objmethod.inparameters.spawninstance_()
objinparam.startmode="Manual"
setobjoutparam=objinstance.execmethod_("changestartmode",objinparam)
showerror(objoutparam.returnvalue)
endif
outstreem.write"Changeingstate...."
ifobjinstance.started=truethen
intstatus=objinstance.stopservice()
showerror(intstatus)
wscript.echo"TargettelnetserverhasbeenSTOPSuccessfully."
else
intstatus=objinstance.startservice()
showerror(intstatus)
wscript.echo"TargettelnetserverhasbeenSTARTSuccessfully!"
wscript.echo"Now,youcantry:telnet"&ipaddress&""&port&",togetashell."
endif
next
functionshowerror(errornumber)
iferrornumber<>0then
wscript.echo"Error!"
wscript.quit
else
wscript.echo"OK!"
endif
endfunction
functionusage()
wscript.echostring(79,"*")
wscript.echo"RTCSv1.10"
wscript.echo"RemoteTelnetConfigureScript,byzzzEVAzzz"
wscript.echo"Welcometovisitewww.isgrey.com"
wscript.echo"Usage:"
wscript.echo"cscript"&wscript.scriptfullname&"targetIPusernamepasswordNTLMAuthortelnetport"
wscript.echo"Itwillautochangestateoftargettelnetserver."
wscript.echostring(79,"*")&vbcrlf
endfunction