UBB.Developers Forums UBB.classic V6 MultiHack Mods [6.1x] Address Book

Original Author: CopyCat
Note: Almost totally untested, ported it quickly yesterday (LoadTemplate, WriteFileAsArray, WriteFileAsString, AppendFileAsString, LoadStyleTemplate, RequireCode and RequireVars are the only differences but it was modified in 1000 places so there might be a problem)... If you had the 6.05 version, rename vars_addbook_canuse.cgi and vars_addbook_cantuse.cgi to var_addbook_canuse.cgi and var_addbook_cantuse.cgi because it caused problems with the UBB upgrading system that checks for vars_*.cgi, and I was too tired to think of a creative solution

Description: This will add an Address Book in the "my profile", that can be used by all members, and/or mods/admins etc. Has integration with the Control Panel, with options for minimum posts required to use, maximum entries per user and more. MultiHack file included. See for yourself in the demo (portuguese speaking board; english wordlets included in the zip).
Download: https://www.ubbdev.com/lk/download.cgi?f=addressbook.zip

Demo: http://banco.jogosonline.com.br/forum
user test
pass test

[ 12-26-2001 06:14 AM: Message edited by: LK ]

Nice hack LK. I'll try it soon.

Syntax error! But very nice in the demo!

cp_addbook.cgi: syntax error at cp_addbook.cgi line 36, near "};"

[ 11-23-2001: Message edited by: Variables ]

Variables: Where? (If it's not written, check the error log. If you can't find it, do you have ICQ/AIM/MSN/Yahoo?)

I renamed the var in vars but that was not the reason of the error i guess.

link is down

Fixed

LK, here's the error i think:

&WriteHashToFile("$vars_config{VariablesPath}/vars_addbook.cgi", "vars_addbook",
%new_vars_addbook);

Variables: it's already fixed Tried the updated cp_addbook.cgi?

[ 11-24-2001: Message edited by: LK ]

LK, the following things show up in the control panel:

The settings are not updated after pushing the update button.

Also these lines in the image sections in the CP:

$in{separator} in the separator iconfield

$in{edit_image} in the edit image field

$in{delete_image} in the delete image field

I added you to the ICQ list...

Fixed Get the updated cp_vars_addbook.pl and cp_addbook.cgi...

That did it. Working great now. Tnx LK.

Ow... there is another wait.......

>>>>>>> find

if ($in{type} eq 'wordlets') {
%update_wordlets = %vars_wordlets;

>>>>>>> insert after

elsif ($in{type} eq 'wordlets_addbook') {
%update_wordlets = %vars_wordlets_addbook;


Must be:

>>>>>>> insert after

} elsif ($in{type} eq 'wordlets_addbook') {
%update_wordlets = %vars_wordlets_addbook;


And all new templates chmod 755? I tried without chmod but then a member can not see or enter the address book.

[ 11-24-2001: Message edited by: Variables ]

Fixed, and I see the cp_vars_addbook.pl works, so use the same CHMOD as this file...

working smooth now

[ 11-24-2001: Message edited by: Variables ]

When you edit the name of a group it shows up twice one as the original name and then once as the new name and then when you go to delete one it deleted both of them.

Also it locks you from doing anything else. Adding users and or groups. LK Pleese fix this. Oh to give the users back there use of the addbook just go into the Members/addbook dir and delete all the file that have there member number.

[ 11-26-2001 05:47 AM: Message edited by: eXtremeTim ]

Probably fixed, upload the new ubb_lib_addbook.cgi and public_addbook_group_edit_now.pl

oh i forgot to tell you it works perfectly now.

It appears to work perfectly upon first install.

I was hoping that this would be a community address book where users could add their address if they wanted it available to the other members.

It would seem such an address book would be much more useful than just a personal address book.

What do you think?

Error after trying to install the MyStyle-Hack:

BEGIN not safe after errors--compilation aborted at ultimatebb.cgi line 504.

Lines 503 - 519: (same in install.txt)

if ($ubb eq 'address_book') {
use vars qw(%vars_addbook %vars_wordlets_addbook);
&RequireVars("$vars_config{VariablesPath}/vars_addbook.cgi");
&RequireVars("$vars_config{VariablesPath}/vars_wordlets_addbook.cgi");
if ($vars_addbook{who_can_use} eq '') {
&StandardHTML("$vars_wordlets_addbook{addbook_off}");
} else {
&RequireCode("$vars_config{CGIPath}/ubb_lib_addbook.cgi");
my $ab_show = &addbook_permission;
if ($ab_show eq 'y') {
&addbook_main;
exit(0);
} else {
&StandardHTML("$vars_wordlets_err{no_access}");
}
}
}#end address book

[ 01-07-2002 12:18 PM: Message edited by: Sam1504 ]

Sure you hacked it in correctly? I think you may have posted code before a } when you shouldn't have.

qasic