⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 _review_csp.c

📁 這裡對linux系統下的CGI的開發用很好的入門學習指導作用。是學習CGI 的初學者非常好的實例材料。
💻 C
字号:
/* NOTE: DO NOT EDIT THIS FILE,
 * this file is create by tool (csp2bin version: 00.07.00) automaticly, 
 * build at: Tue Mar 14 16:43:25 2006
 */
/* NOTE: YOU SHOULDN'T ADD THIS FILE TO YOUR PROJECT DIRECTLY, 
 * When you add `../xx_maplist.c' to your project, 
 * this file will be added into your project. 
 * 
 */ 

#include <stdio.h>
#include <string.h>
#include <eblib.h>
#include "_review_csp.h"


static int _review_csp___mime_header();

int _review_csp__ (int calldepth, void * ebfp)
{
    int __ret=OK;
    char * __page_name="review.csp";
    char * __page_path="/";
    char * __page_fullname="/review.csp";

    if (calldepth==MAX_CALL_DEPTH)
        __ret=_review_csp___mime_header(ebfp);
    goto_ERROR;

    __ret=(int)ebBufStringAdd(ebfp, 
        "<HTML><HEAD><TITLE>留言本</TITLE>\n"
        "<META http-equiv=Content-Type content=\"text/html; charset=gb2312\">\n"
        "<STYLE>P {\n"
        "	size: 6pt\n"
        "}\n"
        ".title {\n"
        "	COLOR: #ffb6c1\n"
        "}\n"
        "</STYLE>\n"
        "\n"
        "<META content=\"MSHTML 6.00.2900.2180\" name=GENERATOR></HEAD>\n"
        "<BODY>\n"
        "<P><SPAN class=title>\n"
        "<CENTER>\n"
        "<H1>留 言 本</H1></CENTER></SPAN>\n"
        "<P></P>\n"
        "<CENTER>\n"
        "<TABLE style=\"FONT-SIZE: 9pt\" cellSpacing=0 borderColorDark=#ffffff \n"
        "cellPadding=0 width=650 borderColorLight=#c0c0c0 border=1>\n"
        "  <TBODY>\n"
        );
    goto_ERROR;

    
    {
    RECORD	record;
    void *	fp;
    fp = open_db("rb+");
    
    while(1)
    {
    if (db_read_next(fp, &record) <= 0)
    break;
    __ret=(int)ebBufStringAdd(ebfp, 
        "  <TR bgColor=#dadada height=20>\n"
        "    <TD>作者: "
        );
    goto_ERROR;

    __ret = (int)ebEvaluate(ebfp, "%s", record.name);
    goto_ERROR;

    __ret=(int)ebBufStringAdd(ebfp, 
        " </TD>\n"
        "    <TD>性别: "
        );
    goto_ERROR;

    __ret = (int)ebEvaluate(ebfp, "%s", record.sex);
    goto_ERROR;

    __ret=(int)ebBufStringAdd(ebfp, 
        " </TD>\n"
        "    <TD>邮件: "
        );
    goto_ERROR;

    __ret = (int)ebEvaluate(ebfp, "%s", record.mail);
    goto_ERROR;

    __ret=(int)ebBufStringAdd(ebfp, 
        " </TD>\n"
        "    <TD>时间: "
        );
    goto_ERROR;

    __ret = (int)ebEvaluate(ebfp, "%s", record.now);
    goto_ERROR;

    __ret=(int)ebBufStringAdd(ebfp, 
        "</TD></TR>\n"
        "  <TR height=50>\n"
        "    <TD colSpan=4><xmp>"
        );
    goto_ERROR;

    __ret = (int)ebEvaluate(ebfp, "%s", record.msg);
    goto_ERROR;

    __ret=(int)ebBufStringAdd(ebfp, 
        "</xmp></TD></TR>\n"
        );
    goto_ERROR;

    } /* for */
    
    close_db(fp);
    }
    __ret=(int)ebBufStringAdd(ebfp, 
        "</TBODY></TABLE></CENTER>\n"
        "<FORM action="
        );
    goto_ERROR;

    __ret = (int)ebEvaluate(ebfp, "%s", cgiPrefix(NULL));
    goto_ERROR;

    __ret=(int)ebBufStringAdd(ebfp, 
        "/store.csp method=post>\n"
        "	<CENTER>\n"
        "	<P>姓名: <INPUT name=name> \n"
        "	<P>性别: <INPUT type=radio value=0 name=sex>女性 \n"
        "			  <INPUT type=radio value=1 name=sex>男性 \n"
        "	<P>EMail:<INPUT name=email type=\?Text\?> \n"
        "	<P>我要留言:</P><TEXTAREA name=content rows=10 cols=95></TEXTAREA> \n"
        "	<P><INPUT type=submit value=\"发 表\"> \n"
        "	\n"
        "	<INPUT type=reset value=清除重写></P>\n"
        "	</CENTER>\n"
        "</FORM>\n"
        "</BODY></HTML>\n"
        );
    goto_ERROR;

    if (ERROR == ebBufFlush(ebfp)) return ERROR;

    return __ret;
} /* _review_csp__ */

static int _review_csp___mime_header(void * ebfp) 
{
    return ebprintf(ebfp, "Content-type: text/html\n\n");
}

⌨️ 快捷键说明

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