//---------------------------------------------------------------------------    #include  #include #include //------------------------ #pragma hdrstop #include "Unit1.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TForm1 *Form1; int PortNo, PortMax, i; //--------------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TForm1::StartButClick(TObject *Sender) { //i=EditMin->Text.ToInt(); if(PScan->Checked == true) { Memo->Clear(); PortNo = EditMin->Text.ToInt(); PortMax = EditMax->Text.ToInt(); TcpClient->RemoteHost = Edit_IP->Text; TcpClient->RemotePort = PortNo; StartBut->Enabled = false; Memo->Lines->Add(Edit_IP->Text " 連線中... " ); TcpClient->Active = true; } //----------------------------------------------------------- if(NSession->Checked==true) { char Name[256]; Edit_IP->GetSelTextBuf(Name,256); ConnetIPC(Name,NULL, NULL); } //---------------------------------------------------------- } //--------------------------------------------------------------------------- void __fastcall TForm1::QuickButClick(TObject *Sender) { TcpClient->Active =false; Form1->Close(); } //--------------------------------------------------------------------------- void __fastcall TForm1::ClearButClick(TObject *Sender) { Edit_IP->Text = ""; EditMin->Text = ""; EditMax->Text = ""; Memo->Clear(); } //--------------------------------------------------------------------------- void __fastcall TForm1::StopButClick(TObject *Sender) { TcpClient->Active = false; Memo->Lines->Add("掃描停止 !!"); } //--------------------------------------------------------------------------- void __fastcall TForm1::TcpClientConnect(TObject *Sender) { //------------------------- Port Scan -------- TcpClient->Active = false; Memo->Lines->Add("Port :" IntToStr(PortNo) " open !"); if(PortNo < PortMax ){ PortNo=PortNo ; TcpClient->RemoteHost = Edit_IP->Text; TcpClient->RemotePort = PortNo; TcpClient->Active = true; } else{ Memo->Lines->Add("Port Scan 完成 !!"); StartBut->Enabled =true; } } //--------------------------------------------------------------------------- void __fastcall TForm1::TcpClientDisconnect(TObject *Sender) { TcpClient->Active = false; } //--------------------------------------------------------------------------- void __fastcall TForm1::TcpClientError(TObject *Sender, int SocketError) { TcpClient->Active = false; Memo->Lines->Add("Port :" IntToStr(PortNo) " done !"); if(PortNo < PortMax ){ PortNo=PortNo ; TcpClient->RemoteHost = Edit_IP->Text; TcpClient->RemotePort = PortNo; TcpClient->Active = true; } else{ Memo->Lines->Add("Port Scan 完成 !!"); StartBut->Enabled =true; } } //------------------------------------------------------------------- bool __fastcall TForm1::ConnetIPC(char *RemoteName,char* User,char* PassWord) { char tmp[256] = "\\\\"; strcat(tmp, RemoteName); strcat(tmp, "\\ipc$"); NETRESOURCE NetResource; NetResource.lpRemoteName=tmp; NetResource.dwType=RESOURCETYPE_ANY; NetResource.lpProvider= NULL; if(WNetAddConnection2(&NetResource,PassWord,User, 0)==NO_ERROR) { //建立連線 Memo->Lines->Add("電腦 : " Edit_IP->Text " 有 Null Session 漏洞，請依照指示修正。"); return true; } else { Memo->Lines->Add("電腦 : " Edit_IP->Text " 無 Null Session 漏洞。"); return false; } } ....怎樣執行都會是有漏洞ㄟ... 這是我想要測試有無Null Session有無漏洞的程式 請各位大大幫我看一下...哪邊需要改正...感激您 ... 發表人 -

正常啊，Windows 本來就允許空連結。你可以在 command prompt 下的指令測試： net use \\192.168.3.111\ipc$ "" /USER:"" 系統回應連線成功就表示有空連結的問題。你可以參考微軟的技術文件 http://support.microsoft.com/kb/246261/zh-tw 不過空連接本身是避免不了的，除非用防火牆之類的程式擋掉。

正常啊，Windows 本來就允許空連接。你可以在 command prompt 下的指令測試： net use \\(對方的 ip address)\ipc$ "" /USER:"" 系統回應連線成功就表示有空連接的問題。你可以參考微軟的技術文件 http://support.microsoft.com/kb/246261/zh-tw 不過空連接本身是避免不了的，除非用防火牆之類的程式擋掉。

重複發了，請板主幫忙把比較前面的跟這一篇一起砍掉，謝謝！

謝謝你的答案    不過我已經實作出來了..此用其他方法... 不過我想再問一個問題...null session有開... 那會有哪些入侵方式呢?我們該如何防護?!    thanx

提問者您好:


以上回應是否已得到滿意的答覆？


若已得到滿意的答覆，請在一週內結案，否則請在一週內回覆還有什麼未盡事宜，不然，
將由版主(尚無版主之區域將由副站長或站長)採自由心證,選擇較合適之解答予以結案處理，
被選上之答題者同樣會有加分獎勵，同時發問者將受到扣 1 分的處分。不便之處，請見諒。


有問有答有結案，才能有良性的互動，良好的討論環境需要大家共同維護，感謝您的配合。

------
我是機器人,我不接受簡訊.