Wednesday, December 22, 2010

TQ-LR-randomise

char buf[256];

int total_links,rand_num;

web_reg_save_param("ParamName","LB=","RB=","Ord=ALL",LAST);

srand(time(NULL));

total_links=atoi(lr_eval_string("{ClickUrl_count}")); lr_output_message("total_links=%d",total_links);

rand_num=rand()%total_links+1;

lr_output_message("rand_num=%d",rand_num);

itoa(rand_num,buf,10);

lr_save_string(buf,"RandomVal");

lr_save_string(lr_eval_string(lr_eval_string("{ClickUrl_{RandomVal}}")),"ClickUrl_rand");

lr_output_message("ClickUrl_rand=%s",lr_eval_string("{ClickUrl_rand}"));

No comments: