这是我实践过的一个下载一个pdf文件的脚本,下载的文件保存到了我指定的C盘根目录中。
#include "web_api.h"
Action()
{
int a;// 文件大小
long b; // 响应数据内容大小
web_url("487989.html",
"URL=http://www.cnblogs.com/tester2test/archive/2006/08/28/487989.html",
"Resource=0",
"RecContentType=text/html",
"Referer=",
"Snapshot=t2.inf",
"Mode=HTML",
EXTRARES,
"Url=http://www.vqq.com/vqq_inset.js?isMin=0&place=RB&Css=2&RoomName=5rWL6K+V6ICF5a625Zut6K665Z2b&encode=1&isTime=0&width=350&height=240&everypage=0", ENDITEM,
"Url=http://www.vqq.com/image/chat2.gif", ENDITEM,
LAST);
web_set_max_html_param_len("10000"); // 设置最大长度
web_reg_save_param("fcontent", "LB=", "RB=", "SEARCH=BODY", LAST) ; // 将响应信息存放到 fcontent 变量
web_url(" 下载页面 ",
"URL=http://www.cnblogs.com/Files/tester2test/xncssj.pdf",
"Resource=0",
"RecContentType=text/html",
"Referer=http://www.cnblogs.com/tester2test/archive/2006/08/28/487989.html",
"Snapshot=t3.inf",
"Mode=HTML",
LAST);
a = web_get_int_property(HTTP_INFO_DOWNLOAD_SIZE) ; // 获取下载文件的大小
if(a > 0)
{
if((b = fopen("c:// 性能测试实践及其展望 .pdf", "wb")) == NULL) // 以写方式打开文件
{
lr_output_message(" 文件操作失败 !");
return -1;
}
fwrite(lr_eval_string("{fcontent}"), a, 1, b) ; // 写入文件内容
fclose(b); // 关闭文件
}
return 0;
}