设为首页 加入收藏 网站首页
休闲娱乐
军事·社会百态·娱乐八卦·校园
体育·美女写真·幽默笑话·游戏
综合·在线视频·搞笑图片·灵异
两性生活
两性知识·性爱技巧
情色实录·两性图片
女性健康·同性之恋
电脑网络
网络编程·网页制作·软件教学
操作系统·图形图象·冲浪宝典
网络安全·邮件系统·认证考试
热点专题
芙蓉·真人漫画
72式·欲望都市
帅哥·人体彩绘
您现在的位置: 世纪中国 >> 网络编程 >> 其他教程 >> Delphi教程 >> 教程正文
建立自己的csdn知识管理库(1)
作者:中国图霸    教程来源:网络    点击数:    更新时间:2007-1-1

建立自己的csdn知识管理库(1)

 csdn是这两年我上来频率最高的论坛,以前喜欢到大富翁。但是很多时候上来是为了搜索以前的帖子,解决在项目开发中的一些实际问题,搜获不小。但是也有一个遗憾,就是csdn有时候访问速度非常的慢,而且也没有提供官方的离线浏览器。所以就萌生的写一个下载csdn帖子的软件。然后把从csdn接收到的帖子放在自己的知识管理系统里面,或者做成chm 这样效率就高多了。

    再仔细一看 发觉csdn上面的所有帖子都是保存为xml的。这些就更方便了,下载下来后就可以放在数据库里面。或者做成html文件。

http://community.csdn.net/Expert/TopicView1.asp?id=

后面循环加上一个7位数的数字就可以得到一个帖子。

例如:http://community.csdn.net/Expert/TopicView1.asp?id=2800001

多线程 循环就搞定. 为了以后访问的速度, 可以1000条就建立一个目录 ,也就是一个目录只保存1000条。

   开始用.net写的一个winform,软件 发觉速度下载有点慢。后来改为delphi.部分代码如下:

procedure TForm1.SavePage(strId: string; strDir: string);
begin
    try
        UrlDownloadToFile(nil, Pchar(Edit1.text+ strId), Pchar(strDir), 0, nil); //保存ur连接到一个文本文件
    except
    end;
end;

procedure TForm1.Button1Click(Sender: TObject);
var
    strDir: string;
    intStar:integer;
    intEnd:integer;
    i:integer;
    FileName:string;
begin
    try
        intStar:=strToInt(edit2.Text);
        intEnd:=strToint(edit3.text);
        Edit4.Text:=Copy(IntTostr(intStar),0,4);
        strDir:='E:\CSDNBBS\'+Edit4.Text ;
        createDir(strDir);
        dddd:=true;
        for i:=intStar to intEnd do
        begin
&

[1] [2] [3] 下一页

分类推荐
社会 社会 娱乐 军事 校园
幽默 体育 女性 专题
电脑 编程 网页 软件 系统
安全 图象 冲浪 认证
搞笑 人物 动物 物品 表情
签名 色图 漫画 奇闻
美女 明星 清纯 自拍 欧美
丝袜 卡通 性感 走光
两性 知识 性图 孕育 技巧
同性 单身 情感 实录
视频 写真 搞笑 MTV 翻唱
写实 片段 游戏 综艺
Delphi教程热门文章
普通教程 利用Delphi消息处理建立类似Wi
普通教程 BPCS系统现金流量分析工具开发
普通教程 RS232串口通讯模块
普通教程 Delphi命令行参数
普通教程 用Delphi创建服务程序
普通教程 使用Delphi开发多媒体播放音轨
普通教程 监视资源管理器的文件变化
普通教程 用Delphi实现远程屏幕抓取
普通教程 用Delphi实现文件下载的几种方
普通教程 建立自己的csdn知识管理库(1)
普通教程 如何获取本地HTML文件的标题,超
普通教程 Delphi的Hint(2)
普通教程 [Delphi版]罗技无限灵貂,驱动程
普通教程 Delphi的Hint(1)
普通教程 Delphi中实现汉字拼音声母查询
普通教程 制作一个简单的setup
普通教程 DLL、BPL与字符串传递
普通教程 自动生成拼音(汉字反查到拼音)
普通教程 WINDOWS编程技巧之DELPHI篇
普通教程 使用Delphi创建IIS虚拟目录

  广东广州海珠区 世纪网络工作室 版权所有 上海电信提供网络带宽
信箱: 9297659@qq.com 粤ICP备06113754号