p412_error1.cgi

来自「javascript source code part2」· CGI 代码 · 共 57 行

CGI
57 行
字号 
#!/usr/local/bin/sewse         //Unix-alike OS users only

function show_html()
{ 
  cgi.out("Content-Type: text/html \r \n");
  cgi.out("\r \n");

  cgi.out("<HTML>");
  cgi.out("<BODY>");

  \\ Uncomment one of the following two lines. Which depends on your OS
  \\ Top line for UNIX, bottom line for Windows
  \\ cgi.out("<FORM METHOD=\"POST\">");    
  \\ cgi.out("<FORM ACTION=\"http://myserver/cgi-bin/sewse.exe?error1.cgi\"
            METHOD=\"POST\">");  

  cgi.out("Enter surname ...");
  cgi.out("<INPUT TYPE=\"text\" NAME=\"surname\">");
  cgi.out("<INPUT TYPE=\"submit\">");
  cgi.out("</FORM>");
  cgi.out("</BODY>");
  cgi.out("</HTML>");
} 

// Create global variable
var surname;

// called without submit
function main ()
{ 
  if ( (surname = cgi.getVar("SURNAME"))== NULL || surname=="")
  { 
    show_html();
  } 
  else
  { 
    if ( surname.toUpperCase() == "SMITH"
       || surname.toUpperCase() == "WONG"
       || surname.toUpperCase() == "SINGH"
       || surname.toUpperCase() == "BROWN" )
    { 
      cgi.out("Content-Type: text/html \r \n");
      cgi.out("\r \n");

      cgi.out("<HTML>");
      cgi.out("<BODY>");
      cgi.out("Warning! Boring name alert!");
      cgi.out("</BODY>");
      cgi.out("</HTML>");
    } 
    else
    { 
      show_html();
    } 
  } 
}

p412_error1.cgi - 源码说明

本页面展示了「javascript source code part2」中的 p412_error1.cgi 源码文件，采用 CGI 编程语言编写，共 57 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与javascript相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?