远程开启-关闭目标telnet服务的windows脚本RTCS.vbs

2020-03-24 16:47:41

字体：大中小

来源：转载

供稿：网友

********************************************************************************
RTCS v1.10
Remote Telnet Configure Script, by zzzEVAzzz
Welcome to visite www.isgrey.com
Usage:
cscript c:/scriptpath/RTCS.vbe targetIP username password NTLMAuthor telnetport
It will auto change state of target telnet server.
********************************************************************************
描述：远程开启/关闭目标telnet服务的windows脚本。
特点：不依赖于目标的ipc$开放与否。
原理：直接访问目标的windows管理规范服务（WMI）。该服务为系统重要服务，默认启动。
支持平台：win2kpro win2kserver winxp win.net
使用方法：
在命令行方式下使用windows自带的脚本宿主程序cscript.exe调用脚本，例如：
c:/ cscript RTCS.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。
复制代码代码如下:
on error resume next
set outstreem=wscript.stdout
if (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.quit
end if
if wscript.arguments.count 5 then
usage()
wscript.echo Not enough parameters.
wscript.quit
end if

ipaddress=wscript.arguments(0)
username=wscript.arguments(1)
password=wscript.arguments(2)
ntlm=wscript.arguments(3)
port=wscript.arguments(4)
if not isnumeric(ntlm) or ntlm 0 or ntlm 2 then
usage()
wscript.echo The html' target='_blank'>value of NTML is wrong.
wscript.quit
end if
if not isnumeric(port) then
usage()
wscript.echo The value of port is wrong.
wscript.quit
end if

usage()
outstreem.write Conneting &ipaddress ....
set objlocator=createobject( wbemscripting.swbemlocator )
set objswbemservices=objlocator.connectserver(ipaddress, root/default ,username,password)
showerror(err.number)

outstreem.write Setting NTLM= &ntlm ....
set objinstance=objswbemservices.get( stdregprov )
set objmethod=objinstance.methods_( SetDWORDvalue )
set objinparam=objmethod.inparameters.spawninstance_()
objinparam.hdefkey=&h80000002
objinparam.ssubkeyname= SOFTWARE/Microsoft/TelnetServer/1.0
objinparam.svaluename= NTLM
objinparam.uvalue=ntlm
set objoutparam=objinstance.execmethod_( SetDWORDvalue ,objinparam)
showerror(objoutparam.returnvalue)

outstreem.write Setting port= &port ....
objinparam.svaluename= TelnetPort
objinparam.uvalue=port
set objoutparam=objinstance.execmethod_( SetDWORDvalue ,objinparam)
showerror(objoutparam.returnvalue)

outstreem.write Querying state of telnet server....
set objswbemservices=objlocator.connectserver(ipaddress, root/cimv2 ,username,password)
set colinstances=objswbemservices.execquery( select * from win32_service where name='tlntsvr' )
showerror(err.number)
for each objinstance in colinstances
if objinstance.startmode= Disabled then
outstreem.write Telnet server has been disabled. Now changeing start mode to manual....
set objmethod=objinstance.methods_( changestartmode )
set objinparam=objmethod.inparameters.spawninstance_()
objinparam.startmode= Manual
set objoutparam=objinstance.execmethod_( changestartmode ,objinparam)
showerror(objoutparam.returnvalue)
end if
outstreem.write Changeing state....
if objinstance.started=true then
intstatus=objinstance.stopservice()
showerror(intstatus)
wscript.echo Target telnet server has been STOP Successfully.
else
intstatus=objinstance.startservice()
showerror(intstatus)
wscript.echo Target telnet server has been START Successfully!
wscript.echo Now, you can try: telnet &ipaddress &port , to get a shell.
end if
next

function showerror(errornumber)
if errornumber 0 then
wscript.echo Error!
wscript.quit
else
wscript.echo OK!
end if
end function

function usage()
wscript.echo string(79, * )
wscript.echo RTCS v1.10
wscript.echo Remote Telnet Configure Script, by zzzEVAzzz
wscript.echo Welcome to visite www.isgrey.com
wscript.echo Usage:
wscript.echo cscript &wscript.scriptfullname targetIP username password NTLMAuthor telnetport
wscript.echo It will auto change state of target telnet server.
wscript.echo string(79, * )&vbcrlf
end functionhtml教程

郑重声明：本文版权归原作者所有，转载文章仅为传播更多信息之目的，如作者信息标记有误，请第一时间联系我们修改或删除，多谢。

上一篇：用vbs实现删除名称中有撇号的文件夹

下一篇：基于逻辑运算的简单权限系统(原理,设计,实现) VBS 版