使用loadrunner进行压力测试主要分两步，第一步是编写脚本（比较重点），第二步执行测试（配置都是在界面上点点就行了，当然我只的是比较简单的，能满足日常需要的），第三步分析结果（这一步比较高深，但是对于我来说能看懂简单的性能指标就OK了）。所以这里就说一下脚本的编写，给未来再用到做参考。

1.HTTP的GET请求
这里以访问百度为例，地址http://www.baidu.com/s?wd=mobile，表示在百度上搜索mobile。具体脚本如下（有注释）
Lr script代码

1. Action()   
2. {   
3.     int status;   
4.     lr_start_transaction("send");   
5.   
6.     web_reg_find("Search=Body",//这里说明在Body的范围内查找   
7.                  "SaveCount=ret_Count",//这里表示把返回值的个数放在变量ret_Count里   
8.                  "Text=mobile",//这里表示查找的内容是“mobile”   
9.                  LAST);   
10.   
11.     status=web_url("Baidu_Search",    
12.         "URL= http://www.baidu.com/s?wd=mobile",    
13.         "TargetFrame=Main",    
14.         "Resource=0",    
15.         "RecContentType=text/html",    
16.         "Mode=http",    
17.         LAST );    
18.   
19.     lr_output_message("Request Status:%d",status);   
20.     lr_output_message("查找到的返回值个数:%d",atoi(lr_eval_string("{ret_Count}")));   
21.   
22.   
23.     if (atoi(lr_eval_string("{ret_Count}")) > 0){//这里判断检查到的个数   
24.          lr_output_message("Rec successful.");   
25.          lr_end_transaction("send", LR_PASS);   
26.      }   
27.      else{    
28.          lr_error_message("Rec failed");   
29.          lr_end_transaction("send", LR_FAIL);   
30.      }    
31.   
32.     return 0;   
33. }  

2.HTTP POST请求
这个是在我们项目中用到的，发送POST请求，进行自然语言识别的，脚本如下：

Lr script代码

1. Action()   
2. {   
3.     int status;   
4.   
5.     lr_start_transaction("send");   
6.   
7.     web_reg_find("Search=Body",//这里说明在Body的范围内查找   
8.                  "SaveCount=ret_Count",//这里表示把返回值的个数放在变量ret_Count里   
9.                  "Text=t",//这里表示查找的内容是“t”   
10.                  LAST);   
11.   
12.     status=web_submit_data("trs",   
13.                 "Action=http://192.168.77.185:9002/recognizeText",//地址   
14.                 "Method=POST",//POST请求   
15.                 "RecContentType=text/html",   
16.                 "Mode=HTML",   
17.                 ITEMDATA,   
18.                 "Name=usercontent","Value=gprs",ENDITEM,//这一行表示传入一个参数usercontent，值为gprs   
19.                 "Name=Accept","Value=text/plain",ENDITEM,   
20.                 LAST);   
21.   
22.      lr_output_message("Request Status:%d",status);   
23.   
24.      if (atoi(lr_eval_string("{ret_Count}")) > 0){//这里判断检查到的个数   
25.          lr_output_message("Rec successful.");   
26.          lr_end_transaction("send", LR_PASS);   
27.      }   
28.      else{    
29.          lr_error_message("Rec failed");   
30.          lr_end_transaction("send", LR_FAIL);   
31.      }    
32.   
33.      return 0;   
34. }  

3.WebService请求
webservice请求的脚本建议通过可视化的方式添加
1)引入webservice，注意wsdl后缀
http://dl.iteye.com/upload/attachment/0076/7279/f876a5fd-d125-3a68-bb39-3af9ad6f39a3.jpg
2)给入参填值
http://dl.iteye.com/upload/attachment/0076/7281/f64626d3-6735-3caa-a956-e19ee7d16f78.jpg
3)给返回值指定存储到的变量中
http://dl.iteye.com/upload/attachment/0076/7283/7ac71536-3fbe-3ce2-8428-c9a4b26d94c9.jpg  
4)结果检查
这个与其它模式一样，不多说了
我这里添加的是网上公用的天气预报webservice，地址是：http://www.webxml.com.cn/WebServices/WeatherWebService.asmx
详细脚本如下

