區域網掃描源碼
A. 怎樣查看區域網中伺服器某個網站的某個asp網頁源碼 看網上有攻擊IIS服務的辦法,具體怎樣操作
有時由於站點配置的原因,允許客戶列出站點目錄,通常不允許下載或打開的。所以如果你看不到,就表示正常情況下看不到了。
想到看到,直接到教師機上看,或者裝遠程式控制制軟體。
B. 區域網在線掃描 IP,MAC java源代碼
1.得到區域網網段,可由自己機器的IP來確定 (也可以手動獲取主機IP-CMD-ipconfig /all)
2.根據IP類型,一次遍歷區域網內IP地址
JAVA類,編譯之後直接運行便可以得到區域網內所有IP,具體怎樣使用你自己編寫相應代碼調用便可
代碼如下::
package bean;
import java.io.*;
import java.util.*;
public class Ip{
static public HashMap ping; //ping 後的結果集
public HashMap getPing(){ //用來得到ping後的結果集
return ping;
}
//當前線程的數量, 防止過多線程摧毀電腦
static int threadCount = 0;
public Ip() {
ping = new HashMap();
}
public void Ping(String ip) throws Exception{
//最多30個線程
while(threadCount>30)
Thread.sleep(50);
threadCount +=1;
PingIp p = new PingIp(ip);
p.start();
}
public void PingAll() throws Exception{
//首先得到本機的IP,得到網段
InetAddress host = InetAddress.getLocalHost();
String hostAddress = host.getHostAddress();
int k=0;
k=hostAddress.lastIndexOf(「.」);
String ss = hostAddress.substring(0,k+1);
for(int i=1;i <=255;i++){ //對所有區域網Ip
String iip=ss+i;
Ping(iip);
}
//等著所有Ping結束
while(threadCount>0)
Thread.sleep(50);
}
public static void main(String[] args) throws Exception{
Ip ip= new Ip();
ip.PingAll();
java.util.Set entries = ping.entrySet();
Iterator iter=entries.iterator();
String k;
while(iter.hasNext()){
Map.Entry entry=(Map.Entry)iter.next();
String key=(String)entry.getKey();
String value=(String)entry.getValue();
if(value.equals(「true」))
System.out.println(key+「-->」+value);
}
}
class PingIp extends Thread{
public String ip; // IP
public PingIp(String ip){
this.ip=ip;
}
public void run(){
try{
Process p= Runtime.getRuntime()。exec (「ping 」+ip+ 「 -w 300 -n 1」);
InputStreamReader ir = new InputStreamReader(p.getInputStream());
LineNumberReader input = new LineNumberReader (ir);
//讀取結果行
for (int i=1 ; i <7; i++)
input.readLine();
String line= input.readLine();
if (line.length() <17 || line.substring(8,17)。equals(「timed out」))
ping.put(ip,「false」);
else
ping.put(ip,「true」);
//線程結束
threadCount -= 1;
}catch (IOException e){}
}
}
}
C. 急!區域網ip掃描工具 源代碼 掃描自己主機 自己主機的區域網的ip號和主機名)
……
X-Scan綜合掃描器
一次搞定
D. vb內網ip掃描,如果掃描結果內網ip大於2個ip就在文本框顯示
一. 內網的Ip可以根據winsock的LocalIP屬性查看 例如dim a as string a = winsock1.localIp
二. 外網的IP可以根據網頁查詢..利用一個Innet空件打開 www.ip138.com 然後截取一下就可以了 例如:Private Sub Command1_Click() a = Inet1.OpenURL(" www.ip38.com ") '打開這個網頁,獲取源碼 b = InStr(a, "您的本機IP地址:") '獲取這個字元出現的位置 c = InStr(a, " ") '截取這個字元出現的位置 d = Mid(a, b + 9, c - b - 10) '截取這兩個字元間的字元,就是IP了 MsgBox d, vbInformation, "你當前的外網IP" End Sub
三.至於顯示所有開放的埠..我真的不會 祝樓主好運!
E. 急求一區域網IP掃描工具源代碼
http://www.pudn.com/downloads24/sourcecode/windows/network/detail77546.html這個地方有下。自己注冊一個下載吧。
F. linux下掃描區域網內主機的程序源碼
nmap -v -sP 192.168.1.0/24
G. 求vb或c#源代碼:查看區域網電腦的遠程文件管理
。。開源了,本項目是一個Windows遠程式控制制系統,項目完全採用C#.NET開發,實現了基於逐行掃描演算法遠程桌面,桌面視圖牆,文件管理,實時語音、視頻監控,注冊表管理,實時進程管理等功能,各模塊採用獨立連接,支持異常情況重連。實現了中間會話伺服器,支持多主控端同時監控,支持Web端,歡迎點Start關注,項目不定時更新,源代碼僅供參考,不得用於非法用途,否則一切後果自負。
網頁鏈接
H. 怎麼用VB編寫一個掃描區域網的工具,高手進!
我有個ping區域網(小型的路由器區域網)的模塊。
Public Function Pings(ByVal strMachines As String) As Boolean '判斷是否能ping通IP
aMachines = Split(strMachines, ";")
For Each machine In aMachines
Set objPing = GetObject("winmgmts:{impersonationLevel=impersonate}").ExecQuery("select * from Win32_PingStatus where address = '" & machine & "'")
For Each objStatus In objPing
If IsNull(objStatus.StatusCode) Or objStatus.StatusCode <> 0 Then
Pings = False
Else
Pings = True
End If
Next
Next
End Function
'不過這個模塊的效率實在不敢恭維,很慢的。
'僅供參考.
I. 簡單的delphi網路程序源碼
問這位哥哥要一個
{********************************************************************}
{ LanScan: }
{ Author: dmzn [email protected] 2005.5 }
{ Description: 多線程的區域網掃描組件 }
{********************************************************************}