📄 00000010.htm
字号:
<BR> case '"': <BR> strcat(szBufX, "&quot;"); <BR> break; <BR> <BR> case ' ': <BR> strcat(szBufX, "&nbsp;"); <BR> break; <BR> <BR> case 27: <BR> ptr = strchr(szBuf + j, 'm'); <BR> if (ptr) <BR> j = ptr - szBuf; <BR> break; <BR> <BR> case 'h': <BR> case 'H': <BR> case 'f': <BR> case 'F': <BR> case 'n': <BR> case 'N': <BR> case 'm': <BR> case 'M': <BR> if (!strncasecmp(szBuf + j, "<A HREF="http://",">http://",</A> 7) <BR> || !strncasecmp(szBuf + j, "<A HREF="ftp://",">ftp://",</A> 6) <BR> || !strncasecmp(szBuf + j, "<A HREF="news://",">news://",</A> 7) <BR> || !strncasecmp(szBuf + j, "<A HREF="mailto:",">",</A> 7)) <BR> { <BR> ptr = strchr(szBuf + j, ' '); <BR> <BR> if (ptr) <BR> { <BR> *ptr = 0; <BR> k = strlen(szBufX); <BR> sprintf(szBufX + k, "<A HREF=\"%s\">%s</A>", szBuf + j, szBuf + j + 7 * (!strncasecmp(szBuf + j, "<A HREF="mailto:",">",</A> 7))); <BR> *ptr = ' '; <BR> j += ptr - (szBuf + j) - 1; <BR> break; <BR> } <BR> } <BR> /* no break here ! */ <BR> <BR> default: <BR> szBufX[k = strlen(szBufX)] = szBuf[j]; <BR> szBufX[k + 1] = 0; <BR> } <BR> } <BR> <BR> if (':' == szBuf[0]) <BR> sprintf(szBuf, "∶<I>%s</I><BR>\n", szBufX + 1); <BR> else if ('>' == szBuf[0]) <BR> sprintf(szBuf, "><I>%s</I><BR>\n", szBufX + 4); <BR> else <BR> sprintf(szBuf, "%s<BR>\n", szBufX); <BR> <BR> fputs(szBuf, fpOut); <BR> } <BR> <BR> fprintf(fpOut, "\n</BODY>\n</HTML>\n"); <BR> fclose(fpIn); <BR> fclose(fpOut); <BR> <BR> fprintf(fpIndex, "No.%d&nbsp;&nbsp;<A HREF=\"%08d.htm\" TARGET=\"%s\">%s </A>&nbsp;&nbsp;&nbsp;&nbsp;&lt;%s&gt;<BR>\n", i + 1, i, FRAMENAME, FH.title, FH.owner); /* Do NOT erase the appended ' ' after the 2nd %s ! (for IE 4) */ <BR> } <BR> <BR> fprintf(fpIndex, "\n<CENTER>\n<HR>\n<H2>%s - %s</H2>\n</CENTER>\n\n</BODY>\n</HTML>\n", FOOTER, szBoard); <BR> <BR> fclose(fpIndex); <BR> fclose(fpDOTDIR); <BR> <BR> <BR> sprintf(szBuf, "%s.AIX/%s", szBoard, ROOTHTML); <BR> fpIndex = fopen(szBuf, "wt"); <BR> if (NULL == fpIndex) <BR> { <BR> printf("Cannot create %s\n", szBuf); <BR> exit(5); <BR> } <BR> <BR> fprintf(fpIndex, "<HTML>\n <TITLE>%s - %s</TITLE>\n\n<FRAMESET ROWS=25%,75%>\n <FRAME SRC=\"%s\" FRAMEBORDER=1>\n <FRAME SRC=\"null.htm\" NAME=\"%s\" FRAMEBORDER=0>\n</FRAMESET>\n\n</HTML>\n", HEADER, szBoard, INDEXHTML, FRAMENAME); <BR> <BR> fclose(fpIndex); <BR> <BR> <BR> sprintf(szBuf, "%s.AIX/null.htm", szBoard); <BR> fpIndex = fopen(szBuf, "wt"); <BR> if (NULL == fpIndex) <BR> { <BR> printf("Cannot create %s\n", szBuf); <BR> exit(5); <BR> } <BR> <BR> fprintf(fpIndex, "<HTML>\n<BODY>\n<CENTER><BR>\n<H2>阅读本版文章</H2><BR>\n<H2>请点击上面窗口内的文章标题</H2></CENTER>\n</BODY>\n</HTML>\n"); <BR> <BR> fclose(fpIndex); <BR> <BR> <BR> printf("Compressing HTML files...\n"); <BR> printf("Calling tar...\n"); <BR> sprintf(szBuf, "%s.board.html.tar", szBoard); <BR> unlink(szBuf); <BR> sprintf(szBuf, "tar cf %s.board.html.tar %s.AIX", szBoard, szBoard); <BR> system(szBuf); <BR> printf("Calling gzip...\n"); <BR> sprintf(szBuf, "%s.board.html.tar.gz", szBoard); <BR> unlink(szBuf); <BR> sprintf(szBuf, "gzip %s.board.html.tar", szBoard); <BR> system(szBuf); <BR> <BR> sprintf(szBuf, "rm -fr %s.AIX", szBoard); <BR> system(szBuf); <BR> sprintf(szBuf, "%s.AIX", szBoard); <BR> if (0 == chdir(szBuf)) <BR> { <BR> printf("Can not erase %s\n", szBuf); <BR> exit(-3); <BR> } <BR> <BR> sprintf(szBuf, "mv -f %s.board.html.tar.gz %s.board.html.tgz", szBoard, szBoard); <BR> system(szBuf); <BR> <BR> <BR> printf("Finished Bhtml: %s.board.html.tgz (Total %d articles, %d files)\n", szBoard, nTotal, nTotal + 3); <BR> return 0; <BR>} <BR> <BR>-- <BR> <BR> 我 们 的 一 切 追 求 和 作 为, 都 有 一 个 令 人 厌 倦 的 过 程 <BR> <BR> 作 为 一 个 不 识 厌 倦 为 何 物 的 人, 便 掌 握 了 生 命 的 全 部 秘 密 <BR> <BR>※ 修改:·Leeward 於 Jun 15 08:22:02 修改本文·[FROM: 166.111.120.84] <BR>※ 来源:·BBS 水木清华站 bbs.net.tsinghua.edu.cn·[FROM: 166.111.120.84] <BR><CENTER><H1>BBS水木清华站∶精华区</H1></CENTER></BODY></HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -