p413_error2.cgi

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

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

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

  cgi.out("<HTML>");
  cgi.out("<HEAD>");
  cgi.out("<SCRIPT>");

  if ( err_text )
  { 
    cgi.out("var error_string = \""+err_text+"\";\n");
  } 
  else
  { 
    cgi.out("var error_string = null;\n");
  } 

  cgi.out("if (error_string) alert(error_string);\n");
  cgi.out("</SCRIPT>");
  cgi.out("</HEAD>");
  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?error2.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; 

function main(argc, argv)
{ 
  if ( (surname= cgi.getVar("SURNAME"))== NULL || surname=="")
  { 
    show_html("Hello"); // called separate to submit
  } 
  else
  { 
    if ( surname.toUpperCase() == "SMITH"
       || surname.toUpperCase() == "WONG"
       || surname.toUpperCase() == "SINGH"
       || surname.toUpperCase() == "TRAN" )
    { 
      show_html("Warning! Boring Name.");
    } 
    else
    { 
      show_html("Hello");
    } 
  } 
}

p413_error2.cgi - 源码说明

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

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

⌨️ 快捷键说明

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