局域网扫描源码
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: 多线程的局域网扫描组件 }
{********************************************************************}