delphi之伪造referer下载文件
十五楼的鸟儿 16年前 (2009-02-23) 31423浏览 0评论 收藏
今天去了某经常去下载文件的地方,居然不能通过迅雷下载,简单的测试了下发现是检查了referer,所以花点时间做了下面的这个东西。[code=delphi]unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes,...
十五楼的鸟儿 16年前 (2009-02-23) 31423浏览 0评论 收藏
今天去了某经常去下载文件的地方,居然不能通过迅雷下载,简单的测试了下发现是检查了referer,所以花点时间做了下面的这个东西。[code=delphi]unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes,...
十五楼的鸟儿 16年前 (2009-01-01) 37858浏览 0评论 收藏
简单的webserver而已,不过实现的功能有些猥琐,可以在远程监控你的桌面一举一动~~代码如下:[code=delphi]unit Main;interfaceuses Windows, Messages, SysUtils, Classes, Graphics, Controls,...
十五楼的鸟儿 16年前 (2008-11-30) 29165浏览 0评论 收藏
代码中用到了IdAntiFreeze、idhttp、PerlRegEx和StringGrid。[code=delphi]type IdHTTP1: TIdHTTP; IdAntiFreeze1: TIdAntiFreeze; PerlRegEx1: TPerlRegEx; S...
十五楼的鸟儿 16年前 (2008-11-30) 27013浏览 0评论 收藏
很白痴的一段代码,版本号是单独写到程序中记录的,并非程序文件切实的版本号,只要保持每次发布程序时注意统一一下代码即可。其中http://nobird.org/banbenhao.txt存放的是最新版的版本号,banbenthis是当前软件自身版本号。[code=delphi]procedure TF...