【原创】LoadRunner自动发帖脚本_烟三

概述：51Testing软件测试网Bmi2M_
本文主要是学习web_reg_save_param、lr_eval_string、sprintf、strstr、strcpy、strncpy、strlen、strcat等函数，同时处理重复数据、敏感字的替换。51Testing软件测试网;W'j$K1SV)D

1U bJ8^:l3C _:j0疑问：51Testing软件测试网AB0tx4`|-H;[
如果两个网站默认的编码不一样，一个是GB2312，一个是UTF-8，如何解决呢？难道一定要进行编码转换吗？Loadrunner是否有现成的函数可以实现？51Testing软件测试网9[$x-w7sRx2Z*^ ]`

k.}K%ZLPGh0脚本：
I!u:Rb;O;aI_0#include "web_api.h"
,F:T|q8XaG2A0Action()51Testing软件测试网Ag8O1B;D"y)r.cV
{
~2Do{@&Dk@0 int i,j,g,f,e,offset;
KNP
s9st0 int NewsCount,ContentCount,h;
2^1zKoMu0 char Str_Tem[100];
9` AH#v6R py5O0 char Str_NewsCount[100][100];
]0N,Sj%i#D9E0 char Str_NewsId[100],Str_NewsIdd[100];51Testing软件测试网XO xAa!d#Z
 char Str_NewsTitle[1000];
\J c6]E1f!Y0 char Str_NewsContent[2000];
1W o LNF0 char Str_News[2000],Str_temp[2000];
-^+Dy's:f5M0 char *position;51Testing软件测试网l3~5T8]C:d6V_%o
 char search_str[] = "<";51Testing软件测试网O4d'T7P!di
 char search_title[] = "_";

LK
Z{x'p$@r[o0 //登录要发帖的网站
i"p+jA$Xf%K ~#Z0 web_url("Login.aspx",
*qR+t7T]!D*{0  "URL=http://WebPassport.com.com/Login.aspx",51Testing软件测试网2yg&KW)e2V ]Y
  "Resource=0",
E%^kL^4E,M \0  "RecContentType=text/html",51Testing软件测试网5G ^l&u$B
  "Referer=",51Testing软件测试网 LyC@mICht
  "Snapshot=t2.inf",51Testing软件测试网|:X0J.S6v#o
  "Mode=HTML",
.g o)dO-I0  EXTRARES,
%e
ac2C_} y0  LAST);
&Z%FR.xBvXb0 
}_*T uL/A0 web_submit_form("Login.aspx_2",
{x%w$nw,Wq0  "Snapshot=t3.inf",51Testing软件测试网0vG-?4t z-T
  ITEMDATA,51Testing软件测试网+T @b)@7E\
  "Name=_username", "Value=烟三", ENDITEM,51Testing软件测试网ES1CHM4p.Bx
  "Name=_password", "Value=541111", ENDITEM,51Testing软件测试网(C9aqj9r,w^
  "Name=CheckboxSaveInfo", "Value=<OFF>", ENDITEM,
Y;wQK `:IJ0  "Name=Login", "Value=登录", ENDITEM,51Testing软件测试网_!mc [N
  EXTRARES,
K uF(J _)e(e&^0  LAST);51Testing软件测试网1B(s'x!v S^v"[

 //从其他网站获取新闻
`ypw7R;l/U7}A!v)L0 //1、获取新闻ID51Testing软件测试网;Y&?/{0MBi
 web_reg_save_param("NewsId","NOTFOUND=warning","LB=http://ent.ifeng.com/idolnews/hk/200803/","RB=.shtml","ORD=ALL",LAST);51Testing软件测试网&U)n}6q+l0T
@ `

b1T?,]'N.L`%a0 web_url("ent.ifeng.com",
~ w8Bg]0  "URL=http://ent.ifeng.com/",
'n!X f(QB)LQ0  "Resource=0",51Testing软件测试网3e~3Y@dQ.Z
  "RecContentType=text/html",51Testing软件测试网$pH&\'}'k [0d
  "Referer=",51Testing软件测试网6c#D
N3KoT$t%W
  "Snapshot=t1.inf",
(V?7b(]!Xi0  "Mode=HTTP",51Testing软件测试网.pt7SWm$u#p5U_
  EXTRARES,
&|0ay0~ij9{_ Dl0  LAST);51Testing软件测试网ABQ3R2E_:g

 NewsCount=atoi(lr_eval_string("{NewsId_count}"));

:er#l:I$[;ZS6Ac0 //2、剔出其中重复的ID
~$Xf^,`4fD0 f=0;51Testing软件测试网m;e"]bL?6O o!IQ
 for (i=1;i<=NewsCount;i++)
yd$i$g,GerL0 { g=0;
H#Us-Y;s!Q7Y0  sprintf(Str_Tem,"{NewsId_%d}",i);51Testing软件测试网&C ~O
vYu4h#{AP
  sprintf(Str_NewsId,"%s",lr_eval_string(Str_Tem));51Testing软件测试网N+N+K$n![9V,v
  
EEG@q#Wz2F0  for (j=i+1;j<=NewsCount;j++)
AT{E!lj
`#q0  { sprintf(Str_Tem,"{NewsId_%d}",j);51Testing软件测试网
eTXx0ID5{-r XK'W
   sprintf(Str_NewsIdd,"%s",lr_eval_string(Str_Tem));
3tk.\}A%iN([F2s)F0   if (strcmp(Str_NewsId,Str_NewsIdd)==0) g++;
j!mEC8vn6Zn0  }
m\`.O?0  if (g==0)
|6FzI&f8I/|0  { //lr_message("The NewsID is:%s@%d",Str_NewsId,f);51Testing软件测试网|9w+A-L~0e4KD
   strcpy(Str_NewsCount[f],Str_NewsId);
T4XV1nst0   f++;
5?"DL7{:x&]T0  }
iU4v5N8I%pC8Kx0 } 
}8s{6x-e0g\0 //lr_message("The distinct NewSID Number is: %d",f);51Testing软件测试网\U G!dUB/Y
tq+s
 51Testing软件测试网[,` Z fbwl$O
 //3、从每条新闻中获取新闻标题与内容51Testing软件测试网'|nn9}$T])et
 for (h=0;h<f;h++)51Testing软件测试网hp xq$rS
 {
8^8[Qunl)vFR)i0 lr_save_string(Str_NewsCount[h],"News_Id");51Testing软件测试网/L(DC SEOJ
 //lr_message("%s",lr_eval_string("{News_Id}"));
0FUfwm0 web_set_max_html_param_len("10240");51Testing软件测试网dN2sRl4I2L
 web_reg_save_param("NewsTitle","NOTFOUND=warning","LB=<title>","RB=</title>",LAST);51Testing软件测试网'Eaip:U
rzE
 web_reg_save_param("NewsContent","NOTFOUND=warning","LB=<P><FONT face=Verdana>","RB=</FONT></P>","ORD=ALL",LAST);51Testing软件测试网ftqa1dP3@,qZ2T

 web_url("New Page",
p$Gj7h5W0   "URL=http://ent.ifeng.com/idolnews/hk/200803/{News_Id}.shtml",51Testing软件测试网6tz\gS J[ @t
  "Resource=0",
.Af O;TYL~!J/N
v0  "RecContentType=text/html",
h!X\]&P @~.T7hg0  "Referer=http://ent.ifeng.com/",
},t5l[*s.n#WX4[8l0  "Snapshot=t3.inf",51Testing软件测试网0y:}:l_ k9MT
  "Mode=HTTP",
9a}(oF5Cc%GkY0  EXTRARES,51Testing软件测试网ZG6{uC
  LAST); 
kG:o1Z"wl3KWb0 
iD w;Jz6G0 ContentCount=atoi(lr_eval_string("{NewsContent_count}"));
{6c.b AJ`0 //lr_message("ContentCount is:%d",ContentCount);51Testing软件测试网a4\?_Qpu"S^5} D-}

l6qd@9?uN:p[~0 //4、控制新闻内容的长度以及剔除废信息
+jy+U x4frF0 sprintf(Str_NewsContent,"");51Testing软件测试网 B1a"wL ?+S yv$C
 for (e=1;e<=ContentCount;e++)51Testing软件测试网~E:x^B
 { sprintf(Str_Tem,"{NewsContent_%d}",e);51Testing软件测试网?b8\;[2tAy
  sprintf(Str_temp,lr_eval_string(Str_Tem));

D}9s vpc(q9GX0  //lr_output_message("%s",Str_temp);51Testing软件测试网BG6g4M"i

  position = (char *)strstr(Str_temp, search_str);51Testing软件测试网],}%P#G?
  if (position!=NULL)
1~Yu:g"A5c@0  { ōffset = (int)(position - Str_temp );
.O@ J;l^0    //lr_output_message("The string \"%s\" was found at position %d", lr_eval_string(Str_Tem), offset);
*u$Z;S X~IsuM0    strncpy(Str_News,lr_eval_string(Str_Tem),offset);
m8AW5o z@t0    continue;51Testing软件测试网vi7i"\$Dao.s1O
  }51Testing软件测试网(x8oInZ,p"n
  else strcpy(Str_News,lr_eval_string(Str_Tem));

  if (strlen(Str_NewsContent)+strlen(Str_News)<2000)
1RX,x;E5[i.t0  51Testing软件测试网A*D2_5a/Slp k
  strcat(Str_NewsContent,Str_News);
9aM%n\Ij0 }

[8RfH.WmH|I0 //lr_output_message("The44 is:%d",strlen(Str_NewsContent));
i2Xpb9`(J(E0 //lr_message("The h is:%d",&h);  51Testing软件测试网$z]0C.fq/h2f
    //lr_message("The h is:%d",Str_NewsContent);

!a/e;?AQ0 //5、剔出标题中废数据51Testing软件测试网 n(I[@9@
 sprintf(Str_temp,lr_eval_string("{NewsTitle}"));
G&|7j9lU
p5z0 position = (char *)strstr(Str_temp, search_title);
H
y C4s r:Xo yEm0 lr_output_message("The is:%s",Str_temp);

 if (position!=NULL)51Testing软件测试网MCi!W&Aw
 { ōffset = (int)(position - Str_temp);
P#O!`K6b6Y'I2V0   lr_output_message("The2 is:%d",offset);51Testing软件测试网C_ s(|0XG c0x;F:sg
   strncpy(Str_NewsTitle,Str_temp,offset);
U~9t,v!b%b0 }51Testing软件测试网g"v0M.aW5V&K#o+Fq
 else strcpy(Str_NewsTitle,Str_temp);

 //6、内容为视频，无法获取文字内容处理51Testing软件测试网2o2b)F voM8?
 if (strlen(Str_NewsContent)==0) sprintf(Str_NewsContent,"视频暂缺!");51Testing软件测试网'e]x+J
|O
 lr_save_string(Str_NewsContent,"NewContent");
:v!s#J~])]m0V'cm6^0 lr_save_string(Str_NewsTitle,"NewsTitlee");
"Of5n
c3d:x0 
(ns)il6S0 //lr_message("The Title is:%s",lr_eval_string("{NewsTitlee}"));51Testing软件测试网Dl2CA)mgAjU
 //lr_message("The Content is:%s",lr_eval_string("{NewContent}"));51Testing软件测试网v3fQ?y.j
 
?mO+u@Am0 //到指定的网站发帖
Y8p6aR9ys%H0 web_url("bar_161.html",
!Q7f
ol"S||0  "URL=http://WebPost.com.com/bar_161.html",51Testing软件测试网*?&V+V:?~*?
  "Resource=0",
XOa;B4Yl#@0  "RecContentType=text/html",51Testing软件测试网6fUS[8zoc
  "Referer=",
z"B1`2Z4Mo,Eq,D0  "Snapshot=t4.inf",51Testing软件测试网q'fK8_5X{@(c)Q ]
  "Mode=HTML",
lT;zZt}]?"_0  LAST);

 web_submit_data("add_topic.do",
p,e2j(D||0  "Action=http://WebPost.com.com/add_topic.do",51Testing软件测试网T3^J2vqH
  "Method=POST",
Mz%oT~3?B0  "RecContentType=text/html",51Testing软件测试网 _XU)G lB0\
  "Referer=http://WebPost.com.com/bar_161.html",51Testing软件测试网2^g+X9P:b\[%@~
  "Snapshot=t9.inf",51Testing软件测试网'H{NC"}"Q
  "Mode=HTML",
o jz?1WJ?0  ITEMDATA,51Testing软件测试网2Uc|]'U#f4Z0b]
  "Name=posturl", "Value=http://WebPost.com.com/bar_161.html", ENDITEM,
4U.M0`aa!o IT \0t0  "Name=Username", "Value=烟三",ENDITEM,
1a6te V m4c0  "Name=postTitle","Value={NewsTitlee}", ENDITEM,51Testing软件测试网`"Zi]6A?G
  "Name=postContent", "Value={NewContent}", ENDITEM,
F+k No'lu0  "Name=", "Value=", ENDITEM,51Testing软件测试网:Q:Q$K5Z+~d#ts
  "Name=validation_code", "Value=#valiCode1#",ENDITEM,51Testing软件测试网&C3_C/l J7jT
  "Name=validationcode_input", "Value=", ENDITEM,
p*s8GL6PQ6Q.T&S0  "Name=BarID","Value=161", ENDITEM,
#x[q5Am2f*wsa ~8pH0  "Name=TopicID", "Value=", ENDITEM, LAST); 51Testing软件测试网%Jk S!o_&QJ/P*_;l

a|(M#i UTBT0 lr_think_time(10);
_z,[h2aG&XD,dQ0 }
,b9TfS4H)aSU#@&IDx0return 0;51Testing软件测试网1z+Y8VVF_
51Testing软件测试网i!e:w[s
}
1}q)F8R2xzA0