eAuction
  Not just another Perl script
Google
Welcome, Guest. Please Login or Register


If you use eAuction a lot and like it or if you make money from eAuction or from eAuction-related activities ...
then the project asks you for a donation in favor of the further development.



The forums are protected by
AccessControl
(written by Dieter Werner)
Click here if you want to check your IP against the most important RBLs of the net.
Click here in order to visite the AccessControl forums.


<< Visit the international e Auction Marketplace >>
Buy and sell PC and Consumer Electronic components






  HomeHelpSearchLoginRegister
 



Pages: 1 2 3 
New Functions (Read 763 times)
www.blitzday.com
eAuction User
**
Offline

I love the script
and hate it if it
does not work

Posts: 60

New Functions
09/30/04 at 10:49:04
 
Hello Dieter,

Well as you see Multimedia file viewing and clickable links are available for registered members only!!  You need to Login or Register!!
is getting bigger by the day. I would need a few things developed and maybe they are out there but what i tried did not work.

Could you help me beat Ebay in their success?
I am totally non profit. See Multimedia file viewing and clickable links are available for registered members only!!  You need to Login or Register!!
to see what i am spending my money on.

What I need urgently is:
1. A way people can mail eachother without seeing their email addresses. b.t.w. everysfot database is down for days now!
2. A second random part which shows the 4 pictures as well under the orginal if i add the same line i get duplicates inthe second row of items with pictures how do i sole that.
3. Still having issues with the time being displayed...

I have more, but the 1st and 2nd are the most urgent.
Can you help me by giving hints or tips?

Freddy
Back to top
 
 


Advertising
View Profile   IP Logged
Dieter Werner
Administrator
*****
Offline

Dipl. Paranoiac ®

Posts: 1162
Germany
Gender: male
Re: New Functions
Reply #1 - 09/30/04 at 13:41:57
 
As for the random part ...
1. go to sub disp_cat
2. search for
Code:
		@{[disp_random('pic', 4)]}<br> 


3. type 8 instead of 4
Code:
		@{[disp_random('pic', 8)]}<br>



4. replace sub get_table_val with this
Code:
sub get_table_val {
   my ($option, $random_data) = @_;
   my $pic_cnt = 0;
   my $row_switch = (int(@$random_data / 2) + 1) if @$random_data > 4;
   my (
	$close_time, $image, $img_info, $title, $bids, $bid, $cat,
	$item, $row, $rowcolor, $tbl_val, $the_bid, $date, $time,
   );
   local $_;
  
	foreach (@$random_data) {
		$pic_cnt++;
		
	    (
		$close_time,
		$image,
		$title,
		$bids,
		$bid,
		$cat,
		$item
	    ) = split /\[\]/, $_;
	   
	    $img_info = qq|<img src="$config{'img_url'}/$image"@{[img_size($image, 110)]}>|
	    if $option eq 'pic' and $image !~ /http\:/;
	   
	    $img_info = qq|<img src="$config{'icon_url'}/$config{'if_image'}" border="0">|
	    if $option eq 'list' and $image =~ /\.\w{3,}/;
	   
	    $img_info = qq|<img src="$config{'icon_url'}/$config{'no_image'}" border="0">|
	    if $option eq 'list' and $image !~ /\.\w{3,}/;
	   
		$the_bid = form_currency($bid);
	    ($date, $time) = form_date($close_time) if $option eq 'list';
	   
		($row, $rowcolor) = get_row_color($row);
	   
$tbl_val .= <<EO_HTML if $option eq 'pic' and $#$random_data >= 0 and $row_switch and $pic_cnt == $row_switch;
	  </tr>
	  <tr>
EO_HTML

$tbl_val .= <<EO_HTML if $option eq 'pic' and $#$random_data >= 0;
	    <td align="center" bgcolor="#FFFFFF">
		<a href="$ENV{'SCRIPT_NAME'}?action=dispitem&category=$cat&item=$item&lang=$form{'lang'}">
		    $img_info<br><b>$title</b><br>Current Bid: $the_bid
		</a>
		<br>
	    </td>
EO_HTML
	
$tbl_val .= <<EO_HTML if $option eq 'list' and $#$random_data >= 0;
   <tr $$rowcolor>
	  <td align="center" width="30">$img_info </td>
	  <td align="left" width="200" nowrap>
		<a href="$ENV{'SCRIPT_NAME'}?action=dispitem&category=$cat&item=$item&lang=$form{'lang'}">
		<font size="2">$title</font></a>
	  </td>
	  <td align="left" nowrap>
		<a href="$ENV{'SCRIPT_NAME'}?action=search&searchtype=items&searchstring=$cat&lang=$form{'lang'}">
		<font size="2">$category{$cat}</font></a>
	  </td>
	  <td align="center" nowrap>$bids</td>
	  <td align="right" nowrap>$the_bid  </td>
	  <td align="center" nowrap><font size="1">
		$date<br>$time</font>
	  </td>
   </tr>
EO_HTML

	}
	
$tbl_val .= <<EO_HTML if $#$random_data < 0;
	<tr>
	    <td colspan="6" align="center" bgcolor="$config{'colortablebody'}">
		<font face="ARIAL" size="2">$txt{'There are no items matching your request'}</font>
	    </td>
	</tr>
   </table>
</div>
EO_HTML

$tbl_val .= <<EO_HTML if $option eq 'pic' and $#$random_data >= 0;
	</tr>
   </table>
</div>
EO_HTML

$tbl_val .= <<EO_HTML if $option eq 'list' and $#$random_data >= 0;
   </table>
</div>
EO_HTML
  
   return $tbl_val;
}


Back to top
 
 

Multimedia file viewing and clickable links are available for registered members only!!  You need to Login or Register!!


Greetings from Germany
Dieter Werner




Advertising
View Profile | WWW   IP Logged
www.blitzday.com
eAuction User
**
Offline

I love the script
and hate it if it
does not work

Posts: 60

Re: New Functions
Reply #2 - 10/01/04 at 11:26:24
 
If i implement this i get a famous whit escreen , where is the bug in this new part of the sub
Back to top
 
 


Advertising
View Profile   IP Logged
Pages: 1 2 3 


If you like eAuction, please Rate it.
If you don't like eAuction, please Rate it too.


1 is being poor and 10 is being excellent


EveryScript

ip-location


AccessControl - Members Only