Lr script代码

1. Action()   
2. {   
3.     int status;   
4.   
5.     lr_start_transaction("send");   
6.   
7.     status=web_service_call( "StepName=getSupportCity_102",   
8.         "SOAPMethod=WeatherWebService|WeatherWebServiceSoap|getSupportCity",//这里是我已经引用了webservice的名称及调用方法   
9.         "ResponseParam=response",   
10.         "Service=WeatherWebService",   
11.         "ExpectedResponse=SoapResult",   
12.         "Snapshot=t1353067092.inf",   
13.         BEGIN_ARGUMENTS,   
14.                       "byProvinceName=安徽",//这里是入参，参数名称：byProvinceName，值：安徽。入参和返回值的名称都可以再引用里看见   
15.         END_ARGUMENTS,   
16.         BEGIN_RESULT,   
17.                       "getSupportCityResult=result",//这里是返回值，名称：getSupportCityResult，把它放到变量result中   
18.         END_RESULT,   
19.         LAST);   
20.   
21.     lr_output_message("Request Status:%d",status);   
22.     lr_output_message("Result:%s",lr_eval_string("{result}"));//这里把返回值输出，调试webservice的时候用   
23.   
24.   
25.     if(strstr(lr_eval_string("{result}"),"合肥")>0){//这里是判断返回值中是否包含“合肥”   
26.         lr_end_transaction("send",LR_PASS);   
27.     }else{   
28.         lr_end_transaction("send",LR_AUTO);   
29.     }   
30.   
31.     return 0;   
32. }  

4.Socket请求
我这里指的是简单的Socket请求，端连接，发送接收的都是一个字符串。比较复杂的Socket请求，自己录制脚本。如果不知道，自己去查。
详细脚本如下，另外还包含一个data.ws文件，用来声明发送和接收的字节数组及其长度的，并指定要发送的内容（发送的内容一样可以参数化的）

Lr script代码

1. #include "lrs.h"  
2. Action()   
3. {   
4.     char *recvbuf;   
5.     int recvlen=0;   
6.     int rc;   
7.   
8.     lrs_startup(257);   
9.   
10.     lr_start_transaction("Trans_1");   
11.     lr_start_transaction("Conn_1");   
12.   
13.     rc=lrs_create_socket("socket0", "TCP", "RemoteHost=192.168.1.101:8888",  LrsLastArg);//创建Socket连接   
14.   
15.     if (rc != 0 ) {      
16.         lr_end_transaction("Conn_1", LR_FAIL);      
17.         lr_end_transaction ("Trans_1", LR_FAIL);      
18.         return 0;     
19.     }   
20.     lr_end_transaction("Conn_1", LR_PASS);  //判断socket是否链接成功的事务，0表示创建成功   
21.   
22.     lrs_send("socket0", "buf0", LrsLastArg); //发送buf0，buf0为在data.ws中定义的发送变量   
23.   
24.     lrs_receive("socket0", "buf1", LrsLastArg); //接收消息，存放在buf1中，buf1是在data.ws中定义的接收数组，注意数组长度一定要大于等于实际接收长度   
25.   
26.     lrs_get_last_received_buffer("socket0",&recvbuf,&recvlen);//把Socket最后接收的字节数组，长度放在recvlen中，内容放在recvbuf中   
27.   
28.     lr_output_message("Received:%s",lr_eval_string(recvbuf));   
29.   
30.     if(recvlen>3)   
31.         lr_end_transaction("Trans_1", LR_PASS);   
32.     else   
33.         lr_end_transaction ("Trans_1", LR_FAIL);   
34.   
35.   
36.     lrs_disable_socket("socket0", DISABLE_SEND_RECV);   
37.   
38.     lrs_close_socket("socket0");   
39.     return 0;   
40. } 

Lr script代码

1. //data.ws   
2. ;WSRData 2 1  
3.   
4. send  buf0 32  
5.     "hehehehe"  
6.   
7. recv  buf1 50   
8. -1