Action()
{
int number1,number2;
char session11[1000];
char string[1000];
int length;
char *stringtemp;
//char session22[20];
web_reg_save_param("session1","LB=name=userSession value=","RB=.","Ord=ALL",LAST);
web_reg_save_param("session2","LB=.","RB=<table border=0><tr><td> </td>","Ord=ALL",LAST);
web_url("WebTours",
"URL=http://127.0.0.1:6080/WebTours/",
"Resource=0",
"RecContentType=text/html",
"Referer=",
"Snapshot=t1.inf",
"Mode=HTML",
LAST);
strcpy(string,"");
strcpy(string,lr_eval_string("{session1_1}"));
//strcpy(session1,"");
sprintf(session11,"{session2_1}");
strcat(string,".");
length= strlen(lr_eval_string(session11));
length=length-2;
number1=atoi(lr_eval_string("{session1_count}"));
number2=atoi(lr_eval_string("{session2_count}"));
lr_output_message("%d,%d",number1,number2);
//lr_output_message("%d",length);
stringtemp=lr_eval_string(session11);
strncat(string,stringtemp,length);
//srcat(string,session11);
lr_save_string(lr_eval_string(string),"session");
lr_output_message("%s",lr_eval_string("{session1_1}"));
lr_output_message("%s",lr_eval_string("{session2_1}"));
web_submit_data("login.pl",
"Action=http://127.0.0.1:6080/WebTours/login.pl",
"Method=POST",
"RecContentType=text/html", "Referer=http://127.0.0.1:6080/WebTours/nav.pl?in=home",
"Snapshot=t2.inf",
"Mode=HTML",
ITEMDATA,
"Name=userSession", "Value={session}", ENDITEM,
"Name=username", "Value=jojo", ENDITEM,
"Name=password", "Value=bean", ENDITEM,
"Name=JSFormSubmit", "Value=on", ENDITEM,
"Name=login.x", "Value=50", ENDITEM,
"Name=login.y", "Value=10", ENDITEM,
LAST);
lr_output_message("%s",lr_eval_string("{session}"));
return 0;
}