全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:3559
推到 Plurk!
推到 Facebook!

Delphi 压力测试问题

尚未結案
whxiaocheng
一般會員


發表:1
回覆:0
積分:0
註冊:2008-06-18

發送簡訊給我
#1 引用回覆 回覆 發表時間:2008-06-18 23:44:52 IP:123.235.xxx.xxx 訂閱
今天用Delphi开发了一个小程序,在俩台装了windows 2003 标准版而且没有进行配置的 IMB3650 上互联进行压力测试,其中线程数目为:600,间隔时间为100MS(毫秒),老是出现下面的错误:
568线程获取服务错误,发生错误在第1次:Socket Error # 10054
Connection reset by peer.
562线程获取服务错误,发生错误在第1次:Socket Error # 10054
Connection reset by peer.
564线程获取服务错误,发生错误在第1次:Socket Error # 10054
Connection reset by peer.
566线程获取服务错误,发生错误在第1次:Socket Error # 10054
Connection reset by peer.
578线程获取服务错误,发生错误在第1次:Socket Error # 10054
Connection reset by peer.
572线程获取服务错误,发生错误在第1次:Socket Error # 10054
Connection reset by peer.
576线程获取服务错误,发生错误在第1次:Socket Error # 10054
Connection reset by peer.
587线程获取服务错误,发生错误在第1次:Socket Error # 10054
Connection reset by peer.
574线程获取服务错误,发生错误在第1次:Socket Error # 10054
Connection reset by peer.
580线程获取服务错误,发生错误在第1次:Socket Error # 10054
Connection reset by peer.
582线程获取服务错误,发生错误在第1次:Socket Error # 10054
Connection reset by peer.
585线程获取服务错误,发生错误在第1次:Socket Error # 10054
Connection reset by peer.
584线程获取服务错误,发生错误在第1次:Socket Error # 10054
Connection reset by peer.
586线程获取服务错误,发生错误在第1次:Socket Error # 10054
Connection reset by peer.
588线程获取服务错误,发生错误在第1次:Socket Error # 10054
Connection reset by peer.
591线程获取服务错误,发生错误在第1次:Socket Error # 10054
Connection reset by peer.
592线程获取服务错误,发生错误在第1次:Socket Error # 10054
Connection reset by peer.
590线程获取服务错误,发生错误在第1次:Socket Error # 10054
Connection reset by peer.
589线程获取服务错误,发生错误在第1次:Socket Error # 10054
Connection reset by peer.
593线程获取服务错误,发生错误在第1次:Socket Error # 10054
Connection reset by peer.
597线程获取服务错误,发生错误在第1次:Socket Error # 10054
Connection reset by peer.
595线程获取服务错误,发生错误在第1次:Socket Error # 10054
Connection reset by peer.
599线程获取服务错误,发生错误在第1次:Socket Error # 10054
Connection reset by peer.
594线程获取服务错误,发生错误在第1次:Socket Error # 10054
Connection reset by peer.
598线程获取服务错误,发生错误在第1次:Socket Error # 10054
Connection reset by peer.
596线程获取服务错误,发生错误在第1次:Socket Error # 10054
Connection reset by peer.
600线程获取服务错误,发生错误在第1次:Socket Error # 10054
Connection reset by peer.

有人说是因为windows 2003 连接数未设置造成的,还请高手指出,谢谢!


PS:代码如下
[ code xxxx ]
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, IdBaseComponent, IdComponent, IdTCPConnection, IdTCPClient,
IdHTTP, StdCtrls, Unit2;

type
TForm1 = class(TForm)
Memo1: TMemo;
Button1: TButton;
Label1: TLabel;
Label2: TLabel;
Edit1: TEdit;
Edit2: TEdit;
Label3: TLabel;
Edit3: TEdit;
Label4: TLabel;
Edit4: TEdit;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1 : TForm1;
http : array[1..600] of THttpThread;

implementation

{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var
i : integer;
begin
for i:=1 to strtoint(edit2.Text) do
//http[i] := THttpThread.Create('http://172.17.27.3/webfidsEngine/Display?ip=172.17.27.' inttostr(i mod 255) '&&mustneeds=0',Memo1,i,strtoint(edit3.Text),strtoint(edit4.Text));
//http[i] := THttpThread.Create('http://172.17.27.3/WebFidsEngine/Display?ip=172.17.27.8&&mustneeds=0',Memo1,i,strtoint(edit3.Text),strtoint(edit4.Text));
http[i] := THttpThread.Create(edit1.Text,Memo1,i,strtoint(edit3.Text),strtoint(edit4.Text));
end;
end.
[/code ]:

系統時間:2024-03-29 17:18:04
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!