When using PBCC:
This is not working:
This is not working:
Code:
FUNCTION PBMAIN () AS LONG LOCAL bmp_string AS STRING LOCAL bmp_len AS LONG OPEN "x.bmp" FOR BINARY AS #1 GET$ #1, LOF(1), bmp_string bmp_len = LOF(1) CLOSE #1 STDOUT "HTTP/1.1 200 OK" STDOUT "Content-Type: image/bmp" STDOUT "Last-Modified: Sun, 01 May 2022 23:23:24 GMT" STDOUT "Accept-Ranges: bytes" STDOUT "ETag: W/" + $DQ + "61a32f74b25dd81:0" + $DQ STDOUT "Server: Microsoft-IIS/10.0" STDOUT "Date: Sun, 01 May 2022 23:23:24 GMT" STDOUT "Content-Length: 108954" STDOUT STDOUT bmp_string END FUNCTION
Comment