关于“ Response.SendRedirect('') ”的问题？

[houleifeng]

我用Delphi做了一个CGI程序，我更改URL时是用

Response.SendRedirect('http://www.benzhen.com') ;

但我发现一个问题，就是我连续用两条或两条以上的上面的语句时，只有第一条有效别的好像没执行，如：

Response.SendRedirect('http://www.benzhen.com？ID=124') ;

Response.SendRedirect('http://www.sms.com？ID=345') ;

...

上面只打开www.benzhen.com的网页，而没有打开www.sms.com的网页。

请问高手，这是怎么回事？且如何打开或提交两个或两个以上网页，用DELPHI
语言。

[litangel]

你可以试试用脚本来控制。

response.content := '<script language=javascript>window.open(...);window.open(...)</script>'

[litangel]

这样就可以实现了。。

procedure TWebModule1.WebModule1WebActionItem1Action(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
var
Html: string;
begin
Html := '<script language=javascript>' +
'window.open("1.htm");window.open("2.htm")'
+ '</script>';

response.content := Html;
end;

[naughtyboy]

呵呵
本来就是
这段时间搞了几天asp
response.redirect "xxxx.asp"
运行以后就跳出了这个页面，转到xxxx.asp
这就相当于
response.write "<script language=javascript>location='xxxx.asp'</script>"
response.end

[litangel]

呵呵。。。

原来一直搞asp,搞了快两年。
后来才做delphi，才一年。

算来还是搞asp的时间多。

呵呵。。