Http proxy，由VB6.0编写的代理服务器的源码，要测试代理示例，请单击“LISTEN”按钮并使用浏览器访问代理。 代理端口是3280.您当前的IP是192.168.1.2，此例程等待浏览器发送HTTP请求标头。 收集所有必要信息后，它连接到真实服务器并传递标头数据。 　　打开程序后，可单击监听按钮，实现代码服务的监听功能，也可适时停止这个功能。 　　本源码来自于国外。

Delphi P2P文件发送实例，点对点传输文件，类似QQ聊天中的文件发送功能，模块代码，并不包括太多功能。初学INDY控件时写的，编译时需要引入RzTray.dcu文件。

VB实现的资源在线共享服务器平台，局在域网内以一台计算机为服务器，其他机器为客户机，可以上传有用的文件或课件，并可以通过查询下载，达到资源共享的目的。VB SQL数据库.用户名：wj。密码：wj。是一个网络共享平台，类似FTP的东西。

VB写的Email服务端程序，邮件服务器程序，设置好邮件服务器名称、地址、收信人地址、信件主题、附加文件、信件正文等信息，就可在Windows系统中建立一个简易的email邮件服务器了。

DELPHI获取网卡属性和IP地址，获取网卡IP地址、MAC号、子网掩码、网关等信息，支持IPV4和IPV6的IP信息，比较详细的网卡配置信息。

今天与大家分享一个VB6.0编写的类似IIS网站服务器的程序，作测试用还可以，支持HTML和ASP语言的解析发布，来自国外VB源码网站，也是前几年的源码，可以学习参考一下吧。

把Ping命令可视化，用Delphi写成winForm窗口式的程序，一个可以单步执行的Delphi Ping命令操作程序源码，在框内输入IP地址，点击“执行Ping”按钮，将执行一次Ping命令，不能连续执行Ping操作，不过稍加改进就能做出类似Windows一样的Ping程序。try 　　 if pReqData^ = pIPE^.Options.OptionsData^ then 　　 begin 　　 StatusShow.Lines.Add(PChar(PingEdit.Text) '-----' 　　 IntToStr(pIPE^.DataSize) '-----' IntToStr(pIPE^.RTT)); 　　 end; 　　 except 　　 showmessage('没有找到Ip地址!'); 　　 end; 　　 finally 　　 FreeMem(pRevData); 　　 FreeMem(pIPE); 　　 end; 　　 end 　　else 　　 showmessage('请输入Ip地址'); 　　end; 　　// 通过上面的编程，我们就实现了Ping功能的界面操作。实际上，ICMP协议的功能还 　　//有很多，都可以通过对Icmp.dll的函数调用来实现。 　　procedure TTMyPing.FormCreate(Sender: TObject); 　　var 　　 hICMPdll: HMODULE; 　　begin // Load the icmp.dll stuff 　　 WSAStartup(2,WSAData); 　　 hICMPdll := LoadLibrary('icmp.dll'); 　　 @ICMPCreateFile := GetProcAddress(hICMPdll, 'IcmpCreateFile'); 　　 @IcmpCloseHandle := GetProcAddress(hICMPdll, 'IcmpCloseHandle'); 　　 @IcmpSendEcho := GetProcAddress(hICMPdll, 'IcmpSendEcho'); 　　 hICMP :=IcmpCreateFile; 　　 StatusShow.Text := ''; 　　 StatusShow.Lines.Add('目的IP地址-----字节数----返回时间(毫秒)'); 　　end; 　　// 接下来，就要进行如下所示的Ping操作的实际编程过程了。

VB专用的下载器源程序，用于批量下载VB源码，并附上源代码，偶然从网上发现了一个网站里面有超多的VB代码，一个一个下载比较麻烦，后来整理了一下下载地址，用VB写了一个程序，将这些地址读入，让程序一个一个下载，一共有将近500个源码，够大家慢慢研究了，程序写的急，不足之处，请达人们见谅！

VB开发的下载类实例，输入下载地址、目标路径,即开始下载，下载进度事件中可得到下载速度、进度等详细信息，含有Demo演示代码，模块使用URLDownloadToFile函数，继承了IBindStatusCallback接口来取得下载信息，这个类一共就两个相关方法供调用： 　　StartDownloading：开始下载 　　AbortDownloading：停止下载 　　至于StrFromPtr,不属于下载相关功能，OnProgress事件里能得到已下载字节数,总字节数等详细信息，而后加入了速度获取等信息……

VB专用的下载控件 支持断点续传和进度条，这两个附加功能都是相当实用的，可把本程序用于软件在线更新升级中，若网络中断后，下次会自动连接重新下载，并适时显示下载进度条。做同类下载模块的可参考本源码。