怎样用idhttpserver代替IIS让用户浏览html或下载文件 http://bbs.csdn.net/topics/360248674


  怎样用idhttpserver代替IIS让用户浏览html或下载文件

更多0分享到：

相关知识库： C# 虚拟现实（VR） Node.js 算法与数据结构

对我有用[0] 丢个板砖[0] 引用 | 举报| 管理

回复次数：6
关注
SQLDebug_Fan
SQLDebug_Fan
本版等级：

 
#1 得分：0回复于： 2011-05-29 15:03:31

你要实现HTTP Server？

对我有用[0] 丢个板砖[0] 引用 | 举报| 管理
关注
cgfhz
国风
本版等级：
#2 得分：0回复于： 2011-05-30 08:36:43

看idhttpserver的demo

对我有用[0] 丢个板砖[0] 引用 | 举报| 管理
关注
cicidodo
cicidodo
本版等级：
#3 得分：0回复于： 2011-05-30 10:16:47

引用楼主 cicidodo 的回复:

怎样用idhttpserver代替IIS让用户浏览html或下载文件

是的

对我有用[0] 丢个板砖[0] 引用 | 举报| 管理
关注
lahcs
lahcs
本版等级：
#4 得分：0回复于： 2011-05-30 10:28:51

Delphi/Pascal code

?


1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

procedure TForm1.IdHTTPServer1CommandGet(AThread: TIdPeerThread;

  ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo);

const

  WEBROOT = ‘C:/www‘;

var

  RequestDocument:string;

begin

  RequestDocument:=LowerCase(ARequestInfo.Document);

  if RequestDocument=‘/‘ then

    RequestDocument:=‘/index.html‘;

  if FileExists(WEBROOT+RequestDocument) then

    begin

      AResponseInfo.ContentStream:=TFileStream.Create(WEBROOT+RequestDocument, fmOpenRead + fmShareDenyWrite);

    end

  else

    begin

      AResponseInfo.ResponseNo := 404;

    end;

  AResponseInfo.Server:=‘IIS/6.0‘;

  AResponseInfo.CacheControl:=‘no-cache‘;

  AResponseInfo.Pragma:=‘no-cache‘;

  AResponseInfo.Date:=Now;

对我有用[0] 丢个板砖[0] 引用 | 举报| 管理
关注
lahcs
lahcs
本版等级：
#5 得分：100回复于： 2011-05-30 10:31:06

Delphi/Pascal code

?


1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

26

27

procedure TForm1.IdHTTPServer1CommandGet(AThread: TIdPeerThread;

  ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo);

const

  WEBROOT = ‘C:/www‘;

var

  RequestDocument:string;

begin

  RequestDocument:=LowerCase(ARequestInfo.Document);

  if RequestDocument=‘/‘ then

    RequestDocument:=‘/index.html‘;

  if FileExists(WEBROOT+RequestDocument) then

    begin

      AResponseInfo.ContentStream:=TFileStream.Create(WEBROOT+RequestDocument, fmOpenRead + fmShareDenyWrite);

    end

  else

    begin

      AResponseInfo.ResponseNo := 404;

    end;

  AResponseInfo.Server:=‘IIS/6.0‘;

  AResponseInfo.CacheControl:=‘no-cache‘;

  AResponseInfo.Pragma:=‘no-cache‘;

  AResponseInfo.Date:=Now;

end;

这段代码的话，应付一般的html网站应该足够了...

对我有用[0] 丢个板砖[0] 引用 | 举报| 管理
关注
cicidodo
cicidodo
本版等级：
#6 得分：0回复于： 2011-05-30 11:07:45

引用 4 楼 lahcs 的回复:

Delphi(Pascal) code

procedure TForm1.IdHTTPServer1CommandGet(AThread: TIdPeerThread;
  ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo);
const
  WEBROOT = ‘C:/www‘;
var
  Reque……

谢谢，太感谢了
时间： 2024-08-05 14:58:24

怎样用idhttpserver代替IIS让用户浏览html或下载文件 http://bbs.csdn.net/topics/360248674的相关文章

Linux中7个用来浏览网页和下载文件的命令

上一篇文章中,我们提到了rTorrent.wget.cURL.w3m.Elinks等几个有用的工具,很多人回信说还有其它几个类似的工具也值得讨论,所以就有了这篇文章.如果错过了第一部分的讨论,可以通过下面的链接来回顾. 5 个基于Linux命令行的文件下载和网站浏览工具 这篇文章介绍了Linux下用于浏览网页和下载文件的其它几个命令行工具. 1. links Links是用C语言写的一个开源web浏览器,支持包括Linux.Windows.OS X和OS/2在内的所有主流平台.它提供了基于文本和

怎么样提高手机网站的用户浏览体验

"21世纪是智能手机的天下,是移动互联网的主场"!随着智能手机的普及与移动互联网飞速发展,广大的网民用户都开始习惯使用手机和其他智能移动设备来进行上网.移动设备的上网的便捷,让网民用户喜欢上了利用移动设备进行网上的活动.对于互联网企业来讲,你更需要一个用户体验高的网站,才能让你在移动互联网市场中占据资源! 你做手机网站的目的,就是为了能够在移动互联网市场中分的一杯羹.移动互联网市场的竞争激烈,你更需要一个强大的手机端网站才能让你在移动互联网市场中站稳脚.既想做好PC网站,又想做好手机网

基于jQuery或Zepto实现实时监控用户浏览信息

对于一些大型公司,想要有一些监控用户行为的分析,怎么办? 比如一个场景,A公司想要监控用户浏览当前屏幕有哪些数据怎么办? 那么就用到本文所提的监控解决方案了: 1.首先要监控用户到底在该屏停留了多久: 2.基于1确定用户是停留在了本页面而没有滑动手机屏幕: 3.在用户未达到条件后的callback机制. 基于以上的问题,我们可以想到时间分片 1 /* This is a expose advertisements component. 2 * Base on some class librari

<项目><day11>查看用户浏览过的商品

<项目>查看用户浏览过的商品 1.创建一个entity包储存实体对象 1.1创建一个Product的类存储实体对象 对象具有以下属性,并添加set和get方法,含参和不含参的构造方法,toString方法 private String id; private String proName; private String proType; private double price; 2.创建一个Dao包储存实体对象的操作方法 2.1创建一个存放所有对Product对象的CRUD方法的Produc

cookie技术案例-用户浏览商品的记录

1引言 你点击了桌面上的Chrome图标,一个浏览器窗口出现了,输入网址就可以在Internet世界愉快玩耍.这一切是怎么实现的呢?Chromium这个多进程的程序是如何启动各个进程的呢?浏览器主进程(界面进程)启动了哪些线程?如何启动的呢?这些问题一直萦绕在心头,一起来看看源代码吧.本文主要针对Chromium for Mac的源代码,其它操作系统大同小异. 2背景知识 浏览器作为一个应用程序,是以进程的形式运行在操作系统上的.首先,Chromium是一个多进程的应用程序,我们需要了解Chro

&#8203;浏览网页下载文件命令（十七）

下载工具:wget 浏览网页:curl,elinks,nslookup 13.1.wget 功能:非交互式网络下载 语法:wget [option]... [URL]... 常用选项: 启动: -b,  --background         转入 后台运行 -V, –version                  打印wget版本 -h,help                        打印语法帮助 e, –execute=COMMAND   执行`.wgetrc'格式的命令 日志记

maven-jetty-plugin保存文件报错：请求的操作无法在使用用户映射区域打开的文件上执行

使用jetty-maven-plugin 在eclipse中进行运行调试,碰到无法编辑保存webapp下的文件 提示:请求的操作无法在使用用户映射区域打开的文件上执行 解决方法: 从 jetty 7 开始,jar存放在maven仓库中的路径为org/eclise/jetty/jetty-webapp 打开对应的版本的jar包修改jar中的org/mortbay/jetty/webapp/webdefault.xml文件 Java代码 <init-param> <param-name>

IIS中预览错误问题的解决办法（HTTP 错误 404.3 - Not Found 由于扩展配置问题而无法提供您请求的页面。如果该页面是脚本，请添加处理程序。如果应下载文件，请添加 MIME 映射 ）

控制面板 程序 打开或关闭windows程序 Internet信息服务 万维网服务 应用程序开发功能 勾选.net  扩展性    ASP    ASP.net 按照这个顺序就可以解决该问题. IIS中预览错误问题的解决办法(HTTP 错误 404.3 - Not Found 由于扩展配置问题而无法提供您请求的页面.如果该页面是脚本,请添加处理程序.如果应下载文件,请添加 MIME 映射 ),布布扣,bubuko.com

Mac普通用户修改了/etc/sudoers文件的解决办法

1.开启 Root 账户 打开“系统偏好设置”,进入“用户与群组”面板,记得把面板左下角的小锁打开,然后选择面板里的“登录选项”.在面板右边你会看到“网络账户服务 器”,点击它旁边的“加入…”按钮,再点击弹出的窗口中“打开目录实用工具”.这时会弹出一个新窗口,把左下角的小锁打开,然后点击菜单栏上的“编辑” – “启用 Root 用户”,在弹出的窗口中设置 Root 的密码就可以了. 上面的步骤有些啰嗦,你可以在 Finder 中按组合键“shift + command + G”直接前往文件夹 /