I am having trouble getting ICS sending out a 303 redirection.
I copied the 404 answer code which works, but this code makes the client just
spin its wheels.
Nothing is requested from the client after this point.
Tried with a 302 and get the same results.
This comes at the end of the HttpServerPostedData event where other answers are
sent from.
What am I over looking?
thanks
Ed
procedure tClientConn.Answer303(URL : String);
var
Body : String;
begin
Body := '<HTML><HEAD><TITLE>303 See Other</TITLE></HEAD>' +
'<BODY><H1>303 See other</H1>';
SendHeader(FVersion + ' 303 See Other' + #13#10 +
'Location: http://www.xxx.com' + URL + #13#10);
SendStr(Body);
end;
--
To unsubscribe or change your settings for TWSocket mailing list
please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket
Visit our website at http://www.overbyte.be
