The eAuction Support Forums

The eAuction Support Forums
https://www.everyscript.de/cgi-bin/yabb/YaBB.pl
eAuction 1.6.1.x >> Start Up and more >> HOW TO SUSPEND USER?
https://www.everyscript.de/cgi-bin/yabb/YaBB.pl?num=1100217794

Message started by bit on 11/12/04 at 01:03:13

Title: HOW TO SUSPEND USER?
Post by bit on 11/12/04 at 01:03:13

Hi ,

I would to know is there a way to suspend some user from using auction script. Let say that someone place a bid and then dont want to pay, or to sell??? We need to have a way to suspend that kind of users.

Also, Can I get e-mail message when someone open new auction, like I get mail when new user register.

Sorry for my bed english.

Tnx in advance for help

Title: Re: HOW TO SUSPEND USER?
Post by VWE on 11/12/04 at 23:15:45

Hm, Dieter should be able to help you - think he will be back online on monday...

Title: Re: HOW TO SUSPEND USER?
Post by bit on 11/12/04 at 23:51:42

OK,

Tnx

Title: Re: HOW TO SUSPEND USER?
Post by Dieter Werner on 11/18/04 at 12:25:11

bit wrote:

That's a problem ...
because the suspended user can register again by using another alias and another email - but I will try to find a soluten.

bit wrote:

Also, Can I get e-mail message when someone open new auction, like I get mail when new user register.

Search the script for:
sub proc_new

Search sub proc_new for:

$config{'regdir'} && update_reg_file(
$form{'ALIAS'},
"$form{'CATEGORY'}$item_number"
);

Paste the following lines behind it:

Code:

my $message = <<EO_EMAIL;
Title: $form{'TITLE'}

Category: $form{'CATEGORY'}

Seller: $form{'ALIAS'}

http://$ENV{'HTTP_HOST'}$ENV{'SCRIPT_NAME'}?action=dispitem&category=$form{'CATEGORY'}&item=$item_number&lang=$form{'lang'}">

EO_EMAIL

my $subject = 'New Item Posted';

sendemail(
\$config{'admin_address'},
\$config{'admin_address'},
\$subject,
\$message
) if $config{'cc_to_admin'} == 1;

Title: Re: HOW TO SUSPEND USER? User Delete auction!!
Post by bit on 11/18/04 at 13:57:08

Dear Dieter ,

Thank you for your answers. 210000 byte or 25 Kb of Default image size is enough for my auction.

For other guys, as Dietere said: this is code where you can change default image size:

The max. image size is hard coded (210000 byte); see:

sub check_data {
my ($val, $ext) = @_;

length $$val > 210000 && return q|File too big|;
$ext !~ /gif|jpg/i && return q|File-Type not supported|;
$$val =~ /<[\s\/]*script\b[^>]*>/i && return q|Content not supported|;

return undef;
}

Also thank you for your code for my question «Can I get e-mail message when someone open new auction, like I get mail when new user register”. It works fine.

Another great thing would be if user could delete his auction (if there is no bids yet on it).
Tnx again for your work, and Your contribution to open source community. This is realy great script.

Greetings from Bosnia
Kenan Mahmutovic