luisgulo/gambas-source-code
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

CGI.Error() now displays a nice error 500 page. :-)

Browse source 
[GB.WEB]
* NEW: CGI.Error() now displays a nice error 500 page. :-)
This commit is contained in:
Benoît Minisini 2023-10-15 21:54:08 +02:00
parent 7b26952018
commit f694f99b8b
2 changed files with 25 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
comp/src/gb.web/.src/CGI.module
View file

@ -127,9 +127,9 @@ Public Sub Error(Text As String)
Response.Buffered = False
Response.Begin
Print "<html><head><meta http-equiv=\"content-type\" content=\"text/html; charset=utf-8\"></head><body>"
Print "<h1>"; "Error in CGI script"; "</h1>"
Print "<pre>"; Text; "</pre></body>"
Print "<!DOCTYPE HTML><head><meta http-equiv=\"content-type\" content=\"text/html; charset=utf-8\"></head><body>"
Print "<pre>"; File.Load("error.txt")
Print Text; "</pre></body>"
Response.End
Quit

22
comp/src/gb.web/error.txt Normal file
View file

@ -0,0 +1,22 @@
.`",;II;,"`. ^
_______ .`;IIIIIIIIIIII;^. `;: ___________________________________________________________________
`IIIIIIIIIIIIIIIIII^ .`;II"
"IIIIII^.'";I:,IIIIII, .^IIIII`
`IIIII,. ^III" `IIIIII` .`,IIIIIII. ________ ________ ________
;IIIII ;IIII,"I;IIIII;.'^:IIIIIIIII; |\ ____\ |\ __ \ |\ __ \
;IIIII .:IIIII;'IIIIIIIIIIIIIIIIIII` \ \ \___| \ \ \|\ \ \ \ \|\ \
:IIIII" .```. ^IIIIIIIIIIIIIIIIII: \ \ \_____ \ \ \ \ \ \ \ \ \ \
.:IIIIIII;`. .`:IIIIIIIIIIIIIIIIIII. \ \_____ \ \ \ \ \ \ \ \ \ \ \
:IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII` \|_____\ \ \ \ \ \ \ \ \ \ \ \
^IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII, ____\ \ \ \ \_\ \ \ \ \_\ \
;IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII" |\_______\ \ \_______\ \ \_______\
;IIIII.`:IIIIIIIIIIIIII;,"`'."IIIII" \|_______| \|_______| \|_______|
^IIIII` .'``````''.. ':IIIII^
.;IIIII` .`;IIIII:. UNEXPECTED ERROR IN CGI SCRIPT!
.;IIIII". .`,IIIIIII`
.,IIIIII;"``''``^,;IIIIIII;`
_____ ."IIIIIIIIIIIIIIIIIIII"' _________________________________________________________________________________
.`,IIIIIIIIIIIII,`'
..'````''..