Edit Profile During Registration YaBB 1 Gold - SP 1.3 This adds the option for users to edit their profile as they sign up. It has all the functions of editing your own profile by choosing modify except for the time offset. It makes it a lot nicer, since I find a lot of people on my website don't have a profile, sig, or even an avatar because they can't find the modify profile button. Designed to work on YaBB 1 Gold - SP 1.3 File to upload: sources/register.pl Enjoy. If you find any bugs, go to my website and tell me. Be sure to check out my website www.buddybuddha.net It's a fun-filled site about everything I like. Note- It's not religous at all. Kevin Dolan www.buddybuddha.net Sources/Register.pl $yymain .= qq~ ################# #Profile Options# ################# $yymain .= qq~
The following fields are optional, they will appear in your profile once you sign up.
You may edit these later.
Homepage Title: Homepage URL: Signature:
This will appear below all posts. ICQ Number: AIM Screenname: YIM Screenname: Gender: Personalized Text:
This will appear below your avatar next to each post Birthdate: Month (MM)Day (DD)Year (YYYY) ~; if($allowpics) { opendir(DIR, "$facesdir") || fatal_error("$txt{'230'} ($facesdir)!
$txt{'681'}"); @contents = readdir(DIR); closedir(DIR); $images = ""; foreach $line (sort @contents){ ($name, $extension) = split (/\./, $line); $checked = ""; if ($line eq $memsettings[13]) { $checked = ' selected'; } if ($memsettings[13] =~ m~\Ahttp://~ && $line eq 'blank.gif') { $checked = ' selected'; } if ($extension =~ /gif/i || $extension =~ /jpg/i || $extension =~ /jpeg/i || $extension =~ /png/i ){ if ($line eq 'blank.gif') { $name = $txt{'422'}; } $images .= qq~
print FILE "\n\n\n0\n\n\n\n\n\n$txt{'209'}\nblank.gif\n$date\n\n\n\n\n"; print FILE "$member{'sitetitle'}\n"; print FILE "$member{'siteurl'}\n"; print FILE "$member{'sig'}\n"; print FILE "0\n"; print FILE "\n"; print FILE "$member{'icq'}\n"; print FILE "$member{'aim'}\n"; print FILE "$member{'yim'}\n"; print FILE "$member{'gender'}\n"; print FILE "$member{'text'}\n"; if ($member{'check'} eq on) { print FILE "$member{'personal'}\n"; } else { print FILE "$member{'userpic'}\n"; } print FILE "$date\n"; print FILE "$member{''}\n"; print FILE "$member{'bday1'}/$member{'bday2'}/$member{'bday3'}\n"; print FILE "\n"; print FILE "\n";