大家进来看看，请帮忙！带星的请求你们的帮忙！

Question

请问各位：如何通过程序来实现消耗网络资源，既尽量占用网络资源，使上网速度尽可能的慢！也就是通过程序来占用网络流量，最好不要使用循环来不停的向外发东西来达到，有不有可用的API可以调用，有可以查看流量的API吗？

Answer 1

用最简单的办法呀：开多个线程，不停的向你需要攻击的IP发送PING命令，这样的话，他的速度就慢下来了

Answer 2

开多个线程，向目标的随机的端口ping就可以了

Answer 3

看看最近流行的SQL病毒就知道了，呵呵；

Answer 4

请大家不要误会，我是写测试软件的，我已经写过通过程序实现消耗硬盘空间、消耗cpu的利用率、消耗内存、等程序，因为我写的测试软件要求在测试客户的应用程序的时候，要看当系统报告硬盘空间很小、cpu占用率100%,内存基本耗尽的情况下，我们测试的软件是否能正常工作。或则被测试的软件会做出相应的提示或相关的处理，也既每个软件的健壮性和性能测试。

Answer 5

试试CSDN蒋涛老兄的读取注册表HKEY_DYN_DATA中键值//WIN98适用：
procedure TForm1.Timer1Timer(Sender: TObject);
var
 usage,usage1:integer;
begin
 with TRegistry.Create do
 begin
  RootKey:=HKEY_DYN_DATA;
  OpenKey('PerfStats\StatData',false);
  ReadBinaryData('Dial-Up Adapter\TotalBytesRecvd',usage,sizeof(usage));
  ReadBinaryData('Dial-Up Adapter\TotalBytesXmit',usage1,sizeof(usage1));
  Caption:=IntToStr(usage)+','+IntToStr(usage1);
  CloseKey;
  Free;
 end;
end; 

Answer 6

WIN2000下用RasGetConnectionStatistics函数：
函数声明：
RasGetConnectionStatistics: Function (    //  W2K only
  hrasconn: HRasConn;
   lpStatistics: PTRas_Stats  // buffer to receive statistics
    ): DWORD; stdcall;实现部分在RASAPI32.DLL中，使用的时候用GetProcAddress动态加载。参数结构：
    PTRas_Stats = ^TRas_Stats ;
    TRas_Stats = Record
    dwSize,
    dwBytesXmited,
    dwBytesRcved,
    dwFramesXmited,
    dwFramesRcved,
    dwCrcErr,
    dwTimeoutErr,
    dwAlignmentErr,
    dwHardwareOverrunErr,
    dwFramingErr,
    dwBufferOverrunErr,
    dwCompressionRatioIn,
    dwCompressionRatioOut,
    dwBps,
    dwConnectDuration: DWORD ;
    end ;使用：
var
    RasStatistics: TRas_Stats;
    ConnSpd: Integer;
begin
        RasStatistics.dwSize := sizeof(TRas_Stats);
        RasGetConnectionStatistics(fCurRASConn,@RasStatistics);
        ConnSpd := RasStatistics.dwBps;
end;