【 tulaoshi.com - ASP 】
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: < /fontCannot 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
