test.cgi
来自「完整的主机服务器, (含代码).程序会监视联结到主机程序上的所有机器.可是设置开」· CGI 代码 · 共 30 行
CGI
30 行
proc html_header
print '<html><title>' & title$ & '</title><body>'
endproc
proc html_footer
print '</body></html>'
endproc
proc access_denied
title$ = 'ACCESS DENIED'
call html_header
print '<B>ACCESS DENIED</B>'
call html_footer
endproc
proc access_granted
call html_header
print '<font face=trebuchet color=orange>ACCESS GRANTED</font>'
call html_footer
endproc
proc main
newstr title 'HELLO'
if (pass$ == 'hello')
call access_granted
else
call access_denied
endif
end
endproc
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?