利 用 ISAPI 实 现 向 数 据 库 中 添 加 记 录 (四)
浏览:30日期:2022-11-04
4、ISAPI 应 用 程 序 的 编 写 我 们 利 用 SQL 语 句 可 嵌 入 在 应 用 程 序 中 的 特 点, 把 SQL 的 有 关 请 求 语 句 嵌 入 在 ISAPI 交 互 程 序 中。 ISAPI 交 互 程 序 用 Visual C++ 编 写, 以 下 是 实 现 向 中 药 数 据 库 的 表 CMT1 中 添 加 记 录 的 主 要 程 序 段: // 建 立 一 个 CZY 类 的 成 员 函 数 FileWrite1Entry, 实 现 向 中 药 数 据 库 的 表 CMT1 中 添 加 记 录 void CZY::FileWrite1Entry(CHttpServerContext* pCtxt, LPTSTR pstrFileName) { const unsigned REC_NUM=1; // REC_NUM(数据文件中记录个数) const unsigned LINE=9; // LINE(表中数据域的个数) const unsigned COLUMN=6000; // COLUMN(每个数据域中字符的最大个数) char c,data[LINE][COLUMN]; FILE *fp; StartContent(pCtxt); //HTML头格式 WriteTitle(pCtxt); //HTML标题 Cstring stringSql; Cstring strQuery; Cstring strOutput; Cstring pstrZY00,pstrZY01,pstrZY02,pstrZY03,pstrZY04,pstrZY05, pstrZY06,pstrZY07,pstrZY08; //以"读"的方式打开文件名为pstrFileName的文件 if (!(fp = fopen (pstrFileName, "r"))) { *pCtxt << "< center>< font color='red'>Warning: < /font>Cannot open this file.< /center>"; return; } //从文件中读取数据 for(int k=0; k< REC_NUM; k++) { for(int I=0; I< LINE; I++) { //忽略"{"以前的说明性字符 do{ c=getc(fp); }while(c!='{'); //读取"{"和"}"之间的字符数据 for(int j=0; j< COLUMN; j++) { c=getc(fp); if(c=='}') { data[I][j]=''; break; } else if((c=='r')||(c=='n')||(c=='{')) { j--; } else { data[I][j]=c; } } } } fclose(fp) //把从文件中读取的数据赋给相应的字符型变量 pstrZY00 = data[0]; pstrZY01 = data[1]; pstrZY02 = data[2]; pstrZY03 = data[3]; pstrZY04 = data[4]; pstrZY05 = data[5]; pstrZY06 = data[6]; pstrZY07 = data[7]; pstrZY08 = data[8]; //创建数据库对象 Cdatabase db; // 确认数据 if( !strcmp(pstrZY00,NULLSTRING) || !strcmp(pstrZY01,NULLSTRING)|| !strcmp(pstrZY03,NULLSTRING) || !strcmp(pstrZY05,NULLSTRING)|| !strcmp(pstrZY06,NULLSTRING) || !strcmp(pstrZY07,NULLSTRING)|| !strcmp(pstrZY08,NULLSTRING) ) { *pCtxt < < "< br>< center>" << "Please be certain to enter your ZY00,ZY01,ZY03,ZY05,ZY06,ZY07,ZY08. rn" < < "Thank you." < < "< /center>"; return; } // 格式化添加记录的条件 strQuery.Format("ZY00 = '%-.20s'", pstrZY00); // 打开数据库对象,如果此对象不存在就退出 if(!db.Open(ZyDB, //lpszDSN FALSE, //bExclusive FALSE, //bReadOnly CONNECTSTRING, //lpszConnect FALSE)) //bUseCursorLib { *pCtxt < < "Could not open the database."; return; } //创建RECOREDSET类的数据库表对象 CZyCMT1 rsZy(&db); //指定格式化的添加记录的条件给表对象 rsZy.m_strFilter = strQuery; //打开表对象,如果不能打开就CATCH异常处理 try { if(rsZy.Open(Crecordset::dynaset)) { //如果想添加的记录已经存在于数据库的表中,就给出IDS_ONFILE中包含的反馈信息 if(!rsZy.IsBOF()) { strOutput.Format(IDS_ONFILE, pstrZY00, SCRIPTPATH); } else { // 构造插入记录语句 stringSql.Format("Insert into CMT1 (ZY00,ZY01,ZY02,ZY03,ZY04,ZY05,ZY06," "ZY07,ZY08) VALUES('%-.20s','%-.50s','%s', '%-.80s','%s'," "'%-.100s','%-.9s','%-.5s','%-.2s')", pstrZY00,pstrZY01, pstrZY02,pstrZY03,pstrZY04,pstrZY05,pstrZY06,pstrZY07,pstrZY08); //执行插入记录命令。如果成功给出IDS_THANKYOU中包含的反馈信息, //否则CATCH异常处理 try { db.ExecuteSQL(stringSql); strOutput.Format(IDS_THANKYOU, pstrZY00, SCRIPTPATH); } catch (CDBException* pEX) { TCHAR szError[1024]; if(pEX->GetErrorMessage(szError, sizeof(szError))) strOutput.Format(IDS_EXCEPTION, szError, SCRIPTPATH); else strOutput.Format(IDS_UNKNOWN, SCRIPTPATH); } } } else //如果数据库表对象不能打开,给出IDS_UNKNOWN中包含的反馈信息 strOutput.Format(IDS_UNKNOWN, SCRIPTPATH); } catch(CDBException* pEX) { TCHAR szError[1024]; if(pEX->GetErrorMessage(szError, sizeof(szError))) strOutput.Format(IDS_EXCEPTION, szError, SCRIPTPATH); else strOutput.Format(IDS_UNKNOWN, SCRIPTPATH); } rsZy.Close(); //关闭表对象 db.Close(); //关闭数据库 //给用户显示反馈的信息 *pCtxt < < strOutput; EndContent(pCtxt); //HTML尾格式 } 编 译 好 的 ISAPI 动 态 连 接 库 程 序 将 其 置 于 /Scripts 目 录 中。 /Scripts 是 交 互 程 序 的 虚 拟 目 录。 它 可 通 过 WWW 服 务 管 理 器 来 设 定。 当 WWW 第 一 次 被 安 装 时, 缺 省 的 ISAPI 可 执 行 的 虚 拟 目 录 是 /Scripts。
相关文章: