TsgcWebSocketServer_HTTPAPI › Olaylar › OnAfterForwardHTTP
Bir HTTP isteği yönlendirildikten sonra tetiklenir, böylece uygulama sonucu veya yukarı akış sunucusu tarafından döndürülen bir hatayı inceleyebilir.
property OnAfterForwardHTTP: TsgcWSHTTPAPIAfterForwardHTTP;
// TsgcWSHTTPAPIAfterForwardHTTP = procedure(Connection: TsgcWSConnection; aRequestInfo: THttpServerRequest; var aResponseInfo: THttpServerResponse; E: Exception) of object
—
OnAfterForwardHTTP, OnBeforeForwardHTTP iletmeyi etkinleştirdikten ve yukarı akış HTTP isteği tamamlandıktan sonra tetiklenir. aRequestInfo orijinal istemci isteğidir, aResponseInfo, yukarı akış sunucusundan doldurulduğu şekliyle istemciye geri yazılmak üzere olan yanıttır (ResponseNo, ContentType, ContentText...) ve E ya başarıda nil ya da hedef sunucuyla iletişim kurarken tetiklenen istisnadır. Olayı, sonucu günlüğe kaydetmek, yanıt başlıklarını/gövdesini istemciye döndürülmeden önce yeniden yazmak veya yukarı akış çağrısı başarısız olduğunda yanıtı özel bir hata sayfasıyla geçersiz kılmak için kullanın.
procedure OnAfterForwardHTTP(Connection: TsgcWSConnection;
aRequestInfo: THttpServerRequest; var aResponseInfo: THttpServerResponse;
E: Exception);
begin
if Assigned(E) then
begin
aResponseInfo.ResponseNo := 502;
aResponseInfo.ContentText := 'Upstream error: ' + E.Message;
end
else
Log(Format('forwarded %s -> %d', [aRequestInfo.Document, aResponseInfo.ResponseNo]));
end;