幸运飞艇投注平台app
全國服務熱線:0597-2297794 24小時咨詢:15080281944 15080287989
設為首頁加入收藏聯系我們

用VB學做“黑客”程序

來源:互聯網   發布時間:2013/12/27 21:55:48     閱讀數:772

  只要掌握了原理,你也能寫出一個所謂的“黑客”程序。下面筆者帶領大家用VB親自編寫一個遠程控制程序。從而揭開它的神秘面紗。  一、所用控件  在程序中將使用Winsock控件。Winsock控件是一個ActiveX控件,使用TCP協議或UDP協議連接到遠程計算機上并與之交換數據。和定時器控件一樣,Winsock控件在運行時是不可見的。Winsock的工作原理是:客戶端向服務器端發出連接請求,服務器端則不停地監聽客戶端的請求,當兩者的協議溝通時,客戶端和服務器端之間就建立了連接,這時客戶端和服務器端就可以實現雙向數據傳輸。實際編程中,必須分別建立一個服務器端應用程序和一個客戶端應用程序,兩個應用程序中分別有自己的Winsock控件。首先設置Winsock控件使用的協議,這里我們使用TCP協議。現在,讓我們開始用VB建立兩個程序,一個是客戶端程序myclient,另一個是服務器端程序myserver。  二、編寫客戶端程序  首先來建客戶端程序myclient。在myclient程序中建立一個窗體,加載Winsock控件,稱為tcpclient,表示使用的是TCP協議,再加入兩個文本框(text1和text2),用來輸入服務器的IP地址和端口號,然后建立一個按鈕(cd1),用來建立連接,按下之后就可以對連接進行初始化了,代碼如下:  private sub cd1_click()  tcpclient.romotehost=text1.text  tcpclient.romoteport=val(text2.text)'端口號,缺省為1001  tcpclient.connect '調用connect方法,與指定IP地址的計算機進行連接  cd1.enabled=false  end sub  連接之后就是如何處理所收到的數據的問題了。客戶端和服務器端建立連接后,如果有任何一端接收到新的數據,就會觸發該端winsock控件的dataarrival事件,在響應這個事件時,可以使用getdata方法獲得發送來的數據。比如可以在tcpclient的dataarrival事件中編寫代碼如下:  private sub tcpclient_dataarrival(byval bytestotal as long)  dim x as string  tcpclient.getdata x '使用getdata獲得發送來的數據  .......  End sub  后面的省略部分表示對接收到的數據進行的具體處理,讀者可以根據實際情況編寫。  三、編寫服務器端程序  先建立一個窗體,加載Winsock控件,名稱為tcpserver。另外在窗體上加入一個文本框text1用來顯示客戶機的IP地址和客戶機發送過來的數據信息。  當客戶端程序運行時,在客戶端程序按下連接按鈕后,客戶端向服務器端程序請求連接,這時服務器端的connectionrequest事件被觸發,所以服務器端程序要解決連接問題,可以使用connectionrequest事件完成此功能。代碼如下:  '在窗體的load事件中對tcpserver控件進行初始化  private sub form_load()  tcpserver.localport=1001  tcpserver.listen '把服務器置于監聽檢測狀態  end sub  '服務器端接收到客戶端的連接請求,首先檢查當前狀態是否處于連接關閉狀態  Private sub tcpclient_connectionrequest(Byval requestID as long)  If tcpserver.state<>sckclosed then '檢查控件的state屬性是否為關閉  Tcpserver.close '  Tcpserver.accept requestID '  End if  End sub  現在我們在服務器端程序tcpserver的dataarrival事件中添加以下代碼,以便讓服務器端程序可以接收客戶機端的指令,并運行相應的程序。  四、測試遠程控制程序  現在,你就可以將這兩個程序分別運行于兩臺使用TCP/IP協議聯網的機器了。在客戶機端你按下連接按鈕,再輸入“c: mmand.com”,可以看到在服務器端立刻打開一個DOS窗口,設想一下,如果它運行一些破壞性的命令會發生什么事情?這就是一個最基本的遠程控制程序。當然,真正的黑客程序要復雜得多,但基本原理是相同的。現在你該恍然大悟了吧?

 如果您覺得此文對您有啟發或者幫助,可以花3秒鐘收藏到QQ空間。平時注意多收集,用時不會干著急!

[您可能感興趣的文章]
最新案例
網站建設資訊
  1. [資訊]Google Adsense ?
  2. [資訊]如何防止google adse?
  3. [資訊]使你的網站更專業--談網站優化?
  4. [資訊]優化你的站點,讓它加載的再快一?
  5. [資訊]網站建設:提高網站訪問量的策略?
  6. [資訊]揭開虛擬主機供應商的面紗?
SEO常見問題解答
  1. [SEO]什么是ALT屬性?
  2. [SEO]什么是鏈接錨文本?
  3. [SEO]什么是動態頁面?
  4. [SEO]HTTP狀態碼是什么意思??
  5. [SEO]鏈接養殖場?
  6. [SEO]首選域?
點擊立刻咨詢
幸运飞艇投注平台app 新时时五星未出号 合买江西时时 分分彩刷流水骗局 下载重庆时时彩 公众号娱乐系统机器人 极速快乐十分杀号 七星彩精准计划软件 i8手机彩票 3分时时计划在线 11选五五百期走势图