What I tried was making Rate an extra profile field, than at the very very bottom of UBBMISC right above the exit 1; I put this!!
#if (-e "$MembersPath/$UserName/rate.file") {
require "$MembersPath/$UserName/rate.file";
$votes = $votes +1;
$ratings = $ratings + $rating;
$average = int($ratings / $votes);
&Lock("lock.file");
open(WRITE, ">$MembersPath/$UserName/rate.file") || die ("Unable to open the file $MembersPath/$UserName/rate.file because of this error:
$!");
print WRITE "$votes = $votes;n";
print WRITE "$ratings = $ratings;";
close(WRITE);
&Unlock("lock.file");
chmod(0666, "$MembersPath/$UserName/rate.file");
&StandardHTML("Thank you $cookieusername for voting for Username: $UserName .
Total Votes: $votes .
Average: $average .");
exit;
}
else {
$votes = 1;
$ratings = $rating;
$average = $rating;
&Lock("lock.file");
open(WRITE, ">$MembersPath/$UserName/rate.file") || die ("Unable to open the file $MembersPath/$UserName/rate.file because of this error:
$!");
print WRITE "$votes = $votes;n";
print WRITE "$ratings = $ratings;";
close(WRITE);
&Unlock("lock.file");
chmod(0666, "$MembersPath/$UserName/rate.file");
&StandardHTML("Thank you $cookieusername for voting for User: $UserName .
Total Votes: $votes .
Average: $average .");
}
And I put this code in the print BIOHTML
#
#Rate #Me |
# # #Total votes: $votes - Average: $average #
But all I get when I click submit is a blank white screen... Check it out!! Here is the example!!
Anyone got any idea??
